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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: SRSCPT1

Package: Surgery

Routine: SRSCPT1


Information

SRSCPT1 ;BIR/MAM - MISSING CPTS (1 SPECIALTY) ;03/29/06

Source Information

Source file <SRSCPT1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Surgery 2 ^SROSTOP  ($$DIV,$$NODATA)^SROUTL0  
Registration 1 DEM^VADPT  
VA FileMan 1 D^DIQ  

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 SRSCPT  

Entry Points

Name Comments DBIA/ICR reference
SET ; set variables & print info
UTIL ; set ^TMP("SR",$J)
UT
HDR ; print heading
OPS ; print operations
LOOP ; break procedure if greater than 59 characters

External References

Name Field # of Occurrence
D^DIQ SET+6
^SROSTOP HDR+1
$$DIV^SROUTL0 SRSCPT1+2
$$NODATA^SROUTL0 SRSCPT1+5
DEM^VADPT SET+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$NODATA^SROUTL0()
  • Line Location: SRSCPT1+5
Function Call: WRITE
  • Prompt: !,SRSDATE,?18,SRSNM_" ("_VA("PID")_")",?60,SRSUR,!,SRTN
  • Line Location: SET+12
Function Call: WRITE
  • Prompt: !,"NON-O.R."
  • Condition for execution: SRFLG=3&(SRNON)
  • Line Location: SET+12
Function Call: WRITE
  • Prompt: !
  • Line Location: SET+14
Function Call: WRITE
  • Prompt: "-"
  • Line Location: SET+14
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,?(80-$L(SRINST)\2),SRINST,!,?23,"Completed Cases Missing CPT Codes",!,?(80-$L(SRTITLE)\2),SRTITLE,!,?(80-$L(SRFRTO)\2),SRFRTO
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,?(80-$L("Specialty: "_SRSPECN)\2),"Specialty: "_SRSPECN,!!,"Operation Date",?18,"Patient (ID#)",?60,"Surgeon/Provider",!,"Case #",!
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,?18,SROPS(1)
  • Line Location: OPS+2
Function Call: WRITE
  • Prompt: !,?18,SROPS(2)
  • Line Location: OPS+2
Function Call: WRITE
  • Prompt: !,?18,SROPS(2)
  • Line Location: OPS+2
Function Call: WRITE
  • Prompt: !,?18,SROPS(2)
  • Line Location: OPS+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRF - [#130] SRSCPT1+2, SET+2, SET+3, SET+5, SET+7, SET+8, SET+9, SET+10, SET+11, UTIL+1
, UTIL+2
^SRF("AC" SRSCPT1+2
^SRO(136 - [#136] UTIL+4
^TMP("SR" SRSCPT1+4, SRSCPT1+5, UT*
^VA(200 - [#200] SET+11

Label References

Name Line Occurrences
HDR SRSCPT1+4, SET+1
LOOP OPS+1
OPS SET+13
SET SRSCPT1+4
UTIL SRSCPT1+2

Naked Globals

Name Field # of Occurrence
^( SET+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CNT SET+8*, SET+9*, SET+13*
>> DFN SET+6*
DTIME HDR+2
>> EDATE SRSCPT1+3
>> ENDATE SRSCPT1+3*
IOF HDR+4
IOSL SET+1
IOST HDR+2
>> LINE SET+14*, HDR+5*
>> LOOP LOOP+1*
>> M OPS+1*, LOOP+1
MM OPS+1!, LOOP+1*
MMM OPS+1!, LOOP+1*
>> OP SET+8*, SET+9
>> SDATE SRSCPT1+3
SR SRSCPT1+4!
SR( SET+10*, SET+11
SR(0 SET+3*, SET+4, SET+6
>> SRFLG SET+4, SET+5, SET+12, UTIL+2, UTIL+3, HDR+3
>> SRFRTO HDR+4
>> SRHALT HDR+1
>> SRHDR SRSCPT1+4*, HDR+2
>> SRINST HDR+4
>> SRMISS UTIL+4*, UTIL+5
>> SRNON SET+2*, SET+4, SET+5, SET+11, SET+12, UTIL+1*, UTIL+2, UTIL+3
SROP SRSCPT1+4!
SROP( SET+9*, SET+13
SROP(1 SET+7*
>> SROPER SET+13*, OPS+1*, LOOP+1*
SROPS OPS+1!
SROPS( LOOP+1*
SROPS(1 OPS+1*, OPS+2
SROPS(2 OPS+2
SROPS(3 OPS+2
SROPS(4 OPS+2
>> SRSDATE SET+6*, SET+12
>> SRSDT SRSCPT1+2*, SRSCPT1+4*, UT
>> SRSEDT SRSCPT1+2
>> SRSNM SET+6*, SET+12
>> SRSOUT SRSCPT1+4*, SET+1, HDR+1*, HDR+2*
>> SRSPEC SET+4, SET+5
>> SRSPECN HDR+5
>> SRSSN SET+6*
>> SRSUR SET+11*, SET+12
>> SRTITLE HDR+3*, HDR+4
>> SRTN SRSCPT1+2*, SRSCPT1+4*, SET+2, SET+3, SET+5, SET+7, SET+8, SET+9, SET+10, SET+11
, SET+12, UTIL+1, UTIL+2, UTIL+4, UT
>> STARTDT SRSCPT1+3*
>> VA("PID" SET+6, SET+12
>> VADM(1 SET+6
>> X HDR+2*
>> Y SET+6*
>> ZTQUEUED HDR+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All