Interested to Buy Any Domain ? << Click Here >> for more details...
Please give me the coding for converting VB to FB and FB to VB
- 3 Answers
- 19972 Views
- HP, I also Faced
- E-Mail Answers
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 |
What is condition checking in jcl? Is this possible?
what modification we need to do in jcl if we use sort in cobol? I mean whether we need to include temporary file used for sorting in assign statement?
What is the purpose and meaning of the REGION keyword and what JCL statement is it associated with?
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 send notification to multiple users through jcl???
I want to JCL sort for Non-COMP and COMP-3 fields SORT FIELDS=(1,5,A,6,11,A,12,11,A,19,1,A,20,1,A),FORMAT=BI,EQUALS Length of comp bytes is 11 bytes which start at 6byte and 12 byte considering 11 bytes in comp-3 is 6 bytes. Can anyone tell if the above sort work SORT FIELDS=(1,5,A,6,6,A,12,6,A,19,1,A,20,1,A),FORMAT=BI,EQUALS does not works OK
Explain how can the attributes of one sms dataset be copied to another dataset?
Can an individual step be restricted from using all the jobs allowed cpu time?
Is CPU time assigned to a JOB and JOBSTEP BOTH, by default ?
if we give TIME=0 how many sec that job/step
What is the purpose of the PARM keyword in the EXEC statement?
Does jcl support automatic restart?
COBOL 
