Search found 8 matches
- Mon Aug 16, 2010 11:57 pm
- Forum: COBOL
- Topic: IBM interview question...plz give me answers ?
- Replies: 11
- Views: 18923
Anuj, We can not use idcams under this situation,IDCAMS can have only MAXCC=16 //CHKDUPS0 EXEC PGM=IDCAMS,COND=(0,NE) //SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //INFILE DD DSN=DATA1,DISP=SHR //OUTFILE DD DSN=DATA2,DISP=SHR //SYSIN DD * REPRO INFILE(INFILE),OUTFILE(OUTFILE) REPLACE COUNT (1) IF M...
- Thu Aug 12, 2010 11:47 pm
- Forum: COBOL
- Topic: IBM interview question...plz give me answers ?
- Replies: 11
- Views: 18923
For you question 3,here is another way, // IF (STEP00S1.RC EQ 0) //STEP00S2 EXEC PGM=IDCAMS //SYSUDUMP DD SYSOUT=* //INFILE DD DUMMY //OUTFILE DD DUMMY //SYSIN DD * REPRO INFILE(INFILE),OUTFILE(OUTFILE) REPLACE COUNT (1) IF MAXCC EQ 0 - THEN SET MAXCC=1024 ELSE SET MAXCC=1024 /* //SYSPRINT DD SYSOUT...
- Fri Aug 06, 2010 7:16 pm
- Forum: DB2 SQL - DB2 PROGRAMMING
- Topic: DB2 4k unavailable resource
- Replies: 6
- Views: 9795
- Mon Jul 26, 2010 7:15 pm
- Forum: Suggestions & Feedback
- Topic: Mainframe forums discussion display
- Replies: 8
- Views: 13653
- Sun Jul 25, 2010 12:46 am
- Forum: Suggestions & Feedback
- Topic: Mainframe forums discussion display
- Replies: 8
- Views: 13653
- Fri Jul 23, 2010 12:57 am
- Forum: Suggestions & Feedback
- Topic: Mainframe forums discussion display
- Replies: 8
- Views: 13653
Mainframe forums discussion display
Trying to go through mainframe forums(for ex JCL, COBOL)i could see only one page worth of discussions for either COBOL or JCL , when i click next page it will show job openings page, what happened to old discussions which are posted earlier,can you keep job openings in seperate forums, instead of r...
- Mon Jul 19, 2010 6:39 pm
- Forum: CICS
- Topic: Handling AEIP abend
- Replies: 1
- Views: 6830
- Mon Jul 19, 2010 6:15 pm
- Forum: JCL
- Topic: syncsort record count
- Replies: 2
- Views: 17358
you can get record count by fallowing //ABC1HU17 EXEC PGM=ICEMAN //SORTIN DD DSN=&HLQ..FTP.&TYPE..ABCNCY,DISP=SHR //SORTOUT DD DSN=&HLQ..ABC1HUD0.ABCNCY.RECCNT, // DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10),RLSE),UNIT=3390, // DCB=(LRECL=80,BLKSIZE=0,RECFM=FB,DSORG=PS) //SYSOUT DD SYSOUT=* //SYS...