DSSO PRINT RFQ/10-90 (4620)    REMOTE PROCEDURE (8994)

Name Value
NAME DSSO PRINT RFQ/10-90
TAG PRINT
ROUTINE DSSOFOPR
RETURN VALUE TYPE GLOBAL ARRAY
WORD WRAP ON TRUE
DESCRIPTION
This RPC returns data for viewing/printing the ADP FL 10-90 Request for 
Quote letter.
INPUT PARAMETER
  • DSSO6654
    PARAMETER TYPE:   LITERAL
    MAXIMUM DATA LENGTH:   15
    REQUIRED:   YES
    SEQUENCE NUMBER:   1
    DESCRIPTION:   
    IEN of the PROS LETTER TRANSACTIONS (#665.4) file to be printed
    
  • DSSO6699
    PARAMETER TYPE:   LITERAL
    MAXIMUM DATA LENGTH:   15
    REQUIRED:   YES
    SEQUENCE NUMBER:   2
    DESCRIPTION:   
    IEN of PROSTHETICS SITE PARAMETERS (#669.9) file
    
RETURN PARAMETER DESCRIPTION
Output:
                  HDR^"REQUEST FOR QUOTATION"
                  REQDATE^date the letter was first generated  (file 
                    665.4 field #11)
        $VENDOR - includes:   (all from VENDOR (#440) file)
                  NAME^data (mandatory)                NAME
                  ADDR1^data (if null, don?t return)  ORDERING ADDRESS1
                  ADDR2^data (if null, don?t return)  ORDERING ADDRESS2
                  ADDR3^data (if null, don?t return)  ORDERING ADDRESS3
                  ADDR4^data (if null, don?t return)  ORDERING ADDRESS4
                  CITY^data                           ORDERING CITY
  Error Messages:  DSSORET(0)="-1^"_error message or "0^"_warning message
                  STATE^data   (abbreviation)         ORDERING STATE
                  ZIP^data                            ORDERING ZIP CODE
                  PHONE^data                          VENDOR PHONE NUMBER
                  FAX^data                            FAX #
        $FACILITY includes: (all from file 669.9)
                  REQSERVICE^"Prosthetics Service"
                  NAME^data                           NAME
                  ADDR1^data (only address line)      STREET ADD1
                  CITY^data                           CITY
                  STATE^data   (abbreviation)         STATE^data   
  Successful Completion: returns a global array of sections containing 
                     If STATE is blank, CITY will be
                     NAME (file 4, field .01).
                  ZIP^data                            ZIP CODE
        $VETERAN:
                  NAME^data   format: LAST, FIRST     NAME from PATIENT 
                                                        file (#2)
        $BODY1:
                  Text for letter from template (one line for RFQ)
 
        $BODY1-END
      various data to be used in displaying an RFQ/10-90 letter.
        $BODY2:  (from file 665.2)
                  Text for letter from template (6 lines for RFQ)
        $BODY2-END
        $SIGNATURE
                  SIG^data                     CHIEF SIG BLOCK
                                                        (file 669.9)
                  TITLE^data                   SIGNATURE BLOCK TITLE
                                                        (file 669.9)
        $ITEMS
                  Each line in the ITEM multiple of the Pros Letter 
     DSSORET(n)= p1
                  Transactions file (#665.4) will be provided here.
                  If no ITEM exists in the multiple, "No items found."
                  will appear between $ITEM and $ITEM-END.
       $ITEMS-END
       $TRAILER
                  TRLR^FL 10-90 ADP
        where p1 = a line of data to be used in displaying the
                   RFQ/10-90 letter
      The sections include:
        $HEADER includes: