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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: SROQIDP0

Package: Surgery

Routine: SROQIDP0


Information

SROQIDP0 ;BIR/ADM - LIST OF INVASIVE DIAGNOSTIC PROCEDURES ;09/22/98 11:46 AM

Source Information

Source file <SROQIDP0.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Surgery 7 TECH^SROPRIN  AC^SROQIDP  ^SROSTOP  PROC^SROUTL  $$NODATA^SROUTL0  PROC^SROUTLN  $$SITE^SROVAR  
VA FileMan 3 NOW^%DTC  $$GET1^DIQ  ^DIR  
Registration 1 DEM^VADPT  

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 SROQIDP  

Entry Points

Name Comments DBIA/ICR reference
PRINT ; print case information
PRESS
PAGE
HDR ; print heading

External References

Name Field # of Occurrence
NOW^%DTC SROQIDP0+10
$$GET1^DIQ SROQIDP0+9
^DIR PRESS
TECH^SROPRIN PRINT+4
AC^SROQIDP SROQIDP0+11
^SROSTOP HDR+1
PROC^SROUTL PRINT+1
$$NODATA^SROUTL0 SROQIDP0+12
PROC^SROUTLN PRINT+7
$$SITE^SROVAR SROQIDP0+9
DEM^VADPT PRINT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$NODATA^SROUTL0()
  • Line Location: SROQIDP0+12
Function Call: WRITE
  • Prompt: !!
  • Line Location: SROQIDP0+14
Function Call: WRITE
  • Prompt: ?4,"TOTAL CASES BY IN/OUT-PATIENT STATUS",!,?14,"INPATIENT: ",SRIOT("I"),!,?13,"OUTPATIENT: ",SRIOT("O"),!,?12,"NOT ENTERED: ",SRIOT("N"),!!,?12,"TOTAL CASES: ",SRIDPT
  • Line Location: SROQIDP0+15
Function Call: WRITE
  • Prompt: "TOTAL "_$S(SRIO="I":"INPATIENT",1:"OUTPATIENT")_" CASES: "_SRIOT(SRIO)
  • Line Location: SROQIDP0+16
Function Call: WRITE
  • Prompt: !,SRSDATE,?22,SRSNM,?54,$S(SRSPEC:$E(SRDOC,1,27),1:$E(SRSS,1,27)),?89,SRANES,?117,SRIOSTAT
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: ?54,SRPROC(I),!
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: ?54,SRPROC(I),!
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRESS+0
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(IOM-$L(SRINST)\2),SRINST
  • Condition for execution: $E(IOST)="P"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(IOM-$L(SRRPT)\2),SRRPT,?(IOM-10),$J("PAGE "_SRPAGE,9),!,?(IOM-$L(SRFRTO)\2),SRFRTO
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(IOM-$L(SRPRINT)\2),SRPRINT
  • Condition for execution: $E(IOST)="P"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(IOM-$L(X)\2),X
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!,"DATE OF OPERATION",?22,"PATIENT NAME",?54,$S(SRSPEC:"SURGEON",1:"SURGICAL SPECIALTY"),?89,"ANESTHESIA TECHNIQUE",?117,"IN/OUT-PATIENT"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,"CASE #",?22,"PATIENT ID (AGE)",?54,"PROCEDURE(S) PERFORMED"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+6
Routine Call
  • DIR
  • Line Location:
    • PRESS

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" SROQIDP0+7, SROQIDP0+10, PRINT+3
^SRF - [#130] PRINT+2
^SRO(137.45 - [#137.45] PRINT+2
^TMP("SR" SROQIDP0+7!, SROQIDP0+13
^VA(200 - [#200] PRINT+2

Label References

Name Line Occurrences
HDR SROQIDP0+11, PAGE
PAGE SROQIDP0+14, PRINT+1, PRINT+7
PRESS PAGE+1
PRINT SROQIDP0+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % SROQIDP0+10
>> DFN PRINT+2*
DIR PRESS!
DIR(0 PRESS*
>> DTOUT PRESS
>> DUOUT PRESS
>> EDATE SROQIDP0+7
>> ENDATE SROQIDP0+7*, SROQIDP0+8
>> I SROQIDP0+7*, PRINT+6*, PRINT+7*, HDR+6*
IO SROQIDP0+7
IOF HDR+2
IOM HDR+2, HDR+3, HDR+6
IOSL SROQIDP0+14, PRINT+1, PRINT+7
IOST PAGE, HDR+2
>> SDATE SROQIDP0+7
>> SRAGE PRINT+3*, PRINT+6
>> SRANES PRINT+4*, PRINT+5
>> SRDOC PRINT+2*, PRINT+5
>> SRED SROQIDP0+7*
>> SRFRTO SROQIDP0+8*, HDR+2
>> SRHALT HDR+1
>> SRHDR SROQIDP0+7*, PAGE, HDR+6*
>> SRIDPT SROQIDP0+7*, SROQIDP0+12, SROQIDP0+15
>> SRINST SROQIDP0+9*, HDR+2
>> SRINSTP SROQIDP0+9
>> SRIO SROQIDP0+15, SROQIDP0+16
>> SRIOSTAT PRINT+2*, PRINT+5
>> SRIOT( SROQIDP0+7*, SROQIDP0+16
>> SRIOT("I" SROQIDP0+15
>> SRIOT("N" SROQIDP0+15
>> SRIOT("O" SROQIDP0+15
>> SRL PRINT+1*, PRINT+7*
>> SRPAGE SROQIDP0+7*, HDR+2, HDR+6*
>> SRPRINT SROQIDP0+10*, HDR+2
>> SRPROC( PRINT+6, PRINT+7
>> SRPROC(1 PRINT+6, PRINT+7
>> SRRPT SROQIDP0+8*, HDR+2
>> SRSD SROQIDP0+7*, SROQIDP0+13*, PRINT+3
>> SRSDATE PRINT+3*, PRINT+5
>> SRSNM PRINT+3*, PRINT+5
>> SRSOUT SROQIDP0+7*, SROQIDP0+13, SROQIDP0+14, PRINT+1, PRINT+7, PRESS*, PAGE+1, HDR+1*
>> SRSPEC PRINT+5, HDR+3, HDR+4
>> SRSPECN HDR+3
>> SRSS PRINT+2*, PRINT+5
>> SRSSN PRINT+3*, PRINT+6
>> SRSUPCPT PRINT+1*
>> SRTECH PRINT+4
>> SRTN SROQIDP0+13*, PRINT+2, PRINT+6
>> SRZ SROQIDP0+13*, PRINT+2
>> STARTDT SROQIDP0+7*, SROQIDP0+8
>> VA("PID" PRINT+3
>> VADM(1 PRINT+3
>> VADM(3 PRINT+3
>> X HDR+3*
>> X1 PRINT+3*
>> X2 PRINT+3*
>> Y SROQIDP0+7*, SROQIDP0+10*, PRINT+2*, PRINT+3*
>> ZTQUEUED HDR+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All