Search found 20 matches
- Wed Aug 25, 2010 9:03 am
- Forum: DFSORT , ICETOOL & Utilities
- Topic: COUNT in Syncsort
- Replies: 3
- Views: 11711
The objective is to capture only the counts in O/P based on certain conditions. Input1(LRECL=15,RECFM=FB): 375000000102001 375000000341013 375000000431004 375000000651007 Input2(LRECL=23,RECFM=FB): Card Number(15 digits),4blanks,Indicator(Column Position 20, Values Y and N),Rest 3bytes(Not to be use...
- Mon Aug 23, 2010 3:28 pm
- Forum: DFSORT , ICETOOL & Utilities
- Topic: COUNT in Syncsort
- Replies: 3
- Views: 11711
COUNT in Syncsort
//SORT01 EXEC PGM=SORT //SORTLIB DD DSN=SYS1.SORTLIB, // DISP=SHR //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SRTWKSP INCLUDE MEMBER=SRTWRK00 //SORTJNF1 DD DSN=INPUT1, // DISP=SHR //SORTJNF2 DD DSN=INPU2, // DISP=SHR //OSORT1 DD DSN=&&TEMP1,DISP=(NEW,PASS) //OSORT2 DD DSN=&&TEMP2,DISP=...
- Thu Feb 11, 2010 9:35 am
- Forum: PL/I
- Topic: How to assign NULL to a veriable throgh TRANSLATE in PL/I
- Replies: 1
- Views: 5537
How to assign NULL to a veriable throgh TRANSLATE in PL/I
Hi, I want to replace value of a particular column with a NULL character, not space. A = 50?th Anniversary. B = TRANSLATE(A,'','?'); is converting the O/P as "50 th Anniversary". A space is being inserted. Output I want as A = 50th Anniversary No space inbetween 50 and th. Please guide me on this an...
- Wed Dec 30, 2009 12:48 pm
- Forum: JCL
- Topic: Converting file of RECFM=U to RECFM=FB
- Replies: 8
- Views: 20717
- Wed Dec 30, 2009 11:01 am
- Forum: DB2 SQL - DB2 PROGRAMMING
- Topic: DB2 Run JCL
- Replies: 5
- Views: 10349
I just browsed the link provided and got the below information. LIBRARY(library-name) Specifies the name of the data set containing the program to be run. If library-name is not specified, normal MVS library searching is used. The data sets specified in the STEPLIB DD statements are first searched f...
- Tue Dec 29, 2009 6:59 pm
- Forum: JCL
- Topic: Converting file of RECFM=U to RECFM=FB
- Replies: 8
- Views: 20717
//STEPA EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=A //OLD DD DSN=I/P file,DISP=SHR //NEW DD DSN=O/P file, // DISP=(NEW,CATLG,DELETE), // DCB=(LRECL=0,RECFM=FB,BLKSIZE=4096), <-- Same as I/P file DCB except RECFM // SPACE=(CYL,(280,100),RLSE) //SYSIN DD * REPRO - INFILE(OLD) - OUTFILE(NEW) - SKIP(100) - C...
- Tue Dec 29, 2009 6:35 pm
- Forum: DB2 SQL - DB2 PROGRAMMING
- Topic: DB2 Run JCL
- Replies: 5
- Views: 10349
DB2 Run JCL
Hi, I have come across differnt Loadlibs in a COBOL DB2 run JCL. But I'm confused on the same. //STEP010 EXEC PGM=IKJEFT01,DYNAMNBR=20 //STEPLIB DD DSN=PROD.COBOLDB2.LOAD,DISP=SHR // DD DSN=SYS1.DSNDSNH.SDSNEXIT,DISP=SHR // DD DSN=SYS1.DSNDSNH.SDSNLOAD,DISP=SHR //SYSTSIN DD * DSN SYSTEM(DSNH) RUN PR...
- Tue Dec 29, 2009 6:29 pm
- Forum: DB2 SQL - DB2 PROGRAMMING
- Topic: When to go for BIND PLAN and BIND PACKAGE?
- Replies: 2
- Views: 7822
When to go for BIND PLAN and BIND PACKAGE?
Hi,
Can someone guide me on the query on When to go for BIND PLAN and When to go for BIND PACKAGE?
Regards,
Biswa.
Can someone guide me on the query on When to go for BIND PLAN and When to go for BIND PACKAGE?
Regards,
Biswa.
- Tue Sep 22, 2009 10:15 am
- Forum: DB2 SQL - DB2 PROGRAMMING
- Topic: OCCURS clause in DCLGEN ???
- Replies: 1
- Views: 4761
OCCURS clause in DCLGEN ???
Hi,
I have never seen OCCURS clause in DCLGEN in DB2?
But is it possible that DCLGEN in DB2 can have OCCURS clause in it?
I think it'll lead to data conflict.
Can anyone please explain more on this to me?
Thanks,
Biswa.
I have never seen OCCURS clause in DCLGEN in DB2?
But is it possible that DCLGEN in DB2 can have OCCURS clause in it?
I think it'll lead to data conflict.
Can anyone please explain more on this to me?
Thanks,
Biswa.
- Mon Aug 24, 2009 3:36 pm
- Forum: DB2 SQL - DB2 PROGRAMMING
- Topic: DB2 - ALIAS use in Production
- Replies: 2
- Views: 5126
DB2 - ALIAS use in Production
Hi, Where exactly is alias used in our day to day life and its advantages. Why to use ALIAS in Production or during implementation? Also...if suppose there is a table EMP, i create two alias for it based on authorization id..... 1.A.TEXAS.EMP 2.A.NEWJERSY.EMP Both point to EMP....now if TEXAS delete...
- Mon Aug 24, 2009 3:31 pm
- Forum: DB2 SQL - DB2 PROGRAMMING
- Topic: DB2 Failure - CURSOR
- Replies: 0
- Views: 2761
DB2 Failure - CURSOR
Hi, There is a DB2 program. Which performs commit after 1000 Records are processed. Suppose the JCL is submitted for running this DB2 Program for consider 2500 records. In between processing it fails at 2200th record. How will you Rollback the last 200 records or how will you restart the processing ...
- Mon Aug 24, 2009 3:25 pm
- Forum: COBOL
- Topic: COBOL Link Edit in Standalone Code
- Replies: 2
- Views: 6199
COBOL Link Edit in Standalone Code
Hi, Is it necessary to have Link/Edit Step (during compilation process) for single program. For. Ex. Program A is being compiled (its having no called or calling program linked to it) During compilation is it require Link/Edit step to be present. We do have Link Card while compiling such stand-alone...
- Wed Jul 29, 2009 3:50 pm
- Forum: DFSORT , ICETOOL & Utilities
- Topic: On Syncsort
- Replies: 2
- Views: 7601
On Syncsort
Hi, In My input file I'm hving some $ segments. While trying to extract it using sort I'm getting the below error message. INCLUDE/OMIT FIELD BEYOND RECORD $ --> Column is 28 and the I/P is a VB file. $05:ABC $165:MNO $11:PQR I used SORT FIELDS=COPY INCLUDE COND=(32,3,CH,EQ,C'$05') Could anyone help...
- Tue Jul 14, 2009 7:37 pm
- Forum: DFSORT , ICETOOL & Utilities
- Topic: Capturing Unique Records in a file
- Replies: 1
- Views: 3885
Capturing Unique Records in a file
Hi, I'm having a file which contains. c-1-2 c-1-2 c-1-9 c-1-9 c-1-9 c-1-9 c-1-10 830.830 836.005 836.005 836.025 836.045 836.600 837.015 837.040 837.045 I want the O/P as: c-1-2 c-1-9 c-1-10 830.830 836.005 836.025 836.045 836.600 837.015 837.040 837.045 Meaning Unique records needs to be captured i...
- Tue May 12, 2009 4:36 pm
- Forum: JCL
- Topic: SORTING Input file
- Replies: 5
- Views: 8081