How to handle negative values in greens creens?

deepaannjohn · New User Joined: 23 Feb 2006 Posts: 19 Location: Bangalore

Hi,
I have an IMS DC program which is reading from a table and displaying on the green screen. Thru green screen, new rows can be added and existing rows can be changed also.
There is an integer field in the table (UNIT-START-NO PIC S9(9) USAGE COMP.) which can have negative and positive values. How can I handle this in map and program?
Sample values:
UNIT_START_NO
0
0
300000000
0
-999999999

enrico-sorichetti · Posted: Tue Oct 25, 2011 1:52 pm

deepaannjohn · New User Joined: 23 Feb 2006 Posts: 19 Location: Bangalore

Tell me how to handle it in a diffeent colored screen

I have 7+ years of experience in IT programming btw :)though I did not work much in IMS DC

Also, I can handle it programmatically - no issues. But I want to know if there is any IMS DC provided routines / attributes for this ratehr than doing it programmatically.

Probably, if I rephrase it -
if I keep the field as Number on the MFS - I cant key in - or +ve. If I keep it as X in MFS, I need to handle it programmatically. So if there any attributes which might help like FILL or JUST = R

enrico-sorichetti · Posted: Tue Oct 25, 2011 1:59 pm

OMG...

an organization which up to now has dealt only with positive numbers

or a very structured organization with different programming groups and skills according to the sign of the entities dealt with

deepaannjohn · New User Joined: 23 Feb 2006 Posts: 19 Location: Bangalore

Tell me how to handle it in a diffeent colored screen

I have 7+ years of experience in IT programming btw :)though I did not work much in IMS DC

Also, I can handle it programmatically - no issues. But I want to know if there is any IMS DC provided routines / attributes for this ratehr than doing it programmatically.

Probably, if I rephrase it -
if I keep the field as Number on the MFS - I cant key in - or +ve. If I keep it as X in MFS, I need to handle it programmatically. So if there any attributes which might help like FILL or JUST = R

deepaannjohn · New User Joined: 23 Feb 2006 Posts: 19 Location: Bangalore

enrico-sorichetti · Posted: Tue Oct 25, 2011 2:23 pm

look here for the parameters You can specify for the field definition macros in an MFS <definition>
IMS V10 System Utilities Reference
publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DFSSURH0/CCONTENTS?SHELF=DFSSH0H1&DN=SC18-9968-00&DT=20070908224507

IIRC cannot be done <natively>
the NUMERIC <thing> invokes an hardware feature which prevents typing non numeric chars, does not guarantee the proper placement of the sign
( it just allows 0-9 + - )