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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ECMUTL1

Package: Event Capture

Routine: ECMUTL1


Information

ECMUTL1 ;ALB/ESD - Utilities for Multiple Dates/Mult Procs ;20 AUG 1997 13:56

Source Information

Source file <ECMUTL1.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Event Capture 4 CLIN^ECPCEU  ($$CHKDSS,$$ELGLST,$$INOUTPT,$$MULTELG,INOUTERR)^ECUTL0  ($$ASKCLASS,SETCLASS)^ECUTL1  (PDX,SDX)^ECUTL2  
VA FileMan 2 ^DIC  ^DIR  
Registration 1 2^VADPT  

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: 2

Package Total Caller Graph
Event Capture 2 ECED1  ECMLMN  

Entry Points

Name Comments DBIA/ICR reference
ASKPAT(ECPAT) ; Ask patient
SEL ;
ASKPATQ
ASKORD() ; Ask ordering section
ASKORDQ
PCEDAT(ECUNIT,ECSCR,ECPCE) ;get needed PCE data
ASKDX ;ask dx
CLINIC ;get associated clinic
VISIT ;ask visit info
CLIN(EC4,ECPCL) ;check for active associated clinic
MSGDX ;if ecout & essential data missing, display msg
MSGCLN ;if ecout & essential data missing, display msg
CLMSG ; Display classification questions error message
MSG1 ;Error message display
INOUT(ECPTIEN,ECARRY) ; Determine inpatient/outpatient status
ASKELIG(ECDSS,ECIO,ECPTIEN) ; Determine patient eligibility
REMOVE(ECPAT) ; Remove patient from selected patient list because required data missing

External References

Name Field # of Occurrence
^DIC SEL+4
^DIR ASKORD+10, CLINIC+7, MSG1+3
CLIN^ECPCEU CLIN+2
$$CHKDSS^ECUTL0 ASKELIG+16
$$ELGLST^ECUTL0 ASKELIG+19
$$INOUTPT^ECUTL0 INOUT+10
$$MULTELG^ECUTL0 ASKELIG+19
INOUTERR^ECUTL0 INOUT+11
$$ASKCLASS^ECUTL1 VISIT+10
SETCLASS^ECUTL1 VISIT+10
PDX^ECUTL2 ASKDX+3
SDX^ECUTL2 ASKDX+5
2^VADPT SEL+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Patient already selected. Please select another patient.",!
  • Line Location: SEL+12
Function Call: WRITE
  • Prompt: !!,"WARNING "_"[PATIENT DIED ON "_$P(VADM(6),U,2)_"] ",!!
  • Line Location: SEL+18
Function Call: WRITE
  • Prompt: !!?5,"You must enter an active clinic now.",!
  • Line Location: CLINIC+10
Function Call: WRITE
  • Prompt: !!?5,"You must enter an active clinic now.",!
  • Line Location: CLINIC+16
Function Call: WRITE
  • Prompt: !!,?5,"Please note that data cannot be sent to PCE for workload reporting"
  • Line Location: CLMSG+2
Function Call: WRITE
  • Prompt: !,?5,"unless the classification questions are answered.",!
  • Line Location: CLMSG+3
Function Call: WRITE
  • Prompt: !
  • Line Location: MSG1+4
Routine Call
  • DIC
  • Line Location:
    • SEL+4
