HP3000-L Archives

October 2002, Week 4

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Rich Trapp <[log in to unmask]>
Reply To:
[log in to unmask][log in to unmask] ,

WOULD YOU LIKE TO HAVE YOUR MESSAGE SEEN BY OVER
14.8 MILLION TARGETED PROSPECTS DAILY?

Below is all the information you will ever need to market your product or
service over the Internet! [...]49_23Oct200211:40:[log in to unmask]
Date:
Thu, 24 Oct 2002 12:20:02 -0600
Content-Type:
text/plain
Parts/Attachments:
text/plain (49 lines)
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 *

ATOM RSS1 RSS2