DSSO GET VNDR CONTRACT NBRS

TITLEVALUE
NAMEDSSO GET VNDR CONTRACT NBRS
DESCRIPTIONThis RPC returns all contract numbers for the specified vendor from the
Vendor file (#440). Only active contracts are returned.

Input:
DSSO440 - IEN of Vendor file (#440)

Output:
Error Messages: "-1^"_error message or "0^"_error message
Successful Completion: For this vendor, external and internal values
of all fields in the Contract/BOA Number multiple are returned in
a global array:

RESULTS(1)="$$CONTRACT NUMBERS$$"
RESULTS(...)=
Mult IEN^.01E^.01I^.05E^.05I^1E^1I^2E^2I^3E^3I^4E^4I^5E^5I
RESULTS(n)="$$END$$"
TAGCONTRACT
ROUTINEDSSOUT3
INPUT PARAMETERSSEQUENCE NUMBER1
INPUT PARAMETERDSSO440
DESCRIPTIONInput:
DSSO440 - IEN of Vendor file (#440)
PARAMETER TYPELITERAL
REQUIREDYES
MAXIMUM DATA LENGTH30
RETURN VALUE TYPEGLOBAL ARRAY
RETURN PARAMETER DESCRIPTION
Output:
Error Messages: "-1^"_error message or "0^"_error message
Successful Completion: For this vendor, external and internal
values of all fields in the Contract/BOA Number multiple are
returned in a global array:

RESULTS(1)="$$CONTRACT NUMBERS$$"
RESULTS(...)=
Mult IEN^.01E^.01I^.05E^.05I^1E^1I^2E^2I^3E^3I^4E^4I^5E^5I
RESULTS(n)="$$END$$"

Only active contracts are returned by this RPC.
AVAILABILITYAGREEMENT
INACTIVE
CLIENT MANAGER
WORD WRAP ONTRUE
VERSION
SUPPRESS RDV USER SETUP
APP PROXY ALLOWED