Using easytrieve to create smaller file to pass to excel.
Getting s0c7 with these statements:
(A "move" just moves them and works)
My question is - what are these fields? Are they binary?
If so, how do I define them in my ezt code to get the data that I can pass to excel - that's legible.
EFFECTIVE-DATE (FILEC) = EFFECTIVE-DATE (FILEB)
CHANGE-EFFECTIVE-DATE (FILEC) = CHANGE-EFFECTIVE-DATE (FILEB)
EXPIRATION-DATE (FILEC) = EXPIRATION-DATE (FILEB)
I tried defining FILEC fields to 4 P 0 and 7 N
defining as alpha didn't cause s0c7...
paste of the 3 fields (in hex):
---+----2---
---+----F---
---+----2---
-----------
...ÿ...ÿ...@
311D311D3107
F18FF18FF20C
From the cobol copybook:
15 EFFECTIVE-DATE PIC S9(07) COMP-3.
15 CHANGE-EFFECTIVE-DATE PIC S9(07) COMP-3.
15 EXPIRATION-DATE PIC S9(07) COMP-3.
Thanks for any ideas!
Getting s0c7 with these statements:
(A "move" just moves them and works)
My question is - what are these fields? Are they binary?
If so, how do I define them in my ezt code to get the data that I can pass to excel - that's legible.
EFFECTIVE-DATE (FILEC) = EFFECTIVE-DATE (FILEB)
CHANGE-EFFECTIVE-DATE (FILEC) = CHANGE-EFFECTIVE-DATE (FILEB)
EXPIRATION-DATE (FILEC) = EXPIRATION-DATE (FILEB)
I tried defining FILEC fields to 4 P 0 and 7 N
defining as alpha didn't cause s0c7...
paste of the 3 fields (in hex):
---+----2---
---+----F---
---+----2---
-----------
...ÿ...ÿ...@
311D311D3107
F18FF18FF20C
From the cobol copybook:
15 EFFECTIVE-DATE PIC S9(07) COMP-3.
15 CHANGE-EFFECTIVE-DATE PIC S9(07) COMP-3.
15 EXPIRATION-DATE PIC S9(07) COMP-3.
Thanks for any ideas!