Routine Call
  • DIR
  • Line Location:
    • ASKORD+10
    • CLINIC+7
    • MSG1+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ECD - [#724] PCEDAT+30
^ECJ - [#720.3] PCEDAT+47, PCEDAT+48, PCEDAT+49
^SC - [#44] PCEDAT+50, CLINIC+11
^TMP("ECMPIDX" VISIT+5
^TMP("ECMPTIDX" REMOVE+5!
^TMP("ECPAT" REMOVE+5!
^TMP("ECPLST" SEL+8, SEL+9, SEL+10, SEL+20*, REMOVE+3, REMOVE+4, REMOVE+5!

Label References

Name Line Occurrences
ASKDX PCEDAT+44
ASKORDQ ASKORD+11
ASKPATQ SEL+5
CLIN PCEDAT+51, CLINIC+12
CLINIC PCEDAT+43
CLMSG PCEDAT+45
MSG1 MSGDX+5, MSGCLN+5, CLMSG+4, REMOVE+7
MSGCLN PCEDAT+43
MSGDX PCEDAT+44
SEL SEL+13, SEL+14
VISIT PCEDAT+45

Naked Globals

Name Field # of Occurrence
^( VISIT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA CLINIC+4!
DFN SEL+16*, REMOVE+1~, REMOVE+2*, REMOVE+4, REMOVE+5
DIC ASKPAT+8~, SEL+2*
DIC("A" SEL+3*
DIC(0 SEL+2*
DIR ASKORD+7~, ASKDX+1~, CLINIC+1~, CLINIC+4!, MSG1+1~
DIR("?" CLINIC+6*
DIR("A" ASKORD+9*, CLINIC+6*, MSG1+2*
DIR(0 ASKORD+9*, CLINIC+6*, MSG1+2*
DIRUT ASKORD+7~, ASKORD+11, ASKDX+1~, CLINIC+1~, CLINIC+4!
DTIME SEL+19
DTOUT ASKPAT+8~, SEL+5, ASKPATQ, ASKDX+1~, CLINIC+1~, CLINIC+4!, CLINIC+8
DUOUT ASKPAT+8~, SEL+5, ASKPATQ, ASKDX+1~, CLINIC+1~, CLINIC+4!, CLINIC+8
EC4 PCEDAT+27~, PCEDAT+49*, PCEDAT+50, PCEDAT+51, PCEDAT+52, ASKDX+1~, ASKDX+2*, CLINIC+1~, CLINIC+5*, CLINIC+11*
, CLINIC+12, CLINIC+18, CLIN~
EC4N PCEDAT+27~, PCEDAT+50*, PCEDAT+52, CLINIC+1~, CLINIC+5*, CLINIC+11*, CLINIC+18
ECAO VISIT+1~, VISIT+4*
ECARRY INOUT~, INOUT+4*, INOUT+8*, INOUT+10
ECCLFLDS VISIT+1~, VISIT+10
ECCLFLDS("" VISIT+10
ECCLVAR VISIT+1~, VISIT+14*
ECCV VISIT+1~, VISIT+4*
ECDATA CLINIC+1~, CLINIC+11*
ECDSS ASKELIG~, ASKELIG+11*, ASKELIG+16
ECDT VISIT+2~, VISIT+7*
ECDUP ASKPAT+8~, SEL+1*, SEL+11*, SEL+13, SEL+14
ECDX ASKDX+1~, ASKDX+2*, ASKDX+4
ECDXN ASKDX+1~, ASKDX+2*, ASKDX+4
ECDXS ASKDX+1~, ASKDX+6
ECFLG VISIT+1~
ECHNC VISIT+1~, VISIT+4*
ECI ASKPAT+8~, SEL+1*, SEL+9*, SEL+10, REMOVE+1~, REMOVE+2*, REMOVE+3*, REMOVE+4, REMOVE+5
ECID CLINIC+1~, CLINIC+11*
ECIO ASKELIG~, ASKELIG+12*, ASKELIG+16
ECIR VISIT+1~, VISIT+4*
ECMD VISIT+2~, VISIT+5*, VISIT+6
ECMDT VISIT+1~
ECMDT( VISIT+6*
ECMDT(0 VISIT+7
ECMST VISIT+1~, VISIT+4*
ECORD ASKORD+7~, ASKORD+8*, ASKORD+12*, ASKORDQ
ECOUT PCEDAT+27~, PCEDAT+28*, PCEDAT+43, PCEDAT+44, PCEDAT+45, PCEDAT+46, PCEDAT+54, ASKDX+3, ASKDX+5, CLINIC+3
, CLINIC+8*, CLINIC+9, VISIT+10, VISIT+11, INOUT+2~, INOUT+3*, INOUT+12
ECPAT ASKPAT~, SEL+15*, VISIT+10, REMOVE~, REMOVE+2
ECPCE PCEDAT~
ECPCE( VISIT+14*
ECPCE("AO" PCEDAT+32*
ECPCE("CLIN" PCEDAT+32*, PCEDAT+46, PCEDAT+52*, PCEDAT+53*, ASKDX+2, CLINIC+18*, MSGCLN+2
ECPCE("CV" PCEDAT+34*
ECPCE("DX" PCEDAT+32*, ASKDX+4*, MSGDX+2
ECPCE("DXS" PCEDAT+35!, ASKDX+6*
ECPCE("ELIG" ASKELIG+19*, ASKELIG+20*
ECPCE("ENV" PCEDAT+33*
ECPCE("HNC" PCEDAT+33*
ECPCE("I/O" PCEDAT+38, CLINIC+2, VISIT+3, VISIT+10, MSGDX+1, MSGCLN+1, CLMSG+1, INOUT+10*, INOUT+11
ECPCE("IR" PCEDAT+32*
ECPCE("MST" PCEDAT+33*
ECPCE("SC" PCEDAT+33*
ECPCE("SHAD" PCEDAT+34*
ECPCID PCEDAT+27~, CLIN+1~
ECPCL PCEDAT+27~, PCEDAT+51, PCEDAT+52, PCEDAT+53, CLINIC+1~, CLINIC+3, CLINIC+5*, CLINIC+12, CLINIC+16, CLINIC+17
, CLIN~
ECPCRD PCEDAT+27~, CLIN+1~
ECPTIEN INOUT~, INOUT+5*, INOUT+10, ASKELIG~, ASKELIG+13*, ASKELIG+19
ECSC VISIT+1~, VISIT+4*
ECSCR PCEDAT~, PCEDAT+29*, PCEDAT+46, PCEDAT+47, PCEDAT+48, PCEDAT+49
ECSHAD VISIT+2~, VISIT+4*
ECUNIT PCEDAT~, PCEDAT+30, PCEDAT+48
ECUP ASKPAT+8~, SEL+14, SEL+16*, SEL+19*
ECX VISIT+1~, VISIT+4*
ECY VISIT+2~, VISIT+4*, VISIT+5*
ECZEC VISIT+1~, VISIT+4*
SEND PCEDAT+27~, PCEDAT+30*, PCEDAT+31*, PCEDAT+36, PCEDAT+38, CLINIC+2, VISIT+10, MSGDX+1, MSGCLN+1, CLMSG+1
U SEL+18, ASKDX+2, VISIT+5, VISIT+6
>> VADM(6 SEL+16, SEL+18
VAEL ASKELIG+10~
VAEL(1 ASKELIG+20
Y ASKPAT+8~, SEL+5, SEL+10, SEL+15, SEL+16*, SEL+20, ASKPATQ, ASKORD+7~, ASKORD+11, ASKORD+12
, ASKDX+1~, CLINIC+1~, CLINIC+10, CLINIC+11, MSG1+1~
YY ASKPAT+8~, SEL+16*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All