MVSFORUMS.com

It appears that your input data consists of an "owner" (1st record with the key), and followed by 1-M "members" in sort of a "set". So I would create a new "scann ...

Yeh, I just slapped it together to test it and zap some test rows. I like your way a lot better and neater. I didn't actually know you could leave so many blanks on separate cards and it still pars ...

Thank You Sir, this is it easily as you said..............

UPDATE DB2T.OUR_CUST
SET HUB_CUST_ID =
CHAR('HUB-'||SUBSTR& ...

I want to use SPUFI if possible to plug some columns with test data. And I want to Concatenate like parts of 2 existing columns together. So the new data becomes easily recognized. Say for example 1s ...

Is anyone quite familiar with Sending a file from a PC up to a Mainframe z/OS system ?? I'm quite OK with the reverse direction using GET 'mainframe dsname' xxxxxxxx.csv for example. I know it is P ...

It has been quite a while since I used it, but I think it was //PANDD1 or //EZTMAC, that defines the MACROs. So try //PANDD1 DD DSN=TCH.PROD.EZTP ,DISP=SHR in your JOB; and make sure you have L ...

I use this SYNCSORT statement to get rid of Leading Blanks; I don't know if there is a SHIFT=RIGHT that does Trailing; never looked it up...
SORT FIELDS=COPY
...

I'm creating a nice Trailer record using SYNCSORT here & these statements:

//SYSIN DD *
MERGE FIELDS=COPY
OUTFIL FILES=OUT,
T ...

Running a JCL conversion Job on test machine; getting failure saying No Index Entry; yet dataset is ARCHIVE and DMS/OS Entry shows valid;
CDW08D.QSD1981O.CRBKUP.G0005V00 ...

THX I got it. NEW is just that, expects destination file to not exist; RPL is to overlay and existing file; MOD will append to existing file.

Finding a new File Transfer Job that Sends a File from z/OS to a Gateway Server they call it. There is a COPY function used with a DISP parameter of "NEW" . What does that mean ?? If the s ...

This combination is ALWAYS confusing. But somehow IBM comes out with NOT AND NOT = OR; NOT OR NOT = AND. I try to use the +VE tests when possible. Can't always do that though. If it's a code valu ...

Decide which Table is the Main Source for the Update and use it as a Driver. If you expect 1 Row only, then Use SELECT. If > 1 row Use DECLARE CURSOR and FETCH. Use the result from that to SELEC ...

XPEDITOR is not here @ this site. TESTCOB is here, at least the Command is still here. I haven't used it in quite a long long time. So I don't remember all the setups with the Listing file, Object F ...

I would never use a structure like DEEPDOO in a Production Commercial Application. Has too many GO TOs in it defeating the purpose of part of the original posting. Yikes reminds me of some awful Hone ...