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

Package: Surgery

Routine: SROCMP1


Information

SROCMP1 ;BIR/MAM - PERIOPERATIVE OCCURRENCES ;02/02/06

Source Information

Source file <SROCMP1.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Surgery 2 BEG^SROCMP  ^SRSKILL  
VA FileMan 2 ^DIC  ^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
Surgery 1 SROMOR  

Entry Points

Name Comments DBIA/ICR reference
EN ; entry point
BY
SPEC
DEV
END ;
ATTND
ATSUR
MOAT ; ask for more attending surgeons
OCC
CAT
MOCAT ; ask for more occurrence categories
SP
MORE ; ask for more surgical specialties

External References

Name Field # of Occurrence
^%ZIS DEV+1
^%ZISC END+2
^%ZTLOAD DEV+2
^DIC SP, MORE+1
^DIR BY+2, SPEC+3, ATTND+3, ATSUR+1, MOAT+2, OCC+3, CAT+1, MOCAT+2
BEG^SROCMP DEV+3
^SRSKILL END+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BY+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SPEC+0
Function Call: WRITE
  • Prompt: !!,SRGRAMM_"designed to use a 132 column format.",!
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ATTND+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: ATSUR+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: OCC+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: CAT+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: SP+0
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1
Routine Call
  • DIC
  • Line Location:
    • SP
    • MORE+1
Routine Call
  • DIR
  • Line Location:
    • BY+2
    • SPEC+3
    • ATTND+3
    • ATSUR+1
    • MOAT+2
    • OCC+3
    • CAT+1
    • MOCAT+2

Label References

Name Line Occurrences
ATSUR ATTND+4
ATTND BY+4
CAT OCC+4
DEV EN+1, ATTND+5, OCC+5
END BY+2, SPEC+3, SPEC+4, DEV+1, DEV+2, ATTND+3, ATTND+4, OCC+3, OCC+4
MOAT MOAT+3
MOCAT MOCAT+3
MORE MORE+1
OCC BY+5
SP SPEC+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEV+1!*
%ZIS("A" DEV+1*
DIC SP!*, MORE+1!*
DIC("A" SP*, MORE+1*
DIC("S" SP*, MORE+1*
DIC(0 SP*, MORE+1*
DIR BY!, BY+2!, SPEC!, SPEC+3!, ATTND!, ATTND+3!, ATSUR!, ATSUR+1!, MOAT+1!, MOAT+2!
, OCC!, OCC+3!, CAT!, CAT+1!, MOCAT+1!, MOCAT+2!
DIR("?" BY+2*, SPEC+1*, SPEC+2*, ATTND+1*, ATTND+2*, OCC+1*, OCC+2*
DIR("A" BY*, BY+1*, SPEC*, ATTND*, ATSUR*, MOAT+1*, OCC*, CAT*, MOCAT+1*
DIR("B" BY+1*, SPEC*, ATTND*, OCC*
DIR("S" CAT+1*, MOCAT+2*
DIR(0 BY*, SPEC*, ATTND*, ATSUR*, MOAT+1*, OCC*, CAT*, MOCAT+1*
DTIME END+1
>> DTOUT BY+2, SPEC+3, ATTND+3, ATSUR+1, MOAT+2, OCC+3, CAT+1, MOCAT+2
>> DUOUT BY+2, SPEC+3, ATTND+3, ATSUR+1, MOAT+2, OCC+3, CAT+1, MOCAT+2
IO("Q" DEV+1!, DEV+2!
IOF BY, SPEC, END+2, ATTND, OCC
IOP DEV+1!
POP DEV+1!
>> SRATT EN+1*
>> SRBOTH EN+1, DEV
>> SRCT ATSUR+2*, MOAT+3*, CAT+2*, MOCAT+3*, SP+1*, MORE+1*
>> SRGRAMM DEV*, DEV+1
SRSEL EN+1~*, BY+3*, BY+4, BY+5
>> SRSOUT EN+1*, BY+2*, SPEC+3*, SPEC+4, DEV+1*, END+1, ATTND+3*, ATTND+4, ATSUR+1*, OCC+3*
, OCC+4, CAT+1*, SP*
>> SRSP EN+1*, ATSUR*, CAT*, SP*
>> SRSP( ATSUR+2*, MOAT+3*, CAT+2*, MOCAT+3*, SP+1*, MORE+1*
SRTN END+2!
>> X END+1*
>> Y BY+3, SPEC+4, ATTND+4, ATSUR+1, ATSUR+2, MOAT+2, MOAT+3, OCC+4, CAT+1, CAT+2
, MOCAT+2, MOCAT+3, SP, SP+1, MORE+1
>> ZTDESC DEV+2*
>> ZTRTN DEV+2*
>> ZTSAVE("SRBOTH*" DEV+2*
>> ZTSAVE("SRED" DEV+2*
>> ZTSAVE("SRINST" DEV+2*
>> ZTSAVE("SRINSTP" DEV+2*
>> ZTSAVE("SRSD" DEV+2*
>> ZTSAVE("SRSEL" DEV+2*
>> ZTSAVE("SRSP*" DEV+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All