Re: Offline PO creation

Sue,

We've got a process that populates POOFFL and then calls UAAUXFR to
process the file. We do this in XA R6. Works for us...

/* Parameters for calling UAAUXFR. */

DCL VAR(&URTNCD) TYPE(*CHAR) LEN(7) VALUE('Y') +

/* Return Code */

DCL VAR(&URTNCD) TYPE(*CHAR) LEN(7) VALUE(' ') /*
Return Code */
DCL VAR(&UPRCU) TYPE(*CHAR) LEN(1) VALUE('1') /*
Process all unprocessed ? */
DCL VAR(&UPRCE) TYPE(*CHAR) LEN(1) VALUE('0') /*
Reprocess processed errors ? */
DCL VAR(&UPRTPNE) TYPE(*CHAR) LEN(1) VALUE('0') /*
Print processed (no errors) */
DCL VAR(&UPRTPE) TYPE(*CHAR) LEN(1) VALUE('1') /*
Print processed error ? */
DCL VAR(&UPRTUNE) TYPE(*CHAR) LEN(1) VALUE('0') /*
Print unprocessed (no errors) ? */
DCL VAR(&UPRTUE) TYPE(*CHAR) LEN(1) VALUE('0') /*
Print unprocessed errors ? */
DCL VAR(&UCLRPNE) TYPE(*CHAR) LEN(1) VALUE('0') /*
Clear processed (no errors) ? */
DCL VAR(&UCLRPE) TYPE(*CHAR) LEN(1) VALUE('0') /*
Clear processed errors ? */
DCL VAR(&UCLRUNE) TYPE(*CHAR) LEN(1) VALUE('0') /*
Clear unprocessed (no errors) ? */
DCL VAR(&UCLRUE) TYPE(*CHAR) LEN(1) VALUE('0') /*
Clear unprocessed errors ? */

/* Process the PO offline file. */

CALL PGM(UAAUXFR) PARM(&URTNCD &UPRCU &UPRCE +

&UPRTPNE &UPRTPE &UPRTUNE &UPRTUE &UCLRPNE +

&UCLRPE &UCLRUNE &UCLRUE)


Regards,
Phil


-----Original Message-----
From: mapics-l-bounces@xxxxxxxxxxxx
[mailto:mapics-l-bounces@xxxxxxxxxxxx] On Behalf Of Sue Clement
Sent: 15 June 2011 23:58
To: mapics-l@xxxxxxxxxxxx
Subject: [MAPICS-L] Offline PO creation

Thank you for the suggestions. I already have a program written to
populate POOFFL. If we don't have ROBOT, is there any other way to
process it automatically?

Thanks again.

Sue C. Clement
Synapse Corporation
synapse@xxxxxxx
513.683.0100




This email message and its content are confidential and may contain proprietary or privileged information. If you are not the intended recipient, please notify the sender immediately, and do not read, copy, disclose, distribute or use the information in any way. Any views expressed in this message are those of the individual sender, except where the message states otherwise. SciLabware Ltd and its subsidiaries ("the company") does not accept responsibility for such views and opinions and this message should not be read as representing the views and opinions of the company. No liability shall attach to the company, except where the message states otherwise and the sender is authorised to make such a statement.

All orders are accepted and sales made subject to our Terms and Conditions of Sale (available upon request or from www.scilabware.com. No variation to these terms and conditions shall be made except when explicitly accepted in writing by SciLabware Ltd.

This e-mail has been swept for the presence of computer viruses, but no warranty is given that this e-mail and any attachments are virus free. You should undertake your own virus checking. The right to monitor e-mail communications through our networks is reserved by us.

Registered office: SciLabware Ltd., 4 Felsted Gardens, Ferry Street, London, E14 3BS. Registered in England & Wales no. 1631004