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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SRONOR5

Package: Surgery

Routine: SRONOR5


Information

SRONOR5 ;B'HAM ISC/MAM - REPORT OF NON-O.R. PROCEDURES (1 PROVIDER) ; [ 07/27/98 2:33 PM ]

Source Information

Source file <SRONOR5.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Surgery 2 ^SROSTOP  $$DIV^SROUTL0  
Registration 1 DEM^VADPT  
VA Fileman 1 DD^%DT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SRONOR  

Entry Points

Name Comments DBIA/ICR reference
UTIL ; set ^TMP
SET ; set and print info
LOOP ; break procedure if greater than 50 characters
HDR
OTHER ; other operations

External References

Name Field # of Occurrence
DD^%DT SET+4, SET+7, SET+8
^SROSTOP HDR
$$DIV^SROUTL0 SRONOR5+2
DEM^VADPT SET+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,?35,"There were no procedures entered for the date range selected."
  • Line Location: SRONOR5+3
Function Call: WRITE
  • Prompt: !!,SRSDATE,?15,SRNM_" ("_VA("PID")_")",?64,SRSS,?116,SRST,!,SROP,?15,SRLOC_" ("_SRINOUT_")",?64,SROPS(1),?116,SRET
  • Line Location: SET+12
Function Call: WRITE
  • Prompt: !
  • Condition for execution: SRABORT=""
  • Line Location: SET+13
Function Call: WRITE
  • Prompt: ?64,SROPS(2)
  • Line Location: SET+13
Function Call: WRITE
  • Prompt: !,?64,SROPS(3)
  • Line Location: SET+13
Function Call: WRITE
  • Prompt: !,?64,SROPS(3)
  • Line Location: SET+13
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(132-$L(SRINST)\2),SRINST,!,?57,"SURGICAL SERVICE",?100,"REVIEWED BY:",!,?51,"REPORT OF NON-O.R. PROCEDURES",?100,"DATE REVIEWED:",!,?(132-$L(SRFRTO)\2),SRFRTO
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,"DATE",?15,"PATIENT (ID#)",?64,"SPECIALTY",?116,"START TIME",!,"CASE #",?15,"LOCATION (IN/OUT-PAT STATUS)",?64,"PROCEDURE(S)",?116,"FINISH TIME",!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,?(124-$L("PROVIDER: "_SRSURG)\2),"*** PROVIDER "_SRSURG_" ***"
  • Line Location: HDR+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ECC(723 SET+5
^SC - [#44] SET+6
^SRF - [#130] SRONOR5+2, SET+2, SET+5, SET+6, SET+7, SET+8, SET+9, SET+11, UTIL+1, OTHER+1
, OTHER+2
^SRF("AC" SRONOR5+2
^TMP("SR" SRONOR5+2!, SRONOR5+3, SRONOR5+4, UTIL+3*
^VA(200 - [#200] UTIL+1

Label References

Name Line Occurrences
HDR SRONOR5+3, SET+1
LOOP SET+10
OTHER SET+9
SET SRONOR5+4
UTIL SRONOR5+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN SET+2*
DTIME HDR+1
IOF HDR+2
IOSL SET+1
IOST HDR+1
>> LINE HDR+3*
>> LOOP LOOP+1*
>> M SET+10*, LOOP+1
MM SET+10!, LOOP+1*
MMM SET+10!, LOOP+1*
>> OPER SET+9*, OTHER+1*, OTHER+2
>> SR SET+2*, SET+3
>> SRABORT SET+11*, SET+13
>> SRED SRONOR5+2
>> SRET SET+8*, SET+12
>> SRFRTO HDR+2
>> SRHALT HDR
>> SRHDR SRONOR5+3*, HDR+1, HDR+4*
>> SRINOUT SET+3*, SET+12
>> SRINST HDR+2
>> SRLOC SET+6*, SET+12
>> SRLONG OTHER+1*, OTHER+2
>> SRNM SET+2*, SET+12
>> SROP SRONOR5+2*, SRONOR5+4*, SET+2, SET+5, SET+6, SET+7, SET+8, SET+9, SET+11, SET+12
, UTIL+1, UTIL+3, OTHER+1, OTHER+2
>> SROPER SET+9*, SET+10*, OTHER+1, OTHER+3*, LOOP+1*
>> SROPERS OTHER+1*, OTHER+2*, OTHER+3
SROPS SET+10!
SROPS( LOOP+1*
SROPS(1 SET+10*, SET+12
SROPS(2 SET+13
SROPS(3 SET+13
SROPS(4 SET+13
>> SRSD SRONOR5+2*, SRONOR5+4*, SET+4, UTIL+3
>> SRSDATE SET+4*, SET+12
>> SRSOUT SRONOR5+3*, SRONOR5+4, SET+1, HDR*, HDR+1*
>> SRSS SET+5*, SET+12
>> SRSSN SET+2*
>> SRST SET+7*, SET+12
>> SRSUR UTIL+1*, UTIL+2
>> SRSURG UTIL+2, HDR+4
>> VA("PID" SET+2, SET+12
>> VADM(1 SET+2
>> X SET+3*, HDR+1*
>> Y SET+4*, SET+6*, SET+7*, SET+8*, UTIL+1*
>> ZTQUEUED HDR
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All