Please give me the coding for converting VB to FB and FB to VB
Answers were Sorted based on User's Feedback
Answer / sr
//STEP1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=SDS.OUTPUT.FBVB,DISP=SHR
//OUT1 DD DSN=SDS.OUTPUT.VBFB,
// DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,
// SPACE=(TRK,(5,5)),
// DCB=(RECFM=FB,LRECL=80)
//SYSIN DD *
OPTION COPY
OUTFILE FNAMES=OUT1,VTOF,OUTREC=(5,80)
/*
SDS.OUTPUT.FBVB is a VB file of Record length=
84
| Is This Answer Correct ? | 4 Yes | 1 No |
Answer / 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 |
Answer / harsha
Important point is VB file will have 4 bytes extra than
it's corresponding FB file.
The four bytes contain catalog information of the file.
| Is This Answer Correct ? | 2 Yes | 4 No |
how can u identify the db2 from jcl ?
What does the keyword DCB mean and what are some of the keywords associated with it?
What does the one advantange of using IEBUPDTE?????
How can a fb file convert to vb file using sort program?
//step#3 exec pgm = hkbc762 what is wrong with the syntax?
One dataset is creating in the step1 with LRECL of 133 and the same dataset is used in the next step in DISP=SHR mode, but while scanning the JCL the following error is thrwon. Please verify the below JCL $/SEPP030.PROVIDER DD DSN=Z1225BT.F5750PG9.F5910PRV.QC#A6868 //ERRORRPT DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, --ERRORRPT DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=&DISNCD,UNIT=&DELQ, -- DISP= (NEW,CATLG,DELETE),UNIT=DELQ, // SPACE=(TRK, (30,15),RLSE), // DCB=&DCB2 -- DCB= (PPG.METMODEL,BLKSIZE=0,LRECL=133,RECFM=FB) $/SEPP030.ERRORRPT DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT //SEPP040 EXEC PGM=FILEAID,COND= (0002,EQ,SEPP030) //SYSPRINT DD SYSOUT=* //SYSLIST DD SYSOUT=* //DD01 DD DSN=SYSCMN.PROD.CCLIB (F5910EP1),DISP=SHR $/SEPP040.DD01 DD DSN=Z1225BT.TEST.CCLIB (F5910EP1) E1 - DSS20791E - DATA SET 'Z1225BT.F5910EPP.ERRORRPT.AOUTPUT' HAS AN LRECL OF 133 COULD NOT BE OPENED BECAUSE THE CODED LRECL WAS 80. // DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, -- DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=SHR $/ DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT please find the error code in the above mentioned lines and please suggest me about the error and the solution for that.
How many types of parameters are used in JCL and what are mandatory parameters of JOB statement.
What is Uncatalog dataset? How can we access/use them?
Can a temporary dataset be converted to permanent dataset and vice-versa in the middle of a job ?
whats the difference between empty and noempty of GDG?
I have Job A and Job B. I want to trigger Job B from Job A. Please advise.
what is the control cards?