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

Package: Surgery

Routine: SROALSS


Information

SROALSS ;BIR/ADM - ALL CASES BY SPECIALTY ;01/18/07

Source Information

Source file <SROALSS.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Surgery 4 ^SROALSSP  CPTS^SROAUTL0  TECH^SROPRIN  $$MANDIV^SROUTL0  
Registration 1 DEM^VADPT  
VA FileMan 1 (D,Y)^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 SROALOG  

Entry Points

Name Comments DBIA/ICR reference
START
UTL ; write to ^TMP("SRA",$J)
SET ; set variables
PRINT ;
CASE ; print a case
SS ; print surgical specialty
PAGE
HDR ; print heading
OTHER ; other operations
LOOP ; break procedures
SSCT ; write specialty count
CPT(SRY) ; check code for exclusion

External References

Name Field # of Occurrence
D^DIQ SET+13
Y^DIQ SET+3, SET+14
^SROALSSP SROALSS+2
CPTS^SROAUTL0 CASE+6
TECH^SROPRIN SET+12
$$MANDIV^SROUTL0 START+1
DEM^VADPT SET+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"TOTAL CASES FOR ALL SPECIALTIES: ",SRTC
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,SRTN,?20,SRANM_" "_VA("PID"),?55,STATUS,!,SRDT,?20,SROPS(1),?55,SRTECH
  • Line Location: CASE+3
Function Call: WRITE
  • Prompt: !,SRDOC
  • Line Location: CASE+4
Function Call: WRITE
  • Prompt: ?20,SROPS(2)
  • Condition for execution: $D(SROPS(2))
  • Line Location: CASE+4
Function Call: WRITE
  • Prompt: ?55,SREXCL
  • Line Location: CASE+4
Function Call: WRITE
  • Prompt: !,?20,SROPS(3)
  • Line Location: CASE+5
Function Call: WRITE
  • Prompt: !,?20,SROPS(4)
  • Line Location: CASE+5
Function Call: WRITE
  • Prompt: !,?20,"CPT Codes: "
  • Line Location: CASE+6
Function Call: WRITE
  • Prompt: ?31,$$CPT($P(SRPROC(I),"-"))_SRPROC(I)
  • Line Location: CASE+7
Function Call: WRITE
  • Prompt: !
  • Line Location: CASE+8
Function Call: WRITE
  • Prompt: "-"
  • Line Location: CASE+8
Function Call: WRITE
  • Prompt: !,"** SURGICAL SPECIALTY: ",SRSS," **",!
  • Line Location: SS+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PAGE+0
Function Call: WRITE
  • Prompt: !!,"If you want to continue listing assessments, enter <RET>. Enter '^' to",!,"return to the menu."
  • Line Location: PAGE+1
Function Call: WRITE
  • Prompt: @IOF,!,?(80-$L(SRHD)\2),SRHD,!,?(80-$L(SRFRTO)\2),SRFRTO
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,"CASE #",?20,"PATIENT",?55,"ASSESSMENT STATUS",!,"OPERATION DATE",?20,"PRINCIPAL OPERATIVE PROCEDURE",?55,"ANESTHESIA TECHNIQUE",!,"SURGEON",?55,"EXCLUSION CRITERIA",!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,"TOTAL ",SRSS,": ",SRC,!
  • Line Location: SSCT+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: SSCT+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(130 SET+3, SET+14
^SRF - [#130] START+1, UTL+1, UTL+2, UTL+3, UTL+4, UTL+5, UTL+6, SET+2, SET+5, SET+7
, SET+8, SET+9, SET+14, OTHER+1, OTHER+2
^SRF("AC" START+1
^SRO(137 - [#137] CPT+2
^SRO(137.45 - [#137.45] UTL+6, SET+11
^TMP("SRA" START!, UTL+7*, PRINT+2

Label References

Name Line Occurrences
$$CPT CASE+7
CASE PRINT+2
HDR PRINT+1, PRINT+3
LOOP SET+10
OTHER SET+8
PAGE PRINT+3, CASE+2, SS+1, PAGE+1, SSCT+1
PRINT START+2
SET PRINT+2
SS PRINT+2
SSCT PRINT+2
UTL START+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> C SET+3*, SET+14*
>> CAN UTL+2*, UTL+3*
>> DFN SET+5*
DTIME PAGE
I SET+5~, SET+8*, CASE+6~, CASE+7*
IO PRINT+1
IOF HDR+2
IOSL PRINT+3, CASE+2, SS+1, SSCT+1
IOST SROALSS+2
>> L HDR+3*, SSCT+2*
>> LINE CASE+8*
>> LOOP LOOP+1*
>> M SET+10*, LOOP+1
MM SET+10!, LOOP+1*
MMM SET+10!, LOOP+1*
>> OPER OTHER+1*
>> SRA("RA" SET+2*, SET+3
>> SRA(0 UTL+1*, SET+5*, SET+11, SET+13
>> SRANM SET+5*, SET+6*, CASE+3
>> SRASP UTL+5
>> SRASSN SET+5*
>> SRC PRINT+2*, CASE+1*, SSCT+2
SRCPTT SET+1!*
>> SRDOC SET+14*, SET+15*, CASE+4
>> SRDT SET+13*, CASE+3
>> SRED START+1
SREX CPT+1~*, CPT+2*, CPT+3
>> SREXCL SET+3*, SET+4, CASE+4
>> SRFLG UTL+5, PRINT+3
>> SRFRTO HDR+2
>> SRHD HDR+1*, HDR+2
>> SRINSTP START+1
SRL CASE+6~*
>> SRLONG OTHER+1*, OTHER+2
>> SROPER SET+7*, 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*, CASE+3
SROPS(2 CASE+4
SROPS(3 CASE+5
SROPS(4 CASE+5
>> SROTHER SET+8*, OTHER+1, OTHER+2
SRPROC CASE+6~
SRPROC( CASE+7
>> SRSD START+1*
>> SRSOUT START*, START+1, PRINT+2, PRINT+3, CASE+2, SS+1, PAGE*, SSCT+1
>> SRSS UTL+6*, UTL+7, SET+11*, PRINT+1*, PRINT+2*, SS+2, SSCT+2
>> SRTC PRINT+1*, PRINT+4, CASE+1*
>> SRTECH CASE+3
>> SRTN START+1*, UTL+1, UTL+2, UTL+3, UTL+4, UTL+5, UTL+6, UTL+7, SET+2, SET+5
, SET+7, SET+8, SET+9, SET+14, PRINT+2*, CASE+3, OTHER+1, OTHER+2
SRY CPT~, CPT+2
>> STATUS SET+2*, SET+4*, CASE+3
>> VA("PID" SET+5, CASE+3
VADM SET+5!
VADM(1 SET+5
>> X UTL+4*, SET+2*, SET+7*, SET+9*, PAGE*, PAGE+1
>> Y SET+3*, SET+13*, SET+14*, SET+15
>> Z SET+14*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All