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 |  Marked Items |  All
Print Page as PDF
Routine: SROQ0A

Package: Surgery

Routine: SROQ0A


Information

SROQ0A ;BIR/ADM - QUARTERLY REPORT (CONTINUED) ;06/16/04 9:38 AM

Source Information

Source file <SROQ0A.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
DRG Grouper 1 $$CPT^ICPTCOD  
Surgery 1 IDP^SROQIDP  
VA Fileman 1 C^%DTC  

Caller Graph

Caller Graph Total: 12

Package Total Caller Graph
Surgery 12 SR62UTL  SROATM2  SROATMNO  SROQ  SROQ0  SROQ1  SROQ1A  SROQD0  
SROQD1  SROQL  SROQM1  SROQN  

Entry Points

Name Comments DBIA/ICR reference
TMP ; store index procedure names in ^TMP
IXOUT ; get procedure name for output
IDP ; invasive diagnostic?
SUP ; look at resident supervision
RS ; surgical residents used?
P5 ;;Fem-Pop Bypass;;35656,35556;;
P10 ;;Laryngectomy;;31360,31365,31367,31368;;
P11 ;;Craniotomy;;61304,61305,61312,61314,61510,61512,61518,61519,61700,61680;;
P12 ;;Intraoccular Lens;;66983,66984;;
CHECK
P2 ;;Cholecystectomy;;47600,47605,47610,47562,47563,47564;;
P3 ;;Coronary Artery Bypass;;33510,33511,33512,33513,33514,33516,33517,33518,33519,33521,33522,33523,33533,33534,33535,33536;;
P1 ;;Inguinal Hernia;;49505,49507,49520,49521,49525;;
P6 ;;Pulmonary Lobectomy;;32480,32500,32440;;
P7 ;;Hip Replacement, - Elective;;27125,27130,27132,27134,27137,27138;;
P4 ;;Colon Resection (L & R);;44140,44141,44143,44144,44145,44146,44147,44160;;
SHOW ; display list of procedures with CPT codes
P8 ;;Hip Replacement, - Acute Fracture;;27236;;
P9 ;;TURP;;52601;;
DRPT ; from report of deaths within 30 days
ADD ; increment counters in ^TMP
IXDTH
ADM ; check for admission within 14 days of surgery
NDEX ; look at procedures performed
CK1
PROC ; index procedures

External References

Name Field # of Occurrence
C^%DTC ADM+1
$$CPT^ICPTCOD NDEX+1, NDEX+2, DRPT+1, DRPT+2
IDP^SROQIDP IDP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?30,$E(SRCODES,49,96)
  • Line Location: SHOW+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM("APTT1" ADM+2
^SRF - [#130] SUP+1, RS+1, RS+2, ADM+1, ADD+2, IXDTH
^SRO(133 - [#133] RS+1
^SRO(136 - [#136] NDEX+1, NDEX+2, DRPT+1, DRPT+2
^TMP("SRDEATH" IXDTH*, CK1+1*
^TMP("SRIP" TMP+1*
^TMP("SRNAT" CK1+1*
^TMP("SRP" IXDTH*
^TMP("SRPROC" ADD+1, ADD+3*
^TMP("SRREL" CK1+2*

Label References

Name Line Occurrences
ADD CHECK
ADM IDP+2
IXDTH CHECK
NDEX SROQ0A+8
RS SUP+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN ADM+2, IXDTH, CK1+1, CK1+2
>> I ADD+1*, SHOW+1*, SHOW+2
>> J CHECK*, ADD+1, ADD+3, IXDTH, TMP+1*, CK1*, CK1+1, CK1+2
>> K CHECK*, CK1*
>> SR14 ADM+1*, ADM+2
>> SRADMT ADM+2*
>> SRATT SUP+1*, SUP+2, SUP+3, RS+2*, RS+3*, RS+4*
>> SRATT( SUP+2*, SUP+3*
>> SRATT("J" SUP+2*
>> SRATT("N" SUP+2*
>> SRCODES CHECK*, SHOW+1*, SHOW+3, CK1*
>> SRCPT CHECK*, CK1*
SRDIV RS+1~*
>> SRFLAG SROQ0A+8*, CHECK
>> SRIDP IDP+1
>> SRINV( IDP+1*
>> SRIOSTAT IDP+1, IDP+2
SRK RS+1~*
>> SRMATCH SUP+3*, CHECK*, CK1*, CK1+1*
>> SRMM SUP+3*
>> SROP NDEX+1*, NDEX+2*, CHECK, IXOUT+1*, DRPT+1*, DRPT+2*, CK1
SRP ADD+3!
SRP( ADD+1*
SRP(1 ADD+2*, ADD+3
SRP(2 ADD+2*, ADD+3
>> SRPOC IDP+2, ADD+2
>> SRPROC SHOW+1*, SHOW+2*, SHOW+3
>> SRREL IXDTH, CK1+2
>> SRSD CK1+2
>> SRSDATE ADM+1*, ADM+2*
SRSITE RS+1~*
>> SRTN SUP+1, NDEX+1, NDEX+2, RS+1, RS+2, ADM+1, ADD+2, IXDTH, DRPT+1, DRPT+2
, CK1+1, CK1+2
>> X NDEX+1*, NDEX+2*, ADM+1, SHOW+1*, DRPT+1*, DRPT+2*
>> X1 ADM+1*
>> X2 ADM+1*
>> Y NDEX+2*, RS+1*, DRPT+2*

Marked Items

Name Field # of Occurrence
$T(PROC+I SHOW+1
$T(PROC+J CHECK, IXOUT+1, TMP+1, CK1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All