Interested to Buy Any Domain ? << Click Here >> for more details...
I've one sequential file, That file contains millians of
Junk & CHAR recoreds example
File 1
,,,,,...,,,.....,.,.INFOSYS.....,,,,,,,,,,,WIPRO...........,
,...,..,.
My questions is : I want omit the 44th posstion to 4 CHAR
(WIPRO) remaining things I want output file (including Junk
CHAR also)...
How can we slove this problem & give me a syntax.
Please provide the result as soon as possible.
- 5 Answers
- 11255 Views
- CTS, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / srinivas yadav
//SYSIN DD *
SORT FIELDS = COPY
EXCLUDE=(44,4,CH,EQ,C'WIPR')
/*
//
| Is This Answer Correct ? | 13 Yes | 1 No |
Answer / vs kumar
HI LU,
YOU HAVE MISSED THE SORT FIELDS = COPY
I HAVE CORRECTED IT. PLEASE LET ME KNOW IF I AM WRONG
//EXAMP JOB A400,PROGRAMMER
//STEP1 EXEC PGM=SORT
//SORTIN DD DSN=INP1,DISP=old
//SORTOUT DD DSN=OUTPUT,DISP=(,PASS),UNIT=3390,
// SPACE=(CYL,(5,1)),DCB=(LRECL=??)
//SYSIN DD *
SORT FIELDS = COPY
OMIT COND=(44,4,CH,EQ,C'WIPO')
| Is This Answer Correct ? | 5 Yes | 1 No |
Answer / lu
//EXAMP JOB A400,PROGRAMMER
//STEP1 EXEC PGM=SORT
//SORTIN DD DSN=INP1,DISP=old
//SORTOUT DD DSN=OUTPUT,DISP=(,PASS),UNIT=3390,
// SPACE=(CYL,(5,1)),DCB=(LRECL=??)
//SYSIN DD *
OMIT COND=(44,4,CH,EQ,C'WIPO')
| Is This Answer Correct ? | 3 Yes | 1 No |
Answer / pkb
This can be done using SORT utility
//STEP1 exec PGM=SORT
//STEPLIB ........
.....................
//SORTIN dd DSN=INPUT.FILE
...
//SORTOUT DD DSN=OUTPUT.FILE
...
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(1:1,73,74,10)
//SYSOUT DD SYSOUT=*
THE FILE LENGTH IS CONSIDERED AS 83
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / naga
i think , WIPRO is 5 chars not 4 chars.
pls check the blow syntax.
SORT FIELDS = COPY
OMIT COND=(44,5,CH,EQ,C'WIPRO')
| Is This Answer Correct ? | 0 Yes | 0 No |
What parameter directs the output of the job log dataset?
What is the syntax of JCL statement?
Explain the function of job statement in jcl?
What is the difference b/w the CLASS,TIME,PRTY in jcl job card.
What parameters can be used to limit the number of records written to a sysout dataset?
What is a PROC? What is the difference between an instream and a catalogued PROC?
My JCL have five steps & I created new versions of GDG in first step through fourth step & fifth step I was refered Step one GDG version. My JCL got abend at 4th step and how I can restart my JCL Please let me know the answers. //STEP1 EXEC GDG1(+1) DISP=(NEW) //STEP2 EXEC GDG1(+2) DISP=(NEW) //STEP3 EXEC GDG1(+3) DISP=(NEW) //STEP4 EXEC GDG1(+4) DISP=(NEW) //STEP5 EXEC GDG1(+1) DISP=(OLD)
11 Answers HCL, IBM, L&T, TCS,
Where & How Do You Code Identifier In Jcl?
How many days does a job remain in spool
when can a job time-out occur? How to overcome that?
Explain the jcl exec statement?
i have a file which contains duplicates ? my requirement is to eliminate duplicates and these elminated duplicates should be moved to another file can any code this using sort ?
COBOL 
