DSSO PRINT PC ORDER (4206)    REMOTE PROCEDURE (8994)

Name Value
NAME DSSO PRINT PC ORDER
TAG PPCO
ROUTINE DSSOPPC
RETURN VALUE TYPE GLOBAL ARRAY
AVAILABILITY AGREEMENT
WORD WRAP ON TRUE
DESCRIPTION 
Gets the contents of a Prosthetics 1358 (file 664) entry along with 
Prosthetic site and vendor information and privacy statement, if
requested, for printing/faxing.
INPUT PARAMETER
  • DSSO664
    PARAMETER TYPE:   LITERAL
    MAXIMUM DATA LENGTH:   30
    REQUIRED:   NO
    SEQUENCE NUMBER:   1
    DESCRIPTION:   
    The pointer to PROSTHETICS 1358 file (#664).
  • DSSOPO
    PARAMETER TYPE:   LITERAL
    MAXIMUM DATA LENGTH:   30
    REQUIRED:   NO
    SEQUENCE NUMBER:   2
    DESCRIPTION:   
    Purchase Card Reference (field 7.5 in file 664).
  • DSSOPRI
    PARAMETER TYPE:   LITERAL
    MAXIMUM DATA LENGTH:   1
    REQUIRED:   NO
    SEQUENCE NUMBER:   3
    DESCRIPTION:   
    1=return Privacy statement
0 or null=no Privacy statement
RETURN PARAMETER DESCRIPTION 
Returns -1^error message if neither parameter 1 or 2 are sent or there is 
array(n)="$$VENDOR$$"
array(n...)=vendor name, address, phone/fax, and identifier numbers
If requested,
array(n)=$$TEMPORARY$$^The temporary address info of the veteran
array(n)=$$PERMANENT$$^The permanent address info of the veteran
array(n)=$$RESIDENTIAL$$^The residential address info of the veteran
array(n)="$$PRIVACY STATEMENT$$"
array(n)=privacy statement text
no entry found, or the patient, vendor or station are blank in file 664.
Returns array for printing/faxing a PO in the following format:
array(n)=file 664 ien or subfile ien^field^E or I^data
array(n...)=all 664 data fields in the above format
array(n)="$$STATION$"
array(n...)=station name, address, and other parameters from file 669.9
array(n)="$$STATE ABBREVIATION$$"
array(n)=STATE ABBREVIATION (#1) from file 5 STATE file