Routine: SCCVEDI1

Information

SCCVEDI1 ;ALB/RMO,TMP - Disposition Conversion cont.; [ 04/05/95 8:12 AM ]

Package	Total	Call Graph
Scheduling	11	UPD^SCCVDBU ENCCNV^SCCVEAP1 CHLD^SCCVEAP2 SET^SCCVEDI3 INCRTOT^SCCVEGU1 UPDREC^SCCVLOG GETERR^SCCVLOG1 DATA2PCE^SCCVPCE $$OTHERR^SCCVU2 EN^SCCVZZ $$REQ^SDM1A
VA FileMan	1	D^DIQ

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 3

Package	Total	Caller Graph
Scheduling	3	SCCVCST4 SCCVEDI SCCVEDI3

Entry Points

Name	Comments	DBIA/ICR reference
CON(SCCVEVT,DFN,SCDTM,SCCVDIS)	; Should conversion event be processed for disposition ; Input -- SCCVEVT Conversion event ; DFN Patient IEN ; SCDTM Visit date/time ; SCCVDIS Array of disposition clinics
EN(SCCVEVT,DFN,SCDTM,SCLOG)	; Entry point to convert a disposition ; Input -- SCCVEVT Conversion event ; 0=Estimate 1=Convert 2=Re-convert ; DFN Patient IEN ; SCDTM Visit date/time ; SCLOG Scheduling conversion log IEN [optional]
ENQ
ENC(SCOE,SCCV)	; Convert additional disposition data for the encounter ; $$GETDISP^SDVIST2 creates the encounter and seeds it with disp data ; Input -- SCOE Outpatient encounter IEN ; SCCV Conversion array ; Output -- None
ENCQ
DONE(DFN,SCDTM,SCECSTAT)	; Update disposition encounter conversion status ; Input -- DFN Patient IEN ; SCDTM Visit date/time ; SCECSTAT Encounter conversion status ; Output -- None

External References

Name	Field # of Occurrence
D^DIQ	EN+36
UPD^SCCVDBU	ENC+9, DONE+8
ENCCNV^SCCVEAP1	ENC+8
CHLD^SCCVEAP2	EN+50
SET^SCCVEDI3	EN+22
INCRTOT^SCCVEGU1	EN+30, EN+56
UPDREC^SCCVLOG	EN+62
GETERR^SCCVLOG1	EN+40
DATA2PCE^SCCVPCE	EN+53
$$OTHERR^SCCVU2	EN+37
EN^SCCVZZ	EN+30, EN+56
$$REQ^SDM1A	CON+30

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(9.4 - [#9.4]	EN+9
^DPT - [#2]	CON+9, EN+35, DONE+7
^PX(815 - [#815]	EN+14
^SC - [#44]	EN+14
^SCE - [#409.68]	CON+30, EN+53, ENC+6
^SD(404.91 - [#404.91]	EN+16
^XTMP("SCCV-ERR-"	EN+41*

Label References

Name	Line Occurrences
$$CON	EN+19
DONE	EN+59
ENC	EN+47
ENQ	EN+19, EN+24, EN+27, EN+33, EN+44, EN+55

Naked Globals

Name	Field # of Occurrence
^(	EN+14

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DFN	CON~, CON+9, EN~, EN+19, EN+22, EN+35, EN+39, EN+59, DONE~, DONE+6 , DONE+7
SCCL	EN+13~, EN+14*
SCCONS	EN+6~, EN+53
SCCONS("PKG"	EN+9*
SCCONS("SRCE"	EN+8*
SCCV	EN+6~, EN+22, EN+47, EN+50, ENC~
SCCV("ERR"	EN+24, EN+27, EN+37, EN+44
SCCV("NEW"	EN+27, ENC+7
SCCV("OE"	EN+33
SCCV("VST"	ENC+6, ENC+8
>> SCCVACRP	CON+18
SCCVDIS	CON~, EN+12, EN+19
SCCVDIS(	CON+22, EN+14*
SCCVDIS(0	CON+22, EN+16*
SCCVEVT	CON~, CON+24, CON+26, CON+28, EN~, EN+19, EN+22, EN+24, EN+30, EN+33 , EN+47, EN+53, EN+55
SCDATA	ENC+5~, ENC+8, ENC+9, DONE+5~, DONE+8
SCDATA(	ENC+6*
SCDATA(19	DONE+7*
SCDATA(901	ENC+7*
SCDIS0	CON+8~, CON+9*, CON+10, CON+11, CON+12, CON+13
SCDIV	CON+8~, CON+11, CON+22, EN+13~, EN+14
SCDTM	CON~, CON+9, CON+18, CON+30, EN~, EN+19, EN+30, EN+36, EN+39, EN+56 , EN+59, DONE~, DONE+6
SCE	EN+34~, EN+40
SCE("DATE"	EN+39*
SCE("DFN"	EN+39*
SCE("ENC"	EN+39*
SCE("VSIT"	EN+39*
SCECSTAT	CON+8~, CON+13*, CON+24, CON+26, CON+28, DONE~, DONE+7
SCERRIP	EN+34~, EN+40
SCERRIP(1	EN+35*
SCERRIP(2	EN+36*
SCERRIP(4	EN+38*
SCERRIP(5	EN+37*
>> SCERRMSG	EN+40
SCEST	EN+6~, EN+53, EN+56
SCIENS	DONE+5~, DONE+6*, DONE+7, DONE+8
SCLOG	EN~, EN+22, EN+40, EN+41, EN+50, EN+62, EN+63
SCOE	CON+8~, CON+12*, CON+30, EN+6~, EN+22, EN+30, EN+33, EN+38, EN+39, EN+41 , EN+47, EN+50, EN+53, EN+56, EN+62, ENC~, ENC+6, ENC+9
>> SCOEP	EN+53
>> SCTOT	EN+30, EN+56
>> SCTOT(	EN+42*
>> SCTOT("OK"	EN+63*
SCTYPE	CON+8~, CON+10*, CON+20
U	CON+10, CON+11, CON+12, CON+13, CON+30, EN+14, EN+16, EN+33, EN+35, EN+53 , EN+56, ENC+6, DONE+7
Y	CON+8~, CON+16, CON+18, CON+20, CON+22, CON+24, CON+26, CON+28, CON+30, CON+31 , EN+34~, EN+36*
Z	EN+13~, EN+14, EN+56

Customize PDF page

Package: Scheduling