Please give me the coding for converting VB to FB and FB to VB
Answer Posted / allu prakash
//STEP1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=SAS12D.G4662V00.TEST,DISP=SHR
//SORTOUT DD DSN=GGJ67D.TEST4,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,(10,10),RLSE),
// RECFM=FB,LRECL=10,DSORG=PS
//SYSIN DD *
OPTION VLSHRT
SORT FIELDS=COPY
INCLUDE COND=(89,1,CH,EQ,C'Y',AND,5,3,ZD,EQ,120)
OUTREC FIELDS=(8,2,PD,EDIT=(TTTTTTTTTT))
i hope this is the right to convert the VB TO FB..let me
know if the given answer is wrong......
| Is This Answer Correct ? | 3 Yes | 4 No |
Post New Answer View All Answers
The disp in the JCL is MOD and the program opens the file in OUTPUT mode. What happens ? The disp in the JCL is SHR and the pgm opens the file in EXTEND mode. What happens ?
Is it possible to left uncode disp?
how to do automated restart when a job abends?
How to alter the parameters for the existing gdg?
Explain how can return codes be tested before execution of a job step?
I want my job (careerride) to be executed in 1 minute and 2 seconds. How do I do that?
How do you access an uncatalogued dataset in a jcl?
//S10 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //CON DD DSN=VAR.INPUT1,DISP=SHR // DD DSN=VAR.INPUT2,DISP=SHR //OUT DD DSN=VAR.OUTPUT,DISP=(NEW,CATLG,DELETE), // SPACE=(CYL,(5,5)),UNIT=SYSDA //TOOLIN DD * * Splice the needed data from the two VB files together SPLICE FROM(CON) TO(OUT) ON(5,5,CH) WITHALL - WITH(12,5) WITH(22,20) VLENMAX /*
what operation is performed by job statement?
How can unused space allocation be returned to the system when a dataset is closed?
I have 60 steps in the JCL and want to Execute Only First from PROC by overriding in JCL ?
How does jcl act on code(if you take a cobol program)?
what is the purpose of coding notify parameter in job statement?
Explain the purpose of the dd keylen parameter?
Differentiate between addressing mode and run mode.