Hi,
i am trying to read signed data from Line sequential file, AFAIK, the input file contains values in ASCII encoding. Here are some sample lines of values from the input file -
0000002010060000000000000BALANCF/BF000000021088000000000000000000000000000000000
0000002010060000000000365BALANCF/BF0000000016110p0000000000000000000000000000000
0000002010060000000000401BALANCF/BF000000869180000000000000000000000000000000000
0000002010060000000010106BALANCF/BF0000000007000p0000000000000000000000000000000
0000002010060000000010111BALANCF/BF0031387071823q0000000000000000000000000000000
0000002010060000000010112BALANCF/BF0119483000000p0000000000000000000000000000000
0000002010060000000010113BALANCF/BF0057370886190w0000000000000000000000000000000
0000002010060000000010401BALANCF/BF000292706685240000000000000000000000000000000
The 14 digits after 'BF' constitutes the signed values i.e.0119483000000p (-ve), 0057370886190w (-ve), 00029270668524 (+ve) etc.
existing program defines a file to read values from the input-
FD FILEA LABEL RECORDS STANDARD.
01 FILA.
02 SRC PIC 999.
02 BTC PIC 999.
02 YY PIC 9999.
02 MM PIC 99.
02 DD PIC 99.
02 ACF PIC X.
02 DEP PIC 99.
02 LOC PIC 999.
02 ACC PIC 9(5).
02 VOU PIC X(10).
02 BAM PIC S9(12)V99.
02 PNO PIC 9(5).
02 FIL PIC X(26).
But it's generating compile time error -
PP 5724-V62 IBM COBOL for AIX 3.1.0 in progress ...
LineID Message code Message text
28 IGYGR1512-E A signed data item without the "SIGN IS SEPARATE" clause
was found in a file definition for a file with
"ORGANIZATION LINE SEQUENTIAL". Execution results are
unpredictable.
28 IGYGR1213-I The "LABEL" clause was processed as comments for this
file definition.
Same message on line: 43
Messages Total Informational Warning Error Severe Terminating
Printed: 3 2 1
End of compilation 1, program P41053, highest severity: Error.
Return code 8
Please suggest what to do. my queries-
1. what is the explanation of the E-level message?
2. Is it actually any rule? or I am missing some compiler options?
i am trying to read signed data from Line sequential file, AFAIK, the input file contains values in ASCII encoding. Here are some sample lines of values from the input file -
0000002010060000000000000BALANCF/BF000000021088000000000000000000000000000000000
0000002010060000000000365BALANCF/BF0000000016110p0000000000000000000000000000000
0000002010060000000000401BALANCF/BF000000869180000000000000000000000000000000000
0000002010060000000010106BALANCF/BF0000000007000p0000000000000000000000000000000
0000002010060000000010111BALANCF/BF0031387071823q0000000000000000000000000000000
0000002010060000000010112BALANCF/BF0119483000000p0000000000000000000000000000000
0000002010060000000010113BALANCF/BF0057370886190w0000000000000000000000000000000
0000002010060000000010401BALANCF/BF000292706685240000000000000000000000000000000
The 14 digits after 'BF' constitutes the signed values i.e.0119483000000p (-ve), 0057370886190w (-ve), 00029270668524 (+ve) etc.
existing program defines a file to read values from the input-
FD FILEA LABEL RECORDS STANDARD.
01 FILA.
02 SRC PIC 999.
02 BTC PIC 999.
02 YY PIC 9999.
02 MM PIC 99.
02 DD PIC 99.
02 ACF PIC X.
02 DEP PIC 99.
02 LOC PIC 999.
02 ACC PIC 9(5).
02 VOU PIC X(10).
02 BAM PIC S9(12)V99.
02 PNO PIC 9(5).
02 FIL PIC X(26).
But it's generating compile time error -
PP 5724-V62 IBM COBOL for AIX 3.1.0 in progress ...
LineID Message code Message text
28 IGYGR1512-E A signed data item without the "SIGN IS SEPARATE" clause
was found in a file definition for a file with
"ORGANIZATION LINE SEQUENTIAL". Execution results are
unpredictable.
28 IGYGR1213-I The "LABEL" clause was processed as comments for this
file definition.
Same message on line: 43
Messages Total Informational Warning Error Severe Terminating
Printed: 3 2 1
End of compilation 1, program P41053, highest severity: Error.
Return code 8
Please suggest what to do. my queries-
1. what is the explanation of the E-level message?
2. Is it actually any rule? or I am missing some compiler options?