OPENMPE Archives

March 2005

OPENMPE@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:
Re: SIMPLE (?) cobol question
From:
Brian Donaldson <[log in to unmask]>
Reply To:
[log in to unmask]
Date:
Wed, 30 Mar 2005 15:01:11 EST
Content-Type:
text/plain
Parts/Attachments:
text/plain (23 lines) 
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.

ATOM RSS1 RSS2