Routine: SCCVEDI3

Information

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

Source file <SCCVEDI3.m>

Package	Total	Call Graph
Scheduling	7	($$VISIT,SETSCCVT)^SCCVEAP2 RECNVT^SCCVEAP3 ENC^SCCVEDI1 INCRTOT^SCCVEGU1 $$CCREATE^SCCVU EN^SCCVZZ $$GETDISP^SDVSIT2

Package	Total	Caller Graph
Scheduling	1	SCCVEDI1

Name	Comments	DBIA/ICR reference
SET(SCCVEVT,SCLOG,DFN,SCOE,SCCV)	;Set variables ; Input -- SCCVEVT Conversion event ; SCLOG Scheduling conversion log IEN ; DFN Patient IEN ; Output -- SCOE Outpatient encounter IEN ; SCCV Conversion array: ; SCCV("EVT") Conversion event ; ("LOG") Scheduling conversion log IEN ; ("NEW") Outpatient encounter ; created by conversion flag ; 0 = no new encounter or visit ; 1 = new encounter and visit ; 2 = new visit only ; ("OE",0) Outpatient encounter 0th node ; ("DISP",0) Disposition log-in date/time 0th node ; ("ERR") Code for specific error, if any ; ("VST") Visit file IEN
SETQ

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	SET+20
^SCE - [#409.68]	SET+24, SET+33, SET+53, SET+59
^SCE("APAR"	SET+51, SET+53

Name	Line Occurrences
SETQ	SET+37, SET+43

Name	Field # of Occurrence
DFN	SET~, SET+20, SET+48
>> SCCONS	SET+32, SET+47
SCCV	SET~, SET+54~, SET+56, SET+64
SCCV("DISP"	SET+20*, SET+22, SET+24
SCCV("ERR"	SET+66*
SCCV("EVT"	SET+18*
SCCV("LOC"	SET+22, SET+23
SCCV("LOG"	SET+19*
SCCV("NEW"	SET+35, SET+37, SET+41, SET+55, SET+63
SCCV("OE"	SET+58, SET+59, SET+60, SET+66
SCCV("ORG"	SET+19*
SCCV("REF"	SET+61*
SCCV("VST"	SET+60, SET+63, SET+64, SET+66
>> SCCVDIS	SET+21
>> SCCVDIS(	SET+22
>> SCCVDIS(0	SET+23
SCCVEVT	SET~, SET+18, SET+27, SET+41, SET+43, SET+66
SCCVT	SET+46~, SET+47
>> SCDTM	SET+20, SET+41, SET+48, SET+61, SET+64
SCLOG	SET~, SET+19
SCOE	SET~, SET+24, SET+30, SET+32, SET+33, SET+35, SET+41, SET+45, SET+48*, SET+49 , SET+51, SET+53, SET+58, SET+59
SCOE0	SET+17~, SET+24, SET+32, SET+33, SET+35
SCOE00	SET+52~, SET+53*
SCOEC	SET+52~, SET+53*, SET+56
>> SCTOT	SET+41
>> SCTOT(	SET+49*
U	SET+22, SET+24, SET+35, SET+53, SET+60, SET+66