©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
GMTSROE ; SLC/KER - Surgery Extract ; 06/24/2002 [7/28/04 8:40am]
Source file <GMTSROE.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 4 | FILE^DID $$GET1^DIQ EN^DIQ1 ^DIWP |
| DRG Grouper | 2 | $$CPT^ICPTCOD $$MOD^ICPTMOD |
| Health Summary | 2 | ($$CPT,$$ED,$$EDT)^GMTSU $$EN2^GMTSUMX |
| Kernel | 1 | $$HTFM^XLFDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SORT | ; Sort surgeries by inverted date
|
|
| SUB | ; Surgery Subfiles
|
|
| OS(X) | ; Obtains status for OR procedures
|
|
| SG(X) | ; Surgical (Operative) Record
|
|
| WP(X,Y,Z) | ; Word Processing
|
|
| ONE(X) | ; Extract One Surgery Report
|
|
| GL(X) | ; Global Location
|
| Name | Field # of Occurrence |
|---|---|
| FILE^DID | GL+1 |
| $$GET1^DIQ | SG+1 |
| EN^DIQ1 | ONE+10, SUB+9, SUB+17, SUB+26, SUB+46, SUB+66 |
| ^DIWP | WP+8 |
| $$CPT^GMTSU | ONE+3 |
| $$ED^GMTSU | ONE+29 |
| $$EDT^GMTSU | ONE+30, ONE+31 |
| $$EN2^GMTSUMX | ONE+12, ONE+14, ONE+21, ONE+22, ONE+23, ONE+24, ONE+25, SUB+10, SUB+18, SUB+34 , SUB+50, SUB+53, SUB+54, SUB+75 |
| $$CPT^ICPTCOD | ONE+12, SUB+47, SUB+50 |
| $$MOD^ICPTMOD | SUB+29, SUB+69 |
| $$HTFM^XLFDT | ONE+5 |
| FileNo | Call Tags |
|---|---|
| ^SRF - [#130] | FILE^DID, GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SRF - [#130] | ONE+4, SUB+8, SUB+16, SUB+25, SUB+44, SUB+64, SORT+1 |
| ^UTILITY($J | WP+6!, WP+9, WP+10, WP+12! |
| Name | Line Occurrences |
|---|---|
| $$OS | ONE+10 |
| $$SG | ONE+7 |
| SUB | ONE+20 |
| WP | ONE+33 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | ONE+1~, ONE+6*, SUB+1~, SUB+7*, SUB+15*, SUB+24*, SUB+43*, SUB+65~* |
| DA( | SUB+9*, SUB+17*, SUB+26*, SUB+45*, SUB+65* |
| DIC | ONE+1~, ONE+6*, SUB+1~, SUB+7*, SUB+15*, SUB+24*, SUB+43*, SUB+65~* |
| DIQ | ONE+1~, ONE+6*, SUB+1~, SUB+7*, SUB+15*, SUB+24*, SUB+43*, SUB+65~* |
| DIQ(0 | ONE+6*, SUB+7*, SUB+15*, SUB+24*, SUB+43*, SUB+65* |
| DIWF | WP+1~, WP+6* |
| DIWL | WP+1~, WP+6* |
| DIWR | WP+1~, WP+6* |
| DR | ONE+1~, ONE+8*, ONE+9*, SUB+1~, SUB+7*, SUB+15*, SUB+24*, SUB+43*, SUB+65~* |
| DR( | SUB+7*, SUB+15*, SUB+24*, SUB+43*, SUB+65* |
| DT | ONE+5* |
| DTIME | ONE+5* |
| FIL | GL+1~ |
| FIL("GLOBAL N | AME" , GL+1 |
| FILE | ONE+1~, ONE+6*, SUB+1~, SUB+7*, SUB+15*, SUB+24*, SUB+43*, SUB+65~* |
| FLD | ONE+1~, SUB+1~ |
| FLDA | ONE+2~, SUB+1~ |
| FLDB | ONE+2~, SUB+1~ |
| FLDI | ONE+1~, SUB+1~ |
| FLDR | ONE+2~, SUB+1~ |
| FLDRT | ONE+2~, SUB+1~ |
| FLDS | ONE+1~, SUB+1~ |
| GMDT | SORT+1~*, SORT+2*, SORT+3 |
| GMI | WP+1~, WP+6*, WP+7*, WP+8, WP+9*, WP+10 |
| GMN | OS+1~*, OS+2, OS+3, OS+5, OS+6, OS+7, OS+8, OS+9, OS+10, SORT+1 , SORT+3 |
| >> GMPXCMOD | ONE+3 |
| GMSG | ONE+1~, ONE+7*, ONE+8, ONE+9, ONE+10, ONE+32, ONE+33, SUB+2 |
| >> GMTSBEG | SORT+1 |
| GMTSC | ONE+2~, ONE+12*, ONE+13, ONE+14*, ONE+16, SUB+1~, SUB+30*, SUB+32, SUB+35, SUB+49~ , SUB+50*, SUB+51, SUB+52*, SUB+55, SUB+70*, SUB+72, SUB+74, SUB+75 |
| GMTSCPT | SUB+45~, SUB+47*, SUB+48 |
| GMTSCPTM | ONE+1~, ONE+3*, SUB+23, SUB+63 |
| GMTSCS | ONE+2~, ONE+12*, ONE+16*, ONE+19, SUB+50*, SUB+55*, SUB+58 |
| >> GMTSEGN | ONE+3 |
| >> GMTSEND | SORT+1 |
| GMTSF | WP+1~, WP+3*, WP+5, WP+7, WP+8, WP+10, WP+11 |
| GMTSI | ONE+2~, WP+1~, WP+2*, WP+3, WP+5, WP+7, WP+8, WP+10, WP+11, SUB+1~ , SUB+8*, SUB+9, SUB+10, SUB+16*, SUB+17, SUB+18, SUB+25*, SUB+26, SUB+27, SUB+32 , SUB+33, SUB+36, SUB+44*, SUB+45, SUB+46, SUB+48, SUB+49, SUB+51, SUB+53, SUB+56 , SUB+57, SUB+58, SUB+64, SUB+65, SUB+67, SUB+72, SUB+73, SUB+74, SUB+76, SUB+77 |
| GMTSJ | SUB+1~, SUB+64~*, SUB+65, SUB+67, SUB+72, SUB+73, SUB+74, SUB+76 |
| GMTSM | ONE+11*, ONE+12, SUB+1~, SUB+27*, SUB+28, SUB+29, SUB+46*, SUB+47, SUB+48, SUB+49* , SUB+50, SUB+67*, SUB+68, SUB+69 |
| GMTSMOD | SUB+29~*, SUB+30, SUB+31, SUB+69~*, SUB+70, SUB+71 |
| GMTSRT | ONE+2~ |
| GMTSS | ONE+2~, ONE+12*, ONE+15, ONE+17, SUB+31*, SUB+33, SUB+34, SUB+49~, SUB+50*, SUB+54 , SUB+56, SUB+71*, SUB+73, SUB+74, SUB+75 |
| GMTST | ONE+2~, ONE+14*, ONE+15*, ONE+16*, ONE+18, SUB+34*, SUB+35*, SUB+36, SUB+49~, SUB+53* , SUB+54*, SUB+55*, SUB+57, SUB+75*, SUB+76 |
| GMTSW | WP+1~, WP+4*, WP+6 |
| IEN | ONE+1~, ONE+2~, ONE+4*, ONE+7, ONE+10, ONE+11, ONE+13, ONE+14, ONE+17, ONE+18 , ONE+19, ONE+21, ONE+22, ONE+23, ONE+24, ONE+25, ONE+26, ONE+27, ONE+28, ONE+29 , ONE+30, ONE+31, ONE+32, ONE+33, SUB+7, SUB+8, SUB+10, SUB+15, SUB+16, SUB+18 , SUB+24, SUB+25, SUB+27, SUB+32, SUB+33, SUB+36, SUB+43, SUB+44, SUB+46, SUB+48 , SUB+49, SUB+51, SUB+53, SUB+56, SUB+57, SUB+58, SUB+64, SUB+65, SUB+67, SUB+72 , SUB+73, SUB+74, SUB+76, SUB+77 |
| IENS | ONE+1~, ONE+4*, SUB+1~ |
| REC | ONE+1! |
| REC( | SUB+8!, SUB+16!, SUB+25!, SUB+44! |
| REC(130 | ONE+7*, ONE+10*, ONE+11, ONE+13*, ONE+14, ONE+17*, ONE+18*, ONE+19*, ONE+21*, ONE+22* , ONE+23*, ONE+24*, ONE+25*, ONE+26, ONE+27*, ONE+28*, ONE+29*, ONE+30*, ONE+31*, ONE+32* , ONE+33, WP+2, WP+3, WP+5, WP+7, WP+8, WP+10*, WP+11*, OS+1, OS+2 , OS+3, OS+5, OS+6, OS+7, OS+8, OS+9, OS+10, SUB+10*, SUB+18*, SUB+27 , SUB+32*, SUB+33*, SUB+36*, SUB+46, SUB+48*, SUB+49, SUB+51*, SUB+53, SUB+56*, SUB+57* , SUB+58*, SUB+67, SUB+72*, SUB+73*, SUB+74*, SUB+76*, SUB+77! |
| SCOD | SUB+1~ |
| SNAM | SUB+1~ |
| STXT | SUB+1~ |
| SUB | SUB+1~, SUB+7*, SUB+8, SUB+9, SUB+15*, SUB+16, SUB+17, SUB+24*, SUB+25, SUB+26 , SUB+27, SUB+32, SUB+33, SUB+36, SUB+43*, SUB+44, SUB+45, SUB+65~*, SUB+72, SUB+73 , SUB+74, SUB+76 |
| >> SURG(9999999 | SORT+2, SORT+3* |
| U | ONE+4*, SORT+1 |
| X | ONE~, ONE+4*, ONE+6, WP~, WP+2, WP+8*, OS~, OS+1*, OS+2*, OS+3* , OS+4*, OS+5, OS+6*, OS+7*, OS+8*, OS+9*, OS+10*, OS+11*, OS+12, GL~ , GL+1*, GL+2*, GL+3*, GL+4, SG~, SG+1* |
| Y | WP~, WP+3 |
| Z | WP~, WP+4 |