Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Easytrieve - possible binary fields?

Status
Not open for further replies.

GJFNH

Programmer
May 19, 2010
4
US
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!
 
NEVER MIND!!
This was basically bad data on the input file. My appologies.
 
It is also best to confine a question to one help forum rather than posting to multiple forums. . .[wink]
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top