Routine: SDECV

Package	Total	Call Graph
VA FileMan	5	EN^DDIOL ^DIC ^DIE $$GET1^DIQ ^DIR
Scheduling	4	(,VPROV)^SDECALVR GETVISIT^SDECAPI4 (EN1,EN2)^SDECEKL ($$PRV,PAUSE)^SDECU

Package	Total	Caller Graph
Scheduling	1	SDECAPI4

Entry Points

Name	Comments	DBIA/ICR reference
CHKIN(BSDEVT,BSDCLN,BSDDT,APTN,DFN,BSDVSTN)	;EP; -- ask visit related check-in questions ; called by Scheduling Event driver ; user interface for 2 questions (clinic code and provider) ; Input variables: ; BSDEVT = type of event (4=checkin) ; BSDCLN = clinic ien ; BSDDT = appt date/time ; APTN = ien for appt under date multiple ; DFN = patient ien
VISIT(BSDCLN,BSDDT,APTN,DFN,BSDCC,BSDPROV,BSDOPT,BSDMSG,BSDVSTN,SDECC)	;EP; -- create visit
VSTEND
PP(VSTN,PROV)	;
VDATE(BSDEVT,BSDCLN,BSDDT,APTN,DFN,BSDCKO,BSDMSG)	;EP
RDT(X)	; -- reverse date
CLNCODE(CLINIC)	; -- asks user for clinic code
PROV(CLINIC)	; - asks user for visit provider
PRVIEN(Y)	; -- determines correct provider file to use
MSGADD(ERROR,STRING)	; -- put message string into array
MSG(DATA,PRE,POST)	; -- writes line to device
FAC(CLINIC)	; -- return facility location ien for clinic ; try institution field in file 44, then institution based on division ; then try user's division and make sure it is a PCC site
SERCAT(CLINIC,PAT)	;EP; -- returns service category for visit
VSTUPD(BSDCLN,BSDDT,APTN,DFN,BSDMSG)	; interactive updating of visit data during check-in edit ; if check in time different, update visit if there is one
PROVUPD	; will update provider on visit that was created earlier
HOSLUPD	; update hospital location on visit
SETVAR	; sets basic variables needed by API call
EN1	;CLEANUP
EN2	;CLEANUP

Name	Field # of Occurrence
EN^DDIOL	MSG+3, MSG+4
^DIC	PROV+7
^DIE	VSTUPD+13, PROVUPD+14, HOSLUPD+5
$$GET1^DIQ	PP+6, CLNCODE+4, CLNCODE+7, PROV+4, PROV+8, FAC+4, FAC+5, SERCAT+3, PROVUPD+9, SETVAR+3 , SETVAR+4
^DIR	CLNCODE+9
^SDECALVR	VSTUPD+23, PROVUPD+24
VPROV^SDECALVR	VISIT+58
GETVISIT^SDECAPI4	CHKIN+31, VISIT+38, VISIT+43
EN1^SDECEKL	VSTEND
EN2^SDECEKL	VSTEND
$$PRV^SDECU	PROV+4
PAUSE^SDECU	CHKIN+37

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ
^DIC(40.7 - [#40.7]	GET1^DIQ
^DG(40.8 - [#40.8]	GET1^DIQ
^SC - [#44]	GET1^DIQ
^AUPNVSIT - [#9000010]	Classic Fileman Calls
^AUPNVPRV - [#9000010.06]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVPRV - [#9000010.06]	PP+5, VSTUPD+12, VSTUPD+14, PROVUPD+8, PROVUPD+14
^AUPNVPRV("AD"	PP+4, VSTUPD+11, PROVUPD+7
^AUPNVSIT - [#9000010]	VISIT+49, PROVUPD+16, HOSLUPD+2, HOSLUPD+6
^AUPNVSIT("AA"	VDATE+17, VDATE+18, VSTUPD+7, VSTUPD+8
^DD(9000010.06	PRVIEN+1
^DIC(19 - [#19]	VISIT+28, VISIT+29
^DPT - [#2]	VISIT+26, SERCAT+2
^SC - [#44]	CHKIN+23, VISIT+21, VDATE+20, VSTUPD+4, SETVAR+1
^VA(200 - [#200]	PRVIEN+2

Name	Line Occurrences
$$CLNCODE	CHKIN+25
$$FAC	SETVAR+2
$$PP	VISIT+49
$$PROV	CHKIN+26, VSTUPD+16
$$PRVIEN	PROV+11
$$RDT	VDATE+17, VDATE+18, VSTUPD+7, VSTUPD+8
$$SERCAT	SETVAR+6
HOSLUPD	VISIT+22
MSG	CHKIN+36, PROV+9
MSGADD	VISIT+44, VISIT+59, VDATE+18, VSTUPD+8, VSTUPD+24, PROVUPD+25
PROVUPD	VISIT+22
SETVAR	CHKIN+30, VISIT+25
VISIT	CHKIN+34

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AICDHLIM	EN1+3!
APCD	EN1+9!
APCDAL	EN1+4!
APCDALVR	VSTUPD+17~, PROVUPD+17!
APCDALVR("APCDATMP"	VSTUPD+21, PROVUPD+21
APCDALVR("APCDPAT"	VSTUPD+19, PROVUPD+19
APCDALVR("APCDTOA"	VSTUPD+22, PROVUPD+22
APCDALVR("APCDTPRO"	VSTUPD+18, PROVUPD+18
APCDALVR("APCDTPS"	VSTUPD+22, PROVUPD+22
APCDALVR("APCDVSIT"	VSTUPD+20, PROVUPD+20
APCDAMN	EN1+8!
APCDAPDT	EN1+5!
APCDAPP	EN1+9!
APCDAPPT	EN1+5!
APCDAX	EN1+4!
APCDBEEP	EN1+9!
APCDCAT	EN1+4!
APCDCLN	EN1+4!
APCDCODT	EN1+5!
APCDDATE	EN1+4!
APCDDEFC	EN2+2!
APCDDEFL	EN2+2!
APCDDEFS	EN2+2!
APCDDEFT	EN2+2!
APCDDOB	EN1+6!
APCDDOD	EN1+6!
APCDDUZ	EN1+9!
APCDDUZ2	EN1+9!
APCDEIN	EN1+9!
APCDEMF	EN1+9!
APCDENV	EN1+9!
APCDEQX	EN1+4!
APCDEVM	EN1+5!
APCDEXIT	EN1+4!
APCDFLG	EN1+9!
APCDFV	EN1+4!
APCDHL	EN1+5!
APCDL	EN1+9!
APCDLDAT	EN1+8!
APCDLOC	EN1+4!
APCDLOOK	EN1+4!
APCDLPAT	EN1+8!
APCDLS	EN1+5!
APCDLVST	EN1+8!
APCDMNE	EN1+8!
APCDMOD	EN1+4!
APCDMODE	EN1+9!
APCDMPQ	EN1+4!
APCDNOCL	EN1+8!
APCDNOK	EN1+4!
APCDNOXV	EN1+8!, EN1+9!
APCDNRV	EN2+2!
APCDOCAT	EN1+9!
APCDODAT	EN1+9!
APCDOLOC	EN1+4!
APCDOPT	EN1+5!
APCDOTYP	EN1+9!
APCDOVRR	EN1+9!
APCDPARM	EN2+2!
APCDPAT	EN1+6!
APCDPROT	EN1+5!
APCDPVC	EN1+9!
APCDPVL	EN1+5!
APCDRV	EN1+6!
APCDRVOF	EN2+2!
APCDRVON	EN2+2!
APCDSEX	EN1+6!
APCDSITE	EN2+2!
APCDTACC	EN1+4!
APCDTBP	EN1+5!
APCDTCAT	EN1+4!
APCDTCLN	EN1+4!
APCDTIME	EN1+4!
APCDTLOC	EN1+4!
APCDTPCC	EN1+4!
APCDTPLT	EN1+9!
APCDTRM	EN2+2!
APCDTTYP	EN1+4!
APCDTVST	EN1+4!
APCDTYPE	EN1+4!
APCDVELG	EN1+5!
APCDVLK	EN1+9!
APCDVSIT	VDATE+15~, VDATE+17*, VDATE+18, EN1+4!
APCDX	EN1+9!
APTN	CHKIN~, CHKIN+10, CHKIN+23, CHKIN+34, VISIT~, VISIT+19, VISIT+21, VDATE~, VDATE+20, VSTUPD~ , VSTUPD+4, SETVAR+1
AUPNDAYS	EN1+7!
AUPNDOB	EN1+7!
AUPNDOD	EN1+7!
AUPNPAT	EN1+7!
AUPNSEX	EN1+7!
AUPNVSIT	VSTUPD+2~, VSTUPD+7*, VSTUPD+8, VSTUPD+11, VSTUPD+12, VSTUPD+14, VSTUPD+20, EN1+7!
BSDCC	CHKIN+24~, CHKIN+25*, CHKIN+34, VISIT~, VISIT+20, SETVAR+7
BSDCK	VDATE+15~, VDATE+20, VSTUPD+2~, VSTUPD+4, VSTUPD+7, VSTUPD+8
BSDCKO	VDATE~, VDATE+17, VDATE+18, VDATE+20
BSDCLN	CHKIN~, CHKIN+10, CHKIN+23, CHKIN+25, CHKIN+26, CHKIN+34, VISIT~, VISIT+19, VISIT+21, VDATE~ , VDATE+20, FAC+5, VSTUPD~, VSTUPD+4, VSTUPD+16, HOSLUPD+4, SETVAR+1, SETVAR+2, SETVAR+6, SETVAR+8
BSDDT	CHKIN~, CHKIN+10, CHKIN+23, CHKIN+34, VISIT~, VISIT+19, VISIT+21, VISIT+26, VDATE~, VDATE+20 , VSTUPD~, VSTUPD+4, SETVAR+1, SETVAR+9
BSDEVT	CHKIN~, CHKIN+9, VDATE~, VDATE+13
BSDMSG	CHKIN+24~, CHKIN+34, CHKIN+35, VISIT~, VDATE~, VSTUPD~
BSDMSG(	CHKIN+36, MSGADD+3*
BSDMSG(""	MSGADD+2
BSDOPT	VISIT~, VISIT+28
BSDOUT	CHKIN+28~, CHKIN+31
BSDOUT(0	CHKIN+33
BSDPROV	VISIT~, VISIT+49, VISIT+51, PROVUPD+2, PROVUPD+3, PROVUPD+8, PROVUPD+18
BSDR	VISIT+24~
BSDR("VIEN"	VISIT+32!, VISIT+41, VISIT+47
BSDRET	VISIT+24~, VISIT+38, VISIT+43
BSDRET(0	VISIT+39, VISIT+45
BSDVAR	CHKIN+28~, CHKIN+31, CHKIN+32!, VISIT+24~, VISIT+38, VISIT+43
BSDVAR("ADT"	VISIT+33*
BSDVAR("APCDAPPT"	VISIT+26*, VISIT+27!
BSDVAR("APCDOPT"	VISIT+28, VISIT+29
BSDVAR("APPT	DATE" , SETVAR+9*
BSDVAR("CALLER"	VISIT+31*
BSDVAR("CDT"	VISIT+34*, VISIT+57
BSDVAR("CLINI	C CODE" , SETVAR+7*
BSDVAR("CLN"	VISIT+35*
BSDVAR("FORCE	ADD" , VISIT+42*
BSDVAR("HOS L	OC" , SETVAR+8*
BSDVAR("NEVER	ADD" , CHKIN+29*
BSDVAR("PAT"	SETVAR+1*
BSDVAR("PROVIDER"	VISIT+36*
BSDVAR("SHOW	VISITS" , VISIT+30*
BSDVAR("SITE"	SETVAR+2*, SETVAR+3, SETVAR+4
BSDVAR("SRV C	AT" , VISIT+27, SETVAR+6*
BSDVAR("TIME	RANGE" , SETVAR+11*
BSDVAR("USR"	SETVAR+10*
BSDVAR("VISIT	DATE" , SETVAR+1, TYPE" , VISIT+37, SETVAR+3, SETVAR+4, SETVAR+5!
BSDVP	CHKIN+24~, CHKIN+26*, CHKIN+34
BSDVSTN	CHKIN~, CHKIN+33, VISIT~, VISIT+22, VISIT+45, VISIT+46, VISIT+47*, VISIT+49, VISIT+53, PROVUPD+7 , PROVUPD+16, PROVUPD+20, HOSLUPD+2, HOSLUPD+4, HOSLUPD+6
CLINIC	CLNCODE~, CLNCODE+4, CLNCODE+7, PROV~, PROV+4, PROV+8, FAC~, FAC+4, SERCAT~, SERCAT+3
CLNCAT	SERCAT+1~, SERCAT+3*, SERCAT+4
CODE	CLNCODE+1~, CLNCODE+4*, CLNCODE+7
DA	VSTUPD+2~, VSTUPD+10~, VSTUPD+11, PROVUPD+14, HOSLUPD+1~, HOSLUPD+4*
DATA	MSG~, MSG+3
DFN	CHKIN~, CHKIN+10, CHKIN+34, VISIT~, VISIT+19, VISIT+26, VISIT+49, VISIT+52, VDATE~, VDATE+17 , VDATE+18, VSTUPD~, VSTUPD+7, VSTUPD+8, VSTUPD+19, PROVUPD+16, PROVUPD+19, SETVAR+1, SETVAR+6
DIC	PROV+1~, PROV+3*, PROV+7!
DIC("A"	PROV+3*
DIC("B"	PROV+4*, PROV+5!
DIC("S"	PROV+6*
DIC(0	PROV+3*
DIE	VSTUPD+2~, VSTUPD+10~, VSTUPD+13, PROVUPD+14, HOSLUPD+1~, HOSLUPD+4*
DIR	CLNCODE+1~
DIR("?"	CLNCODE+8*
DIR("A"	CLNCODE+3*
DIR("B"	CLNCODE+7*
DIR(0	CLNCODE+3*
DR	VSTUPD+2~, VSTUPD+10~, VSTUPD+13, PROVUPD+14, HOSLUPD+1~, HOSLUPD+4*
DUZ	SETVAR+10
DUZ(2	FAC+6
ERROR	MSGADD~, MSGADD+3
FAC	FAC+3~, FAC+4, FAC+5, FAC+6*, FAC+8
FORMAT	MSG+1~, MSG+2*, MSG+3
FOUND	PP+1~, PP+2, PP+3, PP+5, PP+6, PP+7, PP+8, PROVUPD+5~, PROVUPD+6, PROVUPD+8* , PROVUPD+11
I	CHKIN+36~, MSGADD+1~, MSGADD+2, MSGADD+3, MSG+1~, MSG+2, MSG+4
IEN	PP+1~, PP+2, PP+4, PP+5, PP+6, PROVUPD+5~, PROVUPD+6, PROVUPD+7, PROVUPD+8, PROVUPD+9
MAW	VISIT+46!, PP+7!
PAT	SERCAT~, SERCAT+2
POST	MSG~, MSG+4
PRE	MSG~, MSG+2
PRIM	PP+1~, PP+2, PROVUPD+5~, PROVUPD+6, PROVUPD+9*, PROVUPD+14
PROV	PP~, PP+5
PRV	PP+1~, PROVUPD+5~
SDEC	VISIT+50!, VISIT+58
SDEC("CDT"	VISIT+57*
SDEC("PAT"	VISIT+52*
SDEC("PRO"	VISIT+51*
SDEC("TMP"	VISIT+54*
SDEC("TOA"	VISIT+56*
SDEC("TPS"	VISIT+55*
SDEC("VST"	VISIT+53*
SDECALVR	VSTEND!
SDECC	VISIT~
SDECC("ADT"	VISIT+33
SDECC("CDT"	VISIT+34
SDECC("CLN"	VISIT+35
SDECC("PROVIDER"	VISIT+36
SDECC("VISIT	TYPE" , VISIT+37
STRING	MSGADD~, MSGADD+3
U	CHKIN+36, VISIT+26, VISIT+49, PP+5, PROV+10, PRVIEN+1, PRVIEN+2, MSGADD+3, PROVUPD+8, PROVUPD+16
VPROV	VSTUPD+2~, VSTUPD+16~*, VSTUPD+18
VSTN	PP~, PP+3, PP+4
X	VSTEND!, RDT~, RDT+1, PROV+1~
XTLKHLIM	EN1+3!
Y	CLNCODE+1~, CLNCODE+2, CLNCODE+10, PROV+1~, PROV+2, PROV+8*, PROV+9, PROV+10, PROV+11, PRVIEN~ , PRVIEN+1, PRVIEN+2, EN1+2!

Customize PDF page

Package: Scheduling

Routine: SDECV

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: