VEJDWPB GET SCHED APPTS

TITLEVALUE
NAMEVEJDWPB GET SCHED APPTS
DESCRIPTIONThis will invoke SDA^VADPT. It returns those appointments which were kept
and all open future appointments depending upon the date range.
TAGAPPT
ROUTINEVEJDVST1
INPUT PARAMETERSSEQUENCE NUMBER1
INPUT PARAMETERDATA
DESCRIPTIONDATA = DFN ^ BEG ^ END ^ ALOC ^ FLG where

DFN = required - pointer to patient file (#2)
BEG = optional - FM date/time - return all scheduled appointments
greater than BEG
END = optional - FM date/time - return all scheduled appointments
up to END
ALOC = optional - name of location (file 44) or pointer to file 44
If present, then only appointments for that clinic returned
FLG = optional
0 - return all kept appts from BEG to today
1 - return future appts only
2 - return appts from 0 & 1

Date range takes precedence over FLG. So if you send BEG=DT-1,FLG=1 you
will get no appointments since BEG not greater than NOW
PARAMETER TYPELITERAL
REQUIREDYES
MAXIMUM DATA LENGTH90

INPUT PARAMETERSSEQUENCE NUMBER2
INPUT PARAMETERVECLIN
DESCRIPTIONVECLIN is a local array which contains a list of clinics to be used to
screen appointment list. Only those appointments in these clinics will
be returned.
VECLIN - optional - passed by reference
VECLIN(#) = clinic name or ien
PARAMETER TYPELIST
REQUIREDNO
MAXIMUM DATA LENGTH

INPUT PARAMETERSSEQUENCE NUMBER3
INPUT PARAMETERSCODE
DESCRIPTIONThis is a list of 3-digit stop codes used to screen appointments
returned. Only those clinic locations whose stop code is in this list
will be returned.

SCODE - optional - passed by reference
SCODE(#) = 3-digit stop code (lookup on C xref)
PARAMETER TYPELIST
REQUIREDNO
MAXIMUM DATA LENGTH

INPUT PARAMETERSSEQUENCE NUMBER4
INPUT PARAMETERVEDIV
DESCRIPTIONThis is a list of divisions to be used to screen appointments. Only
appointments in clinics for divisions in this list will be returned.

VEDIV - optional - passed by reference
VEDIV(#) = division name or ien
PARAMETER TYPELIST
REQUIREDNO
MAXIMUM DATA LENGTH

RETURN VALUE TYPEGLOBAL ARRAY
RETURN PARAMETER DESCRIPTIONData passed to broker via the global ^TMP("VEJD",$J,"APT",#)

Returns array(#) = p1^p2^p3^p4 in reverse chronological order.

p1 :== external appointment date/time
p2 :== external clinic name
p3 :== appointment date/time - fileman format
p4 :== pointer to Hospital Location file (44)

Error messages:
array(1) = "-1^Invalid patient DFN" if bad patient pointer
array(1) =" -1^No appointments found"
AVAILABILITYAGREEMENT
INACTIVE
CLIENT MANAGER
WORD WRAP ONTRUE
VERSION
SUPPRESS RDV USER SETUP
APP PROXY ALLOWED