Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: SDECV

Package: Scheduling

Routine: SDECV


Information

SDECV ;ALB/SAT - VISTA SCHEDULING RPCS ;JAN 15, 2016

Source Information

Source file <SDECV.m>

Call Graph

Call Graph

Call Graph Total: 9

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  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

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

External References

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

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

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

Label References

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!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All