|
View previous topic :: View next topic
|
| Author |
Message |
shilpa.khaire
New User
Joined: 21 Jul 2006
Posts: 39
Location: US
|
|
|
|
Hi!
I saw a few posts on this but cudnt resolve my error. I am getting the foll error while using CBLCNVRT:
*******B006 MACRO SYSTEM - PDS , ERROR IN MACRO FILE
1 %CBLCNVRT GLOSTAB COBOL I340
*******B076 REMAINDER OF STATEMENT IS IGNORED
*******B059 PREMATURE END OF FILE
*******A014 PREMATURE TERMINATION DUE TO PREVIOUS ERROR(S)
I am new to EzTRieve and was trying to convert Cobol copybook to Easytrieve. TRies using I320, I330 and I340 also. This copybook contains 2000 fields and I have to compare 2 difft files. SO please tell me a way to resolve this.
//STEP02 EXEC PGM=EZTPA00
//STEPLIB DD DSN=SYS3A.EZTP.CAIMAC,DISP=SHR
//EZTVFM DD UNIT=SYSDA,SPACE=(CYL,(5,5))
//SYSPRINT DD SYSOUT=*
//GLOSTAB DD DSN=NBK9OMA.GLOSSARY.TABLE,DISP=SHR
//PANDD1 DD DSN=SYS3A.EZTP.CAIMAC,DISP=SHR
//EASYPGM DD DSN=NBK9OMA.CBLCNVRT.OUTPUT,DISP=(NEW,CATLG),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=0),
// UNIT=SYSDA,SPACE=(CYL,(30,30),RLSE)
//SYSIN DD *
%CBLCNVRT GLOSTAB COBOL I340
/*
//
Thanks! |
|
| Back to top |
|
 |
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
| Quote: |
| This copybook contains 2000 fields |
think of the size of the program that would reference each field. |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix
|
|
|
|
Hello,
What happens if you run cblcnvrt using a small copybook as input?
Have you run cblcnvrt successfully on anything else?
Suggest you defer the very large copybook until you have the basic process working correctly.
Which cobol compiler is used on your system? |
|
| Back to top |
|
|
Douglas Wilder
Active User
.jpg)
Joined: 28 Nov 2006
Posts: 305
Location: Deerfield IL
|
|
|
|
| Is SYS3A.EZTP.CAIMAC a Panvelette library or a PDS/PDSE? PANDD1 uses it as a Panvelette library, STEPLIB uses the same file as a PDS or PDSE. PANDD1 is where the MACROs come from (if your macroes are in a PANLIB). Otherwise use AUDMACS DD instead of PANDD1. |
|
| Back to top |
|
|
shilpa.khaire
New User
Joined: 21 Jul 2006
Posts: 39
Location: US
|
|
|
|
| dick scherrer wrote: |
Hello,
What happens if you run cblcnvrt using a small copybook as input?
Have you run cblcnvrt successfully on anything else?
Suggest you defer the very large copybook until you have the basic process working correctly.
Which cobol compiler is used on your system? |
I am a beginner and trying to use CBLCNVRT for the first time. My intention of telling you that the copybook is huge is that it would be tedious to declare every variable in the program. So I wanted to use an Easytrieve copybook instead. Not sure how I should fine the version of my cobol compiler .
Thanks! |
|
| Back to top |
|
|
shilpa.khaire
New User
Joined: 21 Jul 2006
Posts: 39
Location: US
|
|
|
|
| Douglas Wilder wrote: |
| Is SYS3A.EZTP.CAIMAC a Panvelette library or a PDS/PDSE? PANDD1 uses it as a Panvelette library, STEPLIB uses the same file as a PDS or PDSE. PANDD1 is where the MACROs come from (if your macroes are in a PANLIB). Otherwise use AUDMACS DD instead of PANDD1. |
SYS3A.EZTP.CAIMAC is the library were i found the macro for CBLCNVRT.This was another doubt that I had? What does this PANDD! point to and what should it contain? What is AUDMACS?
Thanks! |
|
| Back to top |
|
|
Douglas Wilder
Active User
Joined: 28 Nov 2006
Posts: 305
Location: Deerfield IL
|
|
|
|
| Try replacing the DD Name PANDD1 with AUDMACS. If your macros are in a PDS/PDSE you will not use PANDD1. Your STEPLIB should reference load modules, your AUDMACS should reference source code for the macros. |
|
| Back to top |
|
|
shilpa.khaire
New User
Joined: 21 Jul 2006
Posts: 39
Location: US
|
|
|
|
Did try replacing PANDD! with AUDMACS. Still teh same problem. Given below is my cobol program. I ma getting a RC=12 for my bobol pgm too. Given below is the program
IDENTIFICATION DIVISION.
PROGRAM-ID. TESTPRG.
AUTHOR. XXXXXXXX.
INSTALLATION. SQWER.
DATE-COMPILED. JUN 2009.
************************************************
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
* SELECT IN-FILE ASSIGN TO IFILE.
DATA DIVISION.
FILE SECTION.
* FD IN-FILE
* RECORDING MODE IS F
* BLOCK CONTAINS 0 RECORDS
* LABEL RECORDS ARE STANDARD.
WORKING-STORAGE SECTION.
01 DW3CBV02-rec.
COPY DW3CBV02.
PROCEDURE DIVISION.
GOBACK.
Please let me know if you see any errors in this.
Thanks! |
|
| Back to top |
|
|
shilpa.khaire
New User
Joined: 21 Jul 2006
Posts: 39
Location: US
|
|
|
|
One more Doubt. I mentioned the opybook in the source program . But where in the JCL do I mention the copylib fof this copybook?
Thanks again for all ur help! |
|
| Back to top |
|
|
shilpa.khaire
New User
Joined: 21 Jul 2006
Posts: 39
Location: US
|
|
|
|
Resolved all other errors! But still left with the original erro:
*******B006 MACRO SYSTEM - PDS , ERROR IN MACRO FILE
1 %CBLCNVRT GLOSTAB COBOL I341
*******B076 REMAINDER OF STATEMENT IS IGNORED
*******B059 PREMATURE END OF FILE
*******A014 PREMATURE TERMINATION DUE TO PREVIOUS ERROR(S)
Please let me know how do I resolve this. Once this is done, I need to compare 2 files, a test file and prod file. So both have the same copybook and it has 2000 fields as mentioned earlier. So please let me know if there is an easier way of comparing all fields..instead of an IF stmt for each?
Thanks! |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix
|
|
|
|
Hello,
CBLCNVRT uses the output of a compile as the input.
That output will tell you the compiler version.
The job need not have the cobol copybook available (no need for the cobol copylib in the ezt step) - it is in the compile output.
There should be no reason to name a "maclib" in the steplib dd. . . MACLIBs do not contain load modules (when named properly) and datasets mentioned in the steplib must contain load modules. . .
As i mention before, suggest you work with a very small cobol definition until you have the basics working.
You can always open an issue with CA support and they can provide direction more quickly than the forum. |
|
| Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008
Posts: 8700
Location: Dubuque, Iowa, USA
|
|
|
|
| Quote: |
| There should be no reason to name a "maclib" in the steplib dd |
Shudder ... bad flashback. Had an applications programmer one time running a program with about 7 or 8 libraries concatenated to STEPLIB. Problem (1) was that the third library was a PROCLIB instead of a load library. Problem (2) was that the COBOL program issued a CALL to a module with the same name as a PROCLIB member name, and the PROCLIB came before the load library with the member in the concatenation.
The first problem wasn't much of an issue -- procedure libraries can be concatenated to load libraries just fine as long as the PROCLIB block size is less than or equal to the load library block size (which it was). The second problem caused an abend that I had not seen before and, good Lord willing and the creek don't rise, I'll never see again! The system does not like load modules that aren't load modules, apparently. Since it was 9 years ago I forget the exact abend code but it took a batch of digging to uncover what the problem was. |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix
|
|
|
|
Hello,
Do you have cblcnvrt working now?
d |
|
| Back to top |
|
|
|
|
