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 |  Label References |  Local Variables  | All
Print Page as PDF
Routine: ECBEP2B

Package: Event Capture

Routine: ECBEP2B


Information

ECBEP2B ;BIR/MAM,JPW-Batch Entry by Procedure (cont'd) ;1 May 96

Source Information

Source file <ECBEP2B.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 2 HOME^%ZIS  ^%ZTLOAD  
VA FileMan 1 ^DIR  

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 ECBEP2A  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point
STUFF ; set up info to stuff
NO ; do not stuff

External References

Name Field # of Occurrence
HOME^%ZIS STUFF+17
^%ZTLOAD STUFF+17
^DIR STUFF+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," Modifier: ",?22,"- ",MOD," ",$E($P(ECMOD(ECCPT,MOD),U),1,55)
  • Line Location: STUFF+6
Function Call: WRITE
  • Prompt: !,"for this group of patients."
  • Line Location: STUFF+7
Function Call: READ
  • Variable: ECYN
  • Timeout: DTIME
  • Line Location: STUFF+8
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: STUFF+10
Function Call: WRITE
  • Prompt: !!,"Enter <RET> to create the entries in the file. If you have made a mistake",!,"and do not wish to continue, enter NO.",!!,"Press <RET> to continue "
  • Line Location: STUFF+10
Function Call: WRITE
  • Prompt: !!,"I am now sending these procedures to background for filing."
  • Line Location: STUFF+12
Function Call: WRITE
  • Prompt: !!
  • Line Location: STUFF+13
Function Call: READ
  • Variable: ECYN
  • Timeout: DTIME
  • Line Location: NO+1
Function Call: WRITE
  • Prompt: !!,"If you do not want to enter the procedures selected, enter YES. If the",!,"procedures selected should be entered for the patients chosen, enter <RET>."
  • Line Location: NO+2
Routine Call
  • %ZIS
  • Line Location:
    • STUFF+17
Routine Call
  • DIR
  • Line Location:
    • STUFF+13

Label References

Name Line Occurrences
NO STUFF+11, NO+2
STUFF STUFF+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CNT EN+1*
DIR STUFF+13!
DIR("A" STUFF+13*
DIR(0 STUFF+13*
DTIME STUFF+8, STUFF+10, NO+1
DUZ STUFF+1
>> ECA STUFF+14*
>> ECCPT STUFF+2, STUFF+5, STUFF+6
>> ECD STUFF+14
>> ECDT STUFF+14
>> ECDUZ STUFF+1*
ECEC STUFF+17!
>> ECL STUFF+14
>> ECM STUFF+14
>> ECMOD( STUFF+5, STUFF+6
>> ECOUT STUFF+8*, STUFF+15*, NO+1*
>> ECPCE STUFF+14
>> ECPN STUFF+2
>> ECPTCD STUFF+2
>> ECS STUFF+14
>> ECYN STUFF+8*, STUFF+9*, STUFF+10, STUFF+11, NO+1*, NO+2*
IOF STUFF+2
MOD STUFF+5~*, STUFF+6
>> NATN STUFF+3
>> SYN STUFF+3
U STUFF+6
>> X STUFF+10*
>> ZTDESC STUFF+17*
>> ZTDTH STUFF+17*
>> ZTIO STUFF+17*
>> ZTRTN STUFF+17*
>> ZTSAVE("ECA" STUFF+16*
>> ZTSAVE("ECDUZ" STUFF+16*
>> ZTSAVE("ECEC*" STUFF+16*
>> ZTSAVE("ECELPT*" STUFF+16*
>> ZTSAVE("ECPRVARY*" STUFF+16*
>> ZTSAVE("ECPT*" STUFF+16*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All