DSIYV01 GET VENDOR

TITLEVALUE
NAMEDSIYV01 GET VENDOR
DESCRIPTIONReturns information for a vendor from the VENDOR file (#440)
TAGGET
ROUTINEDSIYV01
INPUT PARAMETERSSEQUENCE NUMBER1
INPUT PARAMETERSTN
DESCRIPTION3 digit station#
PARAMETER TYPELITERAL
REQUIREDYES
MAXIMUM DATA LENGTH

INPUT PARAMETERSSEQUENCE NUMBER2
INPUT PARAMETERVENDOR
DESCRIPTIONIEN for VENDOR file entry
PARAMETER TYPELITERAL
REQUIREDYES
MAXIMUM DATA LENGTH

INPUT PARAMETERSSEQUENCE NUMBER3
INPUT PARAMETERFLG
DESCRIPTION"MAIN"=Main, "CONT"=Contract/BOA Number, "TYPE"=Type of Ownership,
"SOC"=Socioeconomic Group, "SYN"=Synonyms, "REM"=Remarks
PARAMETER TYPELITERAL
REQUIREDYES
MAXIMUM DATA LENGTH4

RETURN VALUE TYPEARRAY
RETURN PARAMETER DESCRIPTIONRET = array containing -1^ERROR OR
file#:field#^field name^internal data^external data
AVAILABILITY
INACTIVE
CLIENT MANAGER
WORD WRAP ONTRUE
VERSION
SUPPRESS RDV USER SETUP
APP PROXY ALLOWED