Interested to Buy Any Domain ? << Click Here >> for more details...
Please go thru the below points and let me know how to code
this.
1. Sort the input dataset for the condition : Starting
position is 37,length of the field is 13 based on character
and in the ascending order , starting from position 25
length of 12 ,character and in the ascending order. Use a
temporary dataset to hold the sorted file.
2. Use the temporary file created in the above step as the
input for the next step. The next step is to execute a
program and produce an output file. Use the temporary file
created in the above as work file 1 and the output of the
file to be created in this step work file 2.Also, pass a
parameter to the program that is to be executed in this
step. The parameter should have the current date in
YYYYMMDD format.
For the sake of convenience, you can use the below
Job Name : Sample1
Input DSN : PCABDT11.CABD.TEST.INPUT
Temporary DSN : Sort1
Output DSN : PCABDT11.CABD.TEST.OUTPUT
Program Name : SAMPLE
Thanks in Advance for your response.
- 2 Answers
- 4787 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / praveen kumar
Anju,,
IN your JCL, where are you using the wrkfile1(step1 output
file) in step2..
does it make any sense...
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / anju
//step1 exec pgm=sort
//sortin dd dsn= PCABDT11.CABD.TEST.INPUT,disp=shr
//sortout dd dsn=&&sort1, disp=(new,catlg,delete),
// unit=disk, space=(cyl(1,10),rlse),
// dcb=*.sortin
//sysin dd *
sortfields=(37,13,CH,A,25,12,CH,A)
/*
//sysout dd sysout=*
//sysprint dd sysout=*
//step2 exec pgm=sample,parm='2010/11/05'
//wrkfile2 dd dsn=PCABDT11.CABD.TEST.OUTPUT,
// disp=(new,catlg,delete),
// unit=disk, space=(cyl(1,10),rlse),
// dcb=*.sortin
//
| Is This Answer Correct ? | 0 Yes | 1 No |
In SPACE,what is directory,RLSE
What does a disposition of (NEW,CATLG,DELETE) mean?
Can we use two or more SYSPUNCH DD statements in a JCL for multiple unload (SYSREC00 & SYSREC01)..?
Is it possible to define dd statements as you want?
I have many files which i am receiving from client everyday. I have one step for every file to check for empty or not. Here client gives 30 files i need to check for every file for empty or not and i need to perform 30 steps. Can I do it in single step. Dynamically i need to change the File name in my step.
Why do you use a control card?
What are the parameter we cannot use in procedure?
wht r s722,s822,s122 and s222 abends pls reply fast
There is a procedure in A.B.PROCS(PROC1) (member name is PROC1) //PROCA... There is a call to a procedure PROCA from a JOB. //STEP01 EXEC PROCA ... Here "PROCA" in JOB refers to the actual PROC name or the member name of the PDS where this PROCA is stored.
how to concatenate datasets
i want to store 20 digits . how will u do it in cobol ?
How to execute step2,step1, step3 if step1,2,3 are in order
COBOL 
