MQSeries.net :: View topic

pfaulkner · Posted: Mon Dec 16, 2002 3:10 pm Post subject: Copybook

I have a pretty straight forward COBOL copybook I need to import but I get the following errors..

[error 1] file 'C:\download\sandspf\FOFNISMC.CPY', line 2: syntax error

actual: Identifier expecting: IDENTIFICATION

Invalid level number for the line [ INVOICE-SUMMARY-RECORD ]

The Identifier [IS-CUST-NBR] is an 05 level with a pic field and has not been imported

The Identifier [IS-DIVISION] is an 05 level with a pic field and has not been imported

My Copybook looks like this...
01 FOFNISMC-COPYBOOK.
03 INVOICE-SUMMARY-RECORD.
05 IS-CUST-NBR PIC X(

.
05 IS-DIVISION PIC X(2).
05 IS-SERVICE-CODE PIC X(1).
05 IS-BILL-CYCLE PIC X(2).
05 IS-CURR-BILL-PAY PIC X(2).
05 IS-CURR-BILL-PAY-DATE PIC X(

.
05 IS-PREV-BILL-PAY PIC X(2).
05 IS-PREV-BILL-PAY-DATE PIC X(

.
05 IS-DR-LAST-PAYMENT-DATE PIC X(

.
05 IS-DR-LAST-PAYMENT-AMT PIC X(09).
05 FILLER PIC X(15).
05 IS-NUM-MONTHS PIC X(2).
05 IS-NUM-MONTHS-R REDEFINES IS-NUM-MONTHS PIC 9(2).
05 IS-DATA OCCURS 1 TO 12 TIMES
DEPENDING ON IS-NUM-MONTHS-R
INDEXED BY MONTHIDX.
10 IS-IND PIC X(2).
10 IS-TRANS-DATE PIC X(6).
10 IS-NBR PIC X(

.
10 IS-TOT-INVOICES-AMT PIC X(9).
10 IS-TOT-PAYMNTS-AMT PIC X(9).
10 IS-TOT-ADJUSTMNTS-AMT PIC X(9).
10 IS-TOT-PREV-BAL-AMT PIC X(9).
10 IS-AMT PIC X(9).
10 IS-CALLS-AMT PIC X(9).
10 IS-CRD-AMT PIC X(9).
10 IS-TAXES-AMT PIC X(9).
10 IS-CHARGES-AMT PIC X(9).
10 IS-TOT-LOCAL-ADJUSTMNTS-AMT PIC X(9).
10 FILLER PIC X(13).