Subject: | |
From: | |
Reply To: | Robert J. Schlosser |
Date: | Wed, 30 Mar 2005 14:15:09 -0600 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
Brian and Tom,
Remember that you also need to set the INFO-LENGTH before calling to the
maximum INFO string length, in this case 256.
The actual info string length will be returned.
Robert Schlosser
MPE-CSM
HP Certified Professional
Humana
(504) 219-8134
Brian Donaldson <[log in to unmask]>
Sent by: HP-3000 Systems Discussion <[log in to unmask]>
03/30/2005 02:01 PM
Please respond to
[log in to unmask]
To
[log in to unmask]
cc
Subject
Re: [HP3000-L] SIMPLE (?) cobol question
Hi Tom:
Your Cobol program should call the MPEiX intrinsic GETINFO thus:
WORKING-STORAGE SECTION.
01 INFO-STRING PIC X(256).
01 INFO-LENGTH PIC S9(04) COMP.
01 PARM PIC S9(04) COMP.
01 RESULT PIC S9(04) COMP.
PROCEDURE DIVISION.
...
...
CALL INTRINSIC "GETINFO" USING INFO-STRING,
INFO-LENGTH,
PARM
GIVING RESULT.
HTH,
Brian.
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
The information transmitted is intended only for the person or entity to which it is addressed and may contain CONFIDENTIAL material. If you receive this material/information in error, please contact the sender and delete or destroy the material/information.
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
|
|