DSIYPO1 PPRC PRINT PC ORDER

TITLEVALUE
NAMEDSIYPO1 PPRC PRINT PC ORDER
DESCRIPTIONThis RPC gets the contents of a Procurement & Accounting Transactions
(file 442) entry, Control Point Activity (file 410) entry, selected
station data from the Admin. Activity Site Parameters (file 411)
entry, Vendor (file 440) entry, and selected User (file 200) data for
printing/faxing simplified and detailed purchase card orders for the
input purchase order number or IEN.
TAGPPRC
ROUTINEDSIYPO1
INPUT PARAMETERSSEQUENCE NUMBER1
INPUT PARAMETERDSIYPRC
DESCRIPTIONThis is the pointer to the Procurement & Accounting Transactions File
(file 442) for the requested purchase order number.
PARAMETER TYPELITERAL
REQUIREDNO
MAXIMUM DATA LENGTH30

INPUT PARAMETERSSEQUENCE NUMBER2
INPUT PARAMETERDSIYPON
DESCRIPTIONThis field may contain the long (XXX-XXXXXX) or short (XXXXXX) versions
of the Purchase Order Number (field #.01 in file 442).
PARAMETER TYPELITERAL
REQUIREDNO
MAXIMUM DATA LENGTH30

RETURN VALUE TYPEGLOBAL ARRAY
RETURN PARAMETER DESCRIPTIONReturns -1^error message if:
1) neither parameter 1 or 2 are sent
2) there is no entry found in file 442 - Procurement & Accounting
Transactions file
3) the user is not found in file 200 - New Person file
4) site parameters have not been established in file 411 - Admin.
Activity Site Parameters file
5) no entry is found in file 411 - Admin. Activity Site Parameters file
6) no vendor is present for this purchase order number in file 442 -
Procurement & Accounting Transactions file
7) no authorized buyer exists for this purchase order in file 442 -
Procurement & Accounting Transactions file

Returns array for printing/faxing a simplified or detailed purchase card
order in the following format:

array(n)="$$442-PO DATA$$"
array(n)=file or subfile #^file 442 ien or subfile ien^field^E or I^data
array(n...)=all 442 data fields in the above format
array(n)="$$410-2237 DATA$$" (file 410 entries are optional)
array(n)=file or subfile #^file 410 ien or subfile ien^field^E or I^data
array(n...)=all 410 data fields in the above format
array(n)="$$STATION$$"
array(n)=file 411 ien^field^E or I^data
array(n...)=selected file 411 data fields in the above format
array(n)="$$VENDOR$$"
array(n)=file 440 ien or subfile ien^field^E or I^data
array(n...)=all 440 data fields in the above format
array(n)="$$USER$$"
array(n...)=file 200 electronic signature and title of PA/PPM/AUTHORIZED
BUYER in format file 200 ien^field^E or I^data
array(n)="$$END$$"
AVAILABILITYAGREEMENT
INACTIVE
CLIENT MANAGER
WORD WRAP ONTRUE
VERSION
SUPPRESS RDV USER SETUP
APP PROXY ALLOWED