|
Here's a QEZSNDMSG example: 01 message-type pic x(10) value '*INFO '. 01 delivery-mode pic x(10) value '*BREAK '. 01 message-length pic s9(06) value 80 binary. 01 number-of-users pic s9(06) value 1 binary. 01 message-sent pic s9(06) value +0 binary. 01 function-request pic s9(06) value +0 binary. 01 show-display pic x(01) value 'N'. 01 message-queue-name pic x(20) value spaces. 01 name-type pic x(04) value '*USR'. 01 error-stuff. 05 bytes-provided pic s9(06) value +0 binary. 05 bytes-available pic s9(06) value +0 binary. 05 exception-id pic x(07) value spaces. 05 reserved pic x(01) value space. 05 exception-data pic x(50) value spaces. move 'This is a test message' to link-message move 'QSECOFR ' to link-userid call 'QEZSNDMG' using message-type delivery-mode link-message message-length link-userid number-of-users message-sent function-request error-stuff show-display message-queue-name name-type Terry Winchester Programmer/Analyst ________________________________ The Raymond Corporation terry.winchester@xxxxxxxxxxxxxxx
-----Original Message----- From: cobol400-l-bounces@xxxxxxxxxxxx [mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of Adrienne McConnon Sent: Thursday, October 12, 2006 10:08 AM To: cobol400-l@xxxxxxxxxxxx Subject: [COBOL400-L] which api's are in which service programs Hello, I want to call 2 API's from a COBOL program - QEXSNDMG and QWLCOBJL. The compile fails, I think because I am not binding the correct service program that contains the API. How do you find which service programs contain the API's you want to use? Thanks, Adrienne McConnon Vercuity - Parsippany NJ -- This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing list To post a message email: COBOL400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/mailman/listinfo/cobol400-l or email: COBOL400-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/cobol400-l.
Terry Winchester Programmer/Analyst ________________________________ The Raymond Corporation terry.winchester@xxxxxxxxxxxxxxx Confidentiality Notice: The preceding e-mail message (including any attachments) contains information that may be confidential, protected by applicable legal privileges, or constitute non-public information. It is intended to be conveyed only to the designated recipient(s). If you are not an intended recipient of this message, please notify the sender by replying to this message and then delete it from your system. Use, dissemination, distribution or reproduction of this message by unintended recipients is not authorized and may be unlawful.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.