Thanks, 

The ARB stuff is not only way too much of a hammer, but also a heavy hammer
and I have very short in which I cannot lift him, leave alone the killer
blow... 

The definition of user entry screen field to X(09) followed by JUSTIFY RIGHT
and FILL LEADING "0" worked... 

Thanks a lot.. 

Raghu.. 

-----Original Message-----
From: [log in to unmask]
[mailto:[log in to unmask]]
Sent: Thursday, October 24, 2002 2:20 PM
To: [log in to unmask]; [log in to unmask]
Subject: RE: VPLUS: ARBTOSCREEN or SCREENTOARB


OOps..Mea Culpa!

Make that RIGHT JUSTIFY  ;).


How about just setting the forms file to RIGHT justify and zero fill on the
FINAL for this field, then use normal COBOL "MOVE <X(9) screen-field> TO
<working Storage PIC S9(9) COMP>.

This ARB stuff seems like way too much of a hammer.

Rich

   

Rich Trapp <mailto:[log in to unmask]>  

Consulting for Agilent Technologies, Loveland, Colorado.

Managed Business Solutions <http://www.thinkmbs.com/>  
200 South College Avenue 
Fort Collins, Colorado 80524-2811 
970.679.2221 (voice) 
970.669.3071 (fax) 



-----Original Message-----
From: Rao, Raghu [mailto:[log in to unmask]]
Sent: Thursday, October 24, 2002 11:46 AM
To: [log in to unmask]
Subject: VPLUS: ARBTOSCREEN or SCREENTOARB


Hi,

Can anyone give any examples for usage of ARBTOSCREEN or SCREENTOARB
commands under FORMSPEC in VPlus ?

I am in need of converting data entered by users online {could be 9(09) or
X(09)} into 9(09) COMP as DINIT.

Thanks
Raghu

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *