RE: What to map this to?

[Tom Daly <Tdaly@xxxxxxxxxxxxxx>]

I think the 'COMP' means binary.  But I'm reaching way back for this one.  4
bytes binary is 10I 0.

Can you DSPPFM and eyeball it?


Tom

 |  -----Original Message-----
 |  From: Robert Upshall [mailto:rupshall@psasoft.com]
 |  Sent: Wednesday, October 17, 2001 16:44
 |  To: rpg400-l@midrange.com
 |  Subject: What to map this to?
 |
 |
 |  I have a tape that I am being sent by a customer.  I have
 |  to input the file
 |  and convert it to our format.
 |
 |  I have a record layout from our customer but it appears the
 |  file was created
 |  with COBOL, we use RPG.
 |
 |  My problem is I'm not sure how to input one of the fields.
 |  The field is
 |  defined as positions 21-24, length 4, with a pic claus of
 |  PIC S9(9) COMP.
 |  My COBOL is very rusty, I have looked at or written a
 |  program since college
 |  and from my memory S9(9) would be a value of -999999999 to
 |  +999999999 ...
 |  how does this fit into a feild of lenght 4 and how do I
 |  read this value
 |  properly in RPG?
 |
 |
 |  Robert Upshall
 |  Professional Software of Amarillo
 |  (806) 358-8928
 |  rupshall@psasoft.com
 |
 |
 |  _______________________________________________
 |  This is the RPG programming on the AS400 / iSeries
 |  (RPG400-L) mailing list
 |  To post a message email: RPG400-L@midrange.com
 |  To subscribe, unsubscribe, or change list options,
 |  visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
 |  or email: RPG400-L-request@midrange.com
 |  Before posting, please take a moment to review the archives
 |  at http://archive.midrange.com/rpg400-l.
 |