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 |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: ECMLMF

Package: Event Capture

Routine: ECMLMF


Information

ECMLMF ;ALB/ESD - File Multiple Dates/Multiple Procedures - 29 AUG 97 08:51

Source Information

Source file <ECMLMF.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Event Capture 3 ENQ^ECMLMD  $$FILPRV^ECPRVMUT  $$PXUPD^ECUTL2  
VA FileMan 3 FILE^DICN  ^DIE  ^DIR  
Kernel 2 ^%ZTLOAD  $$NOW^XLFDT  

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
Event Capture 1 ECMLMD  

Entry Points

Name Comments DBIA/ICR reference
EN ;- Entry point to file selected patients and procedures
ENQ
GETNODS ;- Get procedure node and patient node for processing
FILREC ;- Create record in #721 and file fields
LOCKHD
FILRECQ
SETARRY ;- Set local arrays with procedure and patient data for filing
BADFLDS(ECRS) ; - Validation checks on fields to be set in "PCE" node
PCE ;- More validation checks on fields to be set in "PCE" node
PCEQ
MSG ;- Message displayed so error message can be read on screen
PROCDT ;;2
PROC ;;3
REAS ;;5
VOL ;;7
DFN ;;2
ORDSEC ;;4
IO ;;5
CLIN ;;6
DX ;;8
AO ;;10
ENV ;;11
IR ;;12
SC ;;13
ELIG ;;14
MST ;;15
HNC ;;16
CV ;;17
SHAD ;;18

External References

Name Field # of Occurrence
^%ZTLOAD EN+22
FILE^DICN LOCKHD+2, LOCKHD+20, LOCKHD+31
^DIE LOCKHD+11, LOCKHD+38, PCE+41, PCE+42
^DIR EN+13, MSG+2
ENQ^ECMLMD GETNODS+10
$$FILPRV^ECPRVMUT LOCKHD+14
$$PXUPD^ECUTL2 LOCKHD+23
$$NOW^XLFDT PCE+42

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"No patient data found. No patient record(s) have been filed."
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !!,"You have selected the following patients for filing:",!
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !?5,I_". ",$P($G(^TMP("ECMPTIDX",$J,I)),"^",3)
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+11
Function Call: WRITE
  • Prompt: !,"Exiting option...no patients filed.",!
  • Line Location: EN+14
Function Call: WRITE
  • Prompt: !!,"These patients will be sent to the background for filing.",!
  • Line Location: EN+21
Function Call: WRITE
  • Prompt: !,"Queued as Task #",ZTSK,!
  • Line Location: EN+23
Routine Call
  • DIE
  • Line Location:
    • LOCKHD+11
    • LOCKHD+38
    • PCE+41
    • PCE+42
Routine Call
  • DIR
  • Line Location:
    • EN+13
    • MSG+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ECH - [#721] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(721 LOCKHD+19, LOCKHD+30
^EC(725 - [#725] SETARRY+5, PCE+21
^ECD - [#724] LOCKHD+34
^ECH - [#721] LOCKHD, LOCKHD+6, FILRECQ, PCE+6
^ECH(0 FILREC+4, LOCKHD+1
^TMP("ECMPIDX" EN+3, GETNODS+7, GETNODS+8, LOCKHD+28, LOCKHD+29
^TMP("ECMPTIDX" EN+3, EN+9, EN+10, GETNODS+4, GETNODS+5, GETNODS+6
^TMP("ECPLST" ENQ!

Label References

Name Line Occurrences
$$BADFLDS LOCKHD+37
ENQ EN+3, EN+14
FILREC GETNODS+9
FILRECQ LOCKHD+4, LOCKHD+6
LOCKHD LOCKHD
MSG EN+3, EN+14, EN+24
PCE LOCKHD+39
PCEQ PCE+3, PCE+4, PCE+5, PCE+7
SETARRY LOCKHD+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA FILREC+2~, LOCKHD+5*, LOCKHD+34*
DA(1 LOCKHD+19*, LOCKHD+20, LOCKHD+30*, LOCKHD+31
DD LOCKHD+2!, LOCKHD+19!, LOCKHD+30!
DIC FILREC+2~, LOCKHD+2*, LOCKHD+3!, LOCKHD+19!, LOCKHD+20*, LOCKHD+21!, LOCKHD+30!, LOCKHD+31*
DIC("P" LOCKHD+19*, LOCKHD+30*
DIC(0 LOCKHD+2*, LOCKHD+19*, LOCKHD+30*
DIE FILREC+2~, LOCKHD+11*
DIR EN+2~, EN+13!
DIR("?" EN+12*
DIR("A" EN+11*
DIR("B" EN+11*
DIR(0 EN+11*, MSG+2*
DIRUT EN+2~, EN+14
DLAYGO FILREC+2~, LOCKHD+2*, LOCKHD+3!
DO LOCKHD+2!, LOCKHD+19!, LOCKHD+30!
DR FILREC+2~, LOCKHD+11*!, LOCKHD+38*, PCE+41*!, PCE+42*
DXS LOCKHD+16*, LOCKHD+17*, LOCKHD+18, LOCKHD+21!
DXSIEN LOCKHD+16*, LOCKHD+18*, LOCKHD+20, LOCKHD+21!
ECAO PCE+2~, PCE+10*
ECCV PCE+2~, PCE+34*
ECDSS PCE+2~, PCE+6*, PCE+7
>> ECDSSU LOCKHD+34
ECDXX GETNODS+2~, GETNODS+6!*, LOCKHD+23
ECDXX( LOCKHD+17, LOCKHD+18
ECELIG PCE+2~, PCE+23*
ECEV PCE+2~, PCE+13*
ECFIL LOCKHD+14*!
ECHNC PCE+2~, PCE+30*
ECI GETNODS+2~, GETNODS+3*, GETNODS+4*, GETNODS+5, GETNODS+6
ECIEN FILREC+2~, LOCKHD+5*, LOCKHD+6, LOCKHD+14, LOCKHD+19, LOCKHD+23, LOCKHD+30, LOCKHD+34, FILRECQ, PCE+6
ECIR PCE+2~, PCE+16*
ECJ GETNODS+2~, GETNODS+3*, GETNODS+7*, GETNODS+8, LOCKHD+28, LOCKHD+29
>> ECL LOCKHD+23, PCE+7
>> ECMODS LOCKHD+27*, LOCKHD+32*
ECMST PCE+2~, PCE+26*
ECNOGO FILREC+2~, FILREC+3*, LOCKHD+37*, LOCKHD+38, LOCKHD+39
ECNP PCE+2~, PCE+21*
ECNPP PCE+2~, PCE+21*
>> ECOUT LOCKHD+14
ECPCENOD PCE+2~
ECPRNOD GETNODS+2~, GETNODS+8*, SETARRY+3
ECPRR FILREC+2~
ECPRR( SETARRY+3*, SETARRY+5*
ECPRR("PCEPR" BADFLDS+6, PCE+3
ECPRR("PROC" SETARRY+5, PCE+21
ECPRR("PROCDT" LOCKHD+23, PCE+3
ECPRR("REAS" SETARRY+4*
ECPRR("VOL" PCE+5
ECPTNOD GETNODS+2~, GETNODS+5*, SETARRY+6
ECPTR FILREC+2~
ECPTR( SETARRY+6*, PCE+4
ECPTR("AO" PCE+9*, PCE+10
ECPTR("CLIN" LOCKHD+23, BADFLDS+3, BADFLDS+4
ECPTR("CV" PCE+33*, PCE+34
ECPTR("DFN" LOCKHD+23
ECPTR("DX" LOCKHD+23, BADFLDS+5
ECPTR("ELIG" PCE+23
ECPTR("ENV" PCE+12*, PCE+13
ECPTR("HNC" PCE+29*, PCE+30
ECPTR("IO" LOCKHD+36
ECPTR("IR" PCE+15*, PCE+16
ECPTR("MST" PCE+25*, PCE+26
ECPTR("SC" PCE+18*, PCE+19
ECPTR("SHAD" PCE+37*, PCE+38
ECREAS FILREC+2~, LOCKHD+37
ECRS BADFLDS~, BADFLDS+2*, BADFLDS+3*, BADFLDS+4*, BADFLDS+5*, BADFLDS+6*, BADFLDS+7
ECSC PCE+2~, PCE+19*
ECSHAD PCE+2~, PCE+38*
ECSND FILREC+2~, LOCKHD+34*, LOCKHD+35*, LOCKHD+36
>> ECU LOCKHD+14
>> ECU(1 PCE+7
I EN+2~, EN+8*, EN+9*, EN+10, FILREC+2~, FILREC+4*, LOCKHD*, LOCKHD+2, SETARRY+2~, SETARRY+3*
, SETARRY+5*, SETARRY+6*, PCE+2~, PCE+4*
J EN+2~, EN+17*
MOD LOCKHD+26~, LOCKHD+27*, LOCKHD+28*, LOCKHD+29, LOCKHD+32
MODIEN LOCKHD+26~, LOCKHD+29*, LOCKHD+31
PXUPD LOCKHD+23*!
U LOCKHD+19, LOCKHD+29, LOCKHD+30
X LOCKHD+2*, LOCKHD+3!, LOCKHD+20*, LOCKHD+31*
Y EN+2~, EN+14, FILREC+2~, LOCKHD+4, LOCKHD+5
ZTDESC EN+2~, EN+19*
ZTDTH EN+2~, EN+19*
ZTIO EN+2~, EN+19*
>> ZTREQ GETNODS+11*
ZTRTN EN+2~, EN+19*
ZTSAVE EN+2~
ZTSAVE( EN+17*
ZTSAVE("^TMP(""ECMPIDX"",$J," EN+18*
ZTSAVE("^TMP(""ECMPTIDX"",$J," EN+18*
>> ZTSK EN+23

Marked Items

Name Field # of Occurrence
$T(@I SETARRY+3, SETARRY+6
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 |  Local Variables |  Marked Items  | All