How can we know that cobol program is using report file or
simple file....?
Answers were Sorted based on User's Feedback
Answer / bobby
Report Composer uses the AFTER ADVANCING phrase.
There is also a compiler option ADV/NOADV which tells that
this is report file.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / ashok
In addition to answer #1, if you want identify that by
looking at the JCL, then file format of FBA or VBA also
means that its a report file.
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / jagan
Ashok, do we have a variable block attribute for a REPORT
file. As far as i have heard there is only FBA for a REPORT
file.
| Is This Answer Correct ? | 0 Yes | 1 No |
If the program uses the simple file then the statement used
to write into that is "WRITE REC-NAME".
If the program uses the report file then the statement used
to write into that is "GENERATE REC-NAME".
| Is This Answer Correct ? | 0 Yes | 2 No |
When would you use in-line perform?
Can printer files (having 133 characters) be of variable length?
I need to compare two VSAM files, both having 'number' as key. If there is a matching record, write the data into another VSAM file. How will it be possible.
what is difference bt COND, REGION & TIME parameters at JOB & EXEC. give an exp.
How to remove the spaces at end of each record in the output file Via COBOL program? note: The file has a VB length
here is my compile and link edit steps in a jcl //COMPILE1 JOB (3CUS,S),'CCDM TEST' //STEPNAME EXEC PGM=IGYCRCTL,PARM='DYNAM,RENT,LIB,OBJECT, // OFFSET,APOST,OPTIMIZE',REGION=4096K //STEPLIB DD DSNAME=PM7351.TEST2.COB,DISP=SHR //SYSIN DD DSNAME=PM7351.TEST2.COB(PGM1),DISP=SHR //SYSUT1 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT2 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT3 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT4 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT5 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT6 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT7 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSPRINT DD SYSOUT=* //SYSLIN DD DSNAME=&&LOAD,DISP=(MOD,PASS),UNIT=SYSDA, // SPACE=(10,(10,10)),DCB=BLKSIZE=400 //LKED EXEC PGM=IEWL,REGION=1024K //SYSPRINT DD SYSOUT=A //SYSLIB DD DSN=PM7351.TEST2.LOADLIB,DISP=SHR // DD DSN=PM7351.TEST2.COB(PGM1),DISP=SHR //SYSLMOD DD DSN=PM7351.TEST2.LOADLIB, // DISP=SHR //SYSUT1 DD UNIT=SYSDA,DCB=BLKSIZE=1024,SPACE=(CYL,(1,1)) //SYSTERM DD SYSOUT=* //SYSLIN DD DSN=&&LOAD,DISP=(OLD,DELETE) //SYSIN DD DUMMY i am getting IEW2013I 0F08 NO MEMBER NAME WAS SPECIFIED. MODULE WAS SAVED USING TEMPNAM1. could any one tell me the resolution for this..?
Which division and paragraphs are mandatory for a COBOL program?
How to delete the records of a dataset through cobol programme?We should not use jcl utilitities like IDCAMS.
what is the maximum error code in mainframe
The disposition parameter in the jcl is share ( DISP+SHR ) and the program opens file in extend mode what will happen?
COMPUTE X = A * B - C * D and COMPUTE X = (A * B) - (C * D) (a) Are not the same (b) Are same (c) Syntactically wrong (d) Will yield a run time error
What is the difference between PIC 9.99 and 9v99 in COBOL?
0 Answers SwanSoft Technologies,