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
- 19856 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 the purpose of dd dummy statement?
in catalog procedure i have step1 dd dsn=filea dd dsn=fileb dd dsn=filec ur concatenaning all the files. but i need to override fileb with file 2 ? can anyone give the ans pls for ths
What is model dataset label(Model DSCB)?
What is job control language?
How to print the Output to SPOOL using MSGCLASS and SYSOUT ?
My JCL contains four steps //STP1 A(+1), DISP = NEW //STP2 A(+2), DISP = NEW //STP3 A(+3), DISP = NEW //STP4 A(+1), DISP = OLD STP3 was abended and I want restart my JCL from STP3 onwards & what are the precaution I want to take & what are the changes I need to make. Pls let me know.
Can you execute a PROC from another PROC?
How do you submit JCL via a Cobol program?
Can we change the LIMIT of GDG?
How to resolve the error "WER488A JOIN CAPACITY EXCEEDED" I am using SYNCSORT with JOINKEYS to compare 2 files. I am Getting error - > WER488A JOIN CAPACITY EXCEEDED There are 2 files to be compared with about 2 million records each. LRECL is 3665. Can somebody give a pointer as to how to resolve this problem? I am using SYNCSORT with JOINKEYS to compare 2 files. I am Getting error - > WER488A JOIN CAPACITY EXCEEDED There are 2 files to be compared with about 2 million records each. LRECL is 3665. Can somebody give a pointer as to how to resolve this problem?
What is order of searching of the libraries in a JCL?
Is acct parameter mandatory?
COBOL 
