Ricky,
Below is an example of calling the program with one group# (order#).
Hopefully this will help.
fOSAARES0 uf a e k Disk
// off line header file
fOSABCPS0 uf a e k disk
// off line detail file
fOSACCPS0 uf a e k disk
// off line location
// ------------------------------------- ship program
D MapShip PR ExtPgm('ABAWXFR')
D Var1 7
D Var2 1
D Var3 10
//--------------------------------------------------------
D GrpNo S 10
D ShipNo S 7 inz('1')
D ShipSeq S 7 0 inz(0)
d Seven S 7 inz(' ')
We keep track of the group number in a file.
//-------------- get group# ---------------------------
Chain 'A' groupf;
GrpNo = '0000000000';
If %found(groupf);
gnumb += 1;
%subst(GrpNo:11- %len(%trim(%char(gnumb)))) = %char(gnumb)
update groupr;
endif;
//-------------- create header ------------------------
Clear FMXREAT;
MXNWCD = GrpNo; // Off-Ship Group ID
MXAJSS = '03'; // Off-Ship Type
MXNTCD = c6b9cd; // Off-Ship Number
MXAENB = CDAENB; // Company number
MXA3CD = CDA3CD; // Warehouse
MXDCCD = CDDCCD; // Internal header type
MXCVNB = CDCVNB; // Quote/order number
MXIVNB = %Dec(%Char(%Date(*Date):*CYMD0):7:0); //ship date
etc....................
fill in all other files per Mapics user guide. Then call.......
MapShip(Seven:UpdFlg:GrpNo:packit);
The group number you pass will be the one that is processed.
Regards,
From: "Thompson, Ricky" <rthompson@xxxxxxxxxxxxxxx>
To: "mapics-l@xxxxxxxxxxxx" <mapics-l@xxxxxxxxxxxx>
Date: 06/29/2011 08:18 AM
Subject: [MAPICS-L] Offline Orders Process
Sent by: mapics-l-bounces@xxxxxxxxxxxx
We are currently on release 6. But is there a way to only process one
offline order at a time? Can you pass it the token number that you want
to upload and only upload that one token?
Thanks
This e-mail transmission may contain confidential or legally privileged
information that is intended only for the individual(s) or entity(ies)
named in the e-mail address. If you are not the intended recipient or an
agent responsible for delivering it to the intended recipient, you are
hereby notified that any disclosure, copying, distribution, or reliance
upon the contents of this e-mail is strictly prohibited. If you have
received this e-mail transmission in error, please notify the sender
immediately, so that Endo can arrange for proper delivery, and then please
delete the message from your system. Thank you.
<Virus Scanned by Microsoft ForeFront Online Security>
_______________________________________________
This is the MAPICS ERP System Discussion (MAPICS-L) mailing list
To post a message email: MAPICS-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/mapics-l
or email: MAPICS-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at
http://archive.midrange.com/mapics-l.
This message and any files transmitted with it contain privileged and confidential information. This message is intended only for the use of the individual or entity to whom it is addressed. If you are not the intended recipient, or an employee or agent responsible for delivering this message to the intended recipient, you are hereby notified that any disclosure, dissemination, distribution, copying, or exploitation of, or taking any action in reliance on the contents of this message is strictly prohibited. If you have received this message in error, please notify the sender by email reply and delete this message from your system. Thank you.
midrange.com
