HP3000-L Archives

January 1995, Week 3

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:
Rodolfo Lopez <[log in to unmask]>
Reply To:
Rodolfo Lopez <[log in to unmask]>
Date:
Wed, 18 Jan 1995 11:04:00 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (17 lines)
Thanks to all who responded. Several working solutions were recommended.
 
Special thanks to those who pointed out the existence of the HPEXTIN
intrinsic to convert numeric values in COBOL. This approach solved our
problem but at the same time gives us the opportunity to use many other
intrinsics we thought could not be invoked within COBOL.
 
HPEXTIN converts a byte array of ASCII digits into a SHORTINT,  REAL,
INTEGER, or  LONGREAL numeric value.
 
Even a sample program is included in the HP COBOL II/XL PROGRAMMER'S GUIDE
using the PAUSE intrinsic. We just modified the source to pass the value
through the INFO parameter.
 
Regards,
[log in to unmask]

ATOM RSS1 RSS2