DSSO PRINT SIMP/DTLD PC ORDER (4210)    REMOTE PROCEDURE (8994)

Name Value
NAME DSSO PRINT SIMP/DTLD PC ORDER
TAG PPRC
ROUTINE DSSOPRC
RETURN VALUE TYPE GLOBAL ARRAY
AVAILABILITY AGREEMENT
WORD WRAP ON TRUE
DESCRIPTION
This 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.  Use RPC DSSO PRINT PC ORDER to
return data for Prosthetics purchase card orders.
INPUT PARAMETER
  • DSSOPRC
    PARAMETER TYPE:   LITERAL
    MAXIMUM DATA LENGTH:   30
    REQUIRED:   NO
    SEQUENCE NUMBER:   1
    DESCRIPTION:   
    This is the pointer to the Procurement & Accounting Transactions File 
    (file 442) for the requested purchase order number.
    
  • DSSOPON
    PARAMETER TYPE:   LITERAL
    MAXIMUM DATA LENGTH:   30
    REQUIRED:   NO
    SEQUENCE NUMBER:   2
    DESCRIPTION:   
    This field may contain the long (XXX-XXXXXX) or short (XXXXXX) versions 
    of the Purchase Order Number (field #.01 in file 442).
    
RETURN PARAMETER DESCRIPTION
Returns -1^error message if:
 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)="$$TITLE LINE DATE/TIME$$^Aug 08, 2019@16:36:54"  $Horolog date 
             used as current date/time for title line
 array(n)="$$442-PO DATA$$"
 1) neither parameter 1 or 2 are sent
 array(n)=file or subfile #^file 442 ien or subfile ien^field^E or I^data
 array(n...)=a subset of all 442 data fields in the above format
 *NOTE* - File 442 field #1.4, external format, includes a "-" and the 
             numeric portion of field #1 FCP (i.e. - "442^99999595,^1.4
             ^E^36X0160-910")
          File 442 field #5.2, external format, includes file 49 field 
             #1.5 Mail Symbol in parentheses (i.e. - "442^99999595,^5.2
             ^E^PROSTHETICS AND SENSORY AIDS(121)")
          File 442 field #8, external format, is pre-formatted for both
             Supply and Fiscal values (i.e. - "442^99999595,^8^E^SOURCE 
 2) there is no entry found in file 442 - Procurement & Accounting
             CODE: SUPPLY- COMB.2,4,6 FISCAL-3")
          File 442 field #46 PURCHASE CARD NUMBER external format has a 
             caret and the PURCHASE CARD NAME (file 440.5, field 10)
             appended
          File 442 field #99999999, external format, is the FCP/PRJ value 
             from file 420 field 27 FCP/PRJ that is to be displayed after 
             the BOC information.
 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...)=field #.01 TRANSACTION NUMBER in the above format
 Transactions file
 array(n...)=field 451 PURCHASE CARD RECORD
 array(n)="$$STATION$$"
 array(n)=file 411 ien^field^E or I^data
 array(n...)=selected file 411 and subfile 411.01 data fields in the above
             format
 array(n)="$$VENDOR$$"
 array(n)=file 440 ien or subfile ien^field^E^data - external values
             only
 array(n...)=selected 440 data fields in the above format
 array(n)="$$USER$$"
 3) the user is not found in file 200 - New Person file
 array(n...)=file 200 NAME (#.01) in format file 200 ien^field^E^data
             - external values only
 array(n...)="$$END$$"
 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 -