Answer / sathya

yes we can do using sort utility,
//SORTTA EXEC
PGM=SORT
//SYSIN DD *
SORT
FIELDS=COPY
OUTREC FIELDS=(1:5,4096),CONVERT
/*

//SORTIN DD DSN=…,DISP=SHR
//SORTOUT DD DSN=…
//SYSOUT DD
SYSOUT=*
//
The CONVERT control statement is used to convert the
File format from VB to FB.

Answer / ds

Yes. using IEBGENER utility we can copy this. But this is
not advisable until there's a specific requirement.

FB to VB
--------
FB rec length is X
VB rec length should be X+4

VB to FB
--------
VB rec length is X (Length indicated in JCL)
FB rec length is X-4
Note: But here in second case lot disk space will be wasted.

Without the idea of requirement and system design, one
can't say anything.

Thanks, DS.

Answer / atif

Use syncsort utility.
for FB to VB
OPTION COPY
OUTFIL BUILD=(5,1000),FTOV,VLTRIM=X'40'
simililarly for Vb to FB
OPTION COPY
OUTREC FIELDS=(1:5,4034),CONVERT

A file has dta in S9(09) COMP format. How do I move the data into a character field X(10)?

2 Answers  

---

How is a type of file defined in the jcl that executes the cobol program?

0 Answers  

---

What is TimeStamp, What is TimeStamp error and What is the Abend Code for TimeStamp Error ?

4 Answers   IBM,

---

what are the various stages of job processing?

0 Answers   IBM,

---

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.

3 Answers   Cognizant,

---

if we have a job consist of two steps and each step calling a proc having 10 steps each then how many steps are counted only 2 or 22(10+10+1+1)? can we have more than 255 steps in a single job?

5 Answers   Accenture,

---

which parameter is used to check the syntax of a jcl without executing it?

0 Answers   IBM,

---

how can we override data definitions in jcl. can any one give detailed example

3 Answers   TCS,

---

Explain about ISPFTTRC

1 Answers  

---

What is the error/SOC code if dd names are not sysut1 and sysut2 in IEBGENER?

1 Answers   CTS,

---

We have two PS files,want to compare those files and put the duplicate records in one file. Input file 1 contains(1,2,4,9,10) Input file 2 contains (1,4,5,11,12,14,16). Help me with jcl.

6 Answers  

---

how you can direct the data to spool using SYSOUT option?

0 Answers  

---