DSSO OWL FILL WORK ORDER LIST

TITLEVALUE
NAMEDSSO OWL FILL WORK ORDER LIST
DESCRIPTIONThis RPC returns a list of OWL work orders for all statuses by date,
returning the most current ones first.
TAGEN
ROUTINEDSSOOWW
INPUT PARAMETERSSEQUENCE NUMBER1
INPUT PARAMETERDSSOSDT
DESCRIPTIONDate (.01 field) from the Prosthetic 2529-3 (664.1) file at which the work
order list begins; date must be in Fileman format
PARAMETER TYPELITERAL
REQUIREDYES
MAXIMUM DATA LENGTH7

INPUT PARAMETERSSEQUENCE NUMBER2
INPUT PARAMETERDSSOLDT
DESCRIPTIONDate (.01 field) of last Prosthetic 2529-3 record (#664.1) processed from
$$LAST RCD$$ entry in returned dataset; date must be in Fileman format
PARAMETER TYPELITERAL
REQUIREDNO
MAXIMUM DATA LENGTH7

INPUT PARAMETERSSEQUENCE NUMBER3
INPUT PARAMETERDSSOIEN
DESCRIPTION664.1 IEN of last work order processed on a previous run from the $$LAST
RCD$$ entry of the returned dataset
PARAMETER TYPELITERAL
REQUIREDNO
MAXIMUM DATA LENGTH15

RETURN VALUE TYPEGLOBAL ARRAY
RETURN PARAMETER DESCRIPTIONReturns a global array List[n].

The first line of the returned array will be in the following format:
List [0] = Purge Date ^ Create Date ^ descriptive information
Example: 3150123^3150123^DSS APAT Work Order List temp"

The format of the returned array will be as follows:
List[n] = p1^p2^p3^p4^p5^p6^p7^p8^p9^p10^p11^p12^p13
^p14^p15^p16^p17^p18^p19^p20^p21^p22^p23^p24

p1 = Suspense Date p13 = Requesting Official
p2 = Patient DFN p14 = Technician
p3 = Patient Name p15 = Source of Procurement
p4 = SSN (no dashes) p16 = NPPD Station #
p5 = SSN (dashes) p17 = NPPD Station Name
p6 = Type of Request p18 = Requesting Station #
p7 = Description p19 = Requesting Station Name
p8 = Status p20 = Receiving Station #
p9 = Suspense Record IEN p21 = Receiving Station Name
p10 = Prosthetics 2529-3 IEN p22 = Prosthetic Site Parameter IEN
p11 = HCPCS p23 = Date Created
p12 = Work Order # p24 = Date Required
p25 = Assigned By
p26 = Cancelled By
p27 = Completed By

The Last Record Processed will appear as:
List[n] = ^-pc 1 Text "$$LAST RCD$$"
^-pc 2 Date Last Processed
^-pc 3 IEN of last record processed

The end of the dataset will appear as:
List [n] = Text "$$END$$"

If an error occurs, the return will be:
List["E"] = Date^Date.Time^^Error in Suspense Grid: -1^xxxxxxxx
where xxxxxxxx=text of error message

Example:
3150124^3150122.235334^Error in Work Order List: -1^Start Date is
required.
AVAILABILITYAGREEMENT
INACTIVE
CLIENT MANAGER
WORD WRAP ONTRUE
VERSION
SUPPRESS RDV USER SETUP
APP PROXY ALLOWED