Mainframe, MVS and zOS Discussion

If you are doing a table unload , why can't you exclude the records during unload itself by tweaking the DB2 query to select only last 2 days data?

Atul Bhosale wrote: Have your output of SUM FIELDS, means what do I do?

What Z programmer mean to say is execute two steps
1. Do the sum fields and get the output as you have mentioned
2. Use join keys to join your input file and o/p from step1, get the desired result

Thanks,
Chandan

Totally Agree with Anuj.. Having Robert Sample on this forum is big big asset for forum. I am seeing Robert's pots on various forum for quite some time and feels my self lucky to have interaction ( not one to one but through posts) with this great person. Much appreciate your time for spreading your...

Welcome Vasanth.. Nice to see you here..

Hi All, My cursor query is as below EXEC SQL DECLARE CUR2 CURSOR FOR SELECT COL1, COL2 FROM TABLE1 WHERE COL3 = 'ABC' END-EXEC. For table has only 1 row satisfying above criteria with COL1 = 'XYZ' Below are the steps I am following 1. Open the cursor 2. Fetch the cursor which will eventually give on...

Nice to see you here Arun..

It should not happen. Can you please post your SQL and cursor declaration where you are getting -811

Thanks,
Chandan

Refer this for Sort control card execution sequence

http://publibz.boulder.ibm.com/cgi-bin/ ... FIGSTMTSEQ

I can think of a two step solution here 1. Remove the duplicates using your key and in INREC add the sequence number at the end and create output file with sequence number 2. Sort the output file from step 1 on sequence number and write the outpur file. Remove the sequence number in OUTREC Thanks, C...

Ok..Thanks Mangesh..

[ Post made via Android ]

Yes..it can be done using sort.. You need to group the records on each key in INREC and assign sequence number for each group.. Sort the records using your key and sequence number descending to get the latest record first then eliminate the duplicates in next step I don't have access to system now s...

You might have missed first BEGIN record in your testing, but still if you have a solution without having first begin statement, then you are good. Regards, Magesh Yup you are correct..my bad..I overlooked the first begin statement [ Post made via Android ] http://zmainframes.com/ext/sniper/mobiled...

All the copy books mentioned with INCLUDE taken into consideration during per-compilation and all the copy books mentioned with COPY are taken into consideration during compilation

10701 Imran Lamba, Assuming LRECL=80. //SORT010 EXEC PGM=SORT //SORTIN DD * BEGIN // DD DSN=FIRST.FIL,DISP=SHR // DD * BEGIN // DD DSN=SECOND.FIL,DISP=SHR //SORTOUT DD SYSOUT=* //SYSOUT DD SYSOUT=* //SYSIN DD * INREC IFTHEN=(WHEN=GROUP,BEGIN=(1,5,CH,EQ,C'BEGIN'), PUSH=(81:SEQ=8)) SORT FIELDS=(81,8,...

10543 COND=(0,LE) is like, if the RC of the previous step is less than 0 don't execute "step13", which is not possible. So agree step13 would execute but rest of the steps will also execute. I was not supposed to execute step15, step15... As Robert mentioned When I mention COND on JOB par...

Welcome Rohit and Nice to see you here..you will find quite familiar names here

You had a good exposure and surely it will be a help to people here

Thanks,
Chandan

Shaifali Kapoor wrote: thanks for the other option Chandan. But if add only this steps after 13 will anyways get executed?

Once your step 13 executed with Restart parameter then COND parameter on JOb card will be applicable to all other steps and (0,LE) will be always true

Hi,

Just adding one more way to Akatsukami..
Code on Job card

Having COND=(0,LE) on corresponding step will suffice for bypassing the step

Thanks and regards,
Chandan

Welcome to Forum Richie