Answer Posted / http://quotesandsms.com

//STEP080 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SORTIN DD DSN=DIWQ.CP000000.BUAT.FFB.HBUS.SUMM,
// DISP=OLD
//REPORTFL DD DSN=DIWQ.CP000000.BUAT.FFB.HBUS.GLRPT.TST,
// DISP=(OLD,CATLG,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(10,15),RLSE),
// DCB=(LRECL=104,RECFM=VBA,BLKSIZE=0)
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL FNAMES=REPORTFL,FTOV,
HEADER1=(05:'OBS',
08:4X,
12:'BRK-GRCA-CODE',
25:4X,
29:'BRK-GLP-ACCOUNT',
44:4X,
48:'TOTAL-BALANCE',
61:43X),
HEADER2=(05:99X)
OUTREC FIELDS=
(05:1X,
06:SEQNUM,2,ZD, ==> SEQ-
NUM

08:6X,
14:8,7, ==> BRK-GRCA-
CODE

21:11X,
32:1,7, ==> BRK-GLP-
ACCOUNT

39:9X,
48:15,16,ZD,EDIT=(SIIIIIIIIIIIT.TT),SIGNS=
(,-),

64:40X)

I HAVE A VB BLOCK WHICH IS USED AS INPUT IN COBOL CONATINING SOME RECORDS CAN I CHANGE THE FILE FROM VB TO FB?

2541

---

what is “Cond= even” and “Cond=only”?

1291

---

what is use of disp parameter in dd statement?

1085

---

A dd statement consists of 4 fields. Name them?

1406

---

what sort card you will use to copy the data from one dataset to another dataset?

1194

---

How can an in-stream dataset be terminated?

1327

---

What are s0c1, s0c4, s0c5, s0c7 and socb?

1157

---

What is the use of disp parameter?

1123

---

How to remove the spaces at end of each record in the output file Via COBOL program? note: The file has a VB length ----TRY

1360

---

Explain the function of dd disp parameter?

1099

---

What is the difference between run mode and addressing mode?

1226

---

How would you understand error(execution phase)?

1230

---

What is the function of //cntl statement?

1321

---

What is jcl in mainframe, and how many types of jcl statements are there for a job?

1173

---

what happens when COND is coded in JOB statement and when COND is coded inside EXEC statement?

1277

---