NHINVSR ;SLC/MKB -- Surgical Procedures
Source file <NHINVSR.m>
Package | Total | Call Graph |
---|---|---|
CPT HCPCS Codes | 2 | ($$CPT,$$CPTD)^ICPTCOD $$MOD^ICPTMOD |
Health Summary | 1 | STATUS^GMTSROB |
National Health Information Network | 1 | ($$ESC,$$FAC)^NHINV |
Surgery | 1 | (LIST,ONE)^SROESTV |
Text Integration Utility | 1 | TGET^TIUSRVR1 |
VA FileMan | 1 | ($$GET1,GETS)^DIQ |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
National Health Information Network | 1 | NHINVPRC |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(DFN,BEG,END,MAX,ID) | ; -- find patient's surgeries
|
|
ONE(NUM,SURG) | ; -- return a surgery in SURG("attribute")=value
; Expects DFN, @NHY@(NUM) from LIST^SROESTV |
|
EN1(IEN,SURG) | ; -- return a surgery in SURG("attribute")=value
|
|
CPT(IEN) | ; -- return code^description for CPT code, or "^" if error
|
|
STATUS(GMN,GMDT) | ; -- get current STATUS of request
|
|
XML(SURG) | ; -- Return surgery as XML
|
|
LOOP() | ; -- build sub-items string from NAMES and X
|
|
ADD(X) | ; -- Add a line @NHIN@(n)=X
|
|
RPT(NHY,ID) | ; -- Return report in NHY(n)
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | ONE+9, ONE+10, ONE+11, ONE+23, EN1+7, EN1+8, EN1+9, EN1+21 |
GETS^DIQ | ONE+13, ONE+17, EN1+11, EN1+15 |
STATUS^GMTSROB | STATUS+2 |
$$CPT^ICPTCOD | CPT+2 |
$$CPTD^ICPTCOD | CPT+4 |
$$MOD^ICPTMOD | ONE+15, EN1+13 |
$$ESC^NHINV | XML+12, LOOP+2 |
$$FAC^NHINV | ONE+9, EN1+7 |
LIST^SROESTV | EN+9, EN+11 |
ONE^SROESTV | EN1+3 |
TGET^TIUSRVR1 | RPT+2 |
FileNo | Call Tags |
---|---|
^SRF - [#130] | GET1^DIQ, GETS^DIQ |
^TIU(8925 - [#8925] | GET1^DIQ |
Name | Line Occurrences |
---|---|
$$CPT | ONE+12, ONE+20, EN1+10, EN1+18 |
$$LOOP | XML+9, XML+14 |
$$STATUS | ONE+8, EN1+6 |
ADD | XML+2, XML+3, XML+5, XML+9, XML+10, XML+15 |
EN1 | EN+6 |
ONE | EN+13 |
XML | EN+6, EN+14 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ATT | XML+1~, XML+3*, XML+4, XML+5, XML+6, XML+7, XML+8, XML+9, XML+10, XML+11 , XML+12, XML+13, XML+14 |
BEG | EN~, EN+3*, EN+11 |
DFN | EN~, EN+2*, EN+11 |
END | EN~, EN+3*, EN+11 |
GMDT | STATUS~, STATUS+2 |
GMN | STATUS~, STATUS+2 |
I | ONE+2~, ONE+14*, ONE+15, ONE+16, ONE+18*, ONE+19, ONE+20, ONE+21*, ONE+24, EN1+1~ , EN1+12*, EN1+13, EN1+14, EN1+16*, EN1+17, EN1+18, EN1+19*, EN1+22, CPT+1~, CPT+6* , CPT+7*, XML+6*, XML+7 |
ID | EN~, EN+6, RPT~, RPT+1*, RPT+2 |
IEN | ONE+2~, ONE+4*, ONE+5, ONE+8, ONE+9, ONE+10, ONE+11, ONE+13, ONE+17, EN1~ , EN1+3, EN1+4, EN1+6, EN1+7, EN1+8, EN1+9, EN1+11, EN1+19, CPT~, CPT+1* , CPT+2 |
LT | ONE+22~*, ONE+24, ONE+25, EN1+20~*, EN1+22, EN1+23 |
MAX | EN~, EN+3*, EN+11 |
N | CPT+1~, CPT+4*, CPT+5 |
NAMES | XML+1~, XML+7*, XML+8*, XML+13*, LOOP+2 |
NHI | EN+1~, EN+12*, EN+13 |
NHICNT | EN+1~ |
>> NHIN | ADD+2 |
>> NHINI | ADD+1*, ADD+2 |
>> NHINTOTL | XML+2* |
NHITM | EN+1~, EN+6, EN+13!, EN+14 |
NHMOD | ONE+2~, EN1+1~ |
NHMOD( | ONE+14, ONE+15, EN1+12, EN1+13 |
NHOTH | ONE+2~, EN1+1~ |
NHOTH( | ONE+18, ONE+19, EN1+16, EN1+17 |
NHX | ONE+2~, ONE+3*, ONE+4, ONE+5, ONE+6, ONE+7, ONE+8, EN1+1~, EN1+3*, EN1+4 , EN1+5, EN1+6, CPT+1~ |
NHX( | CPT+7 |
NHX(1 | CPT+5, CPT+6 |
NHY | EN+1~, EN+11, EN+12, EN+15, ONE+3, ONE+21, EN1+1~, RPT~, RPT+2 |
NHY( | EN1+3, EN1+19 |
NT | ONE+22~, ONE+23*, ONE+24, ONE+25, EN1+20~, EN1+21*, EN1+22, EN1+23 |
NUM | ONE~, ONE+3, ONE+21 |
P | LOOP+1~, LOOP+2* |
SHOWADD | EN+10~*, EN1+1~, EN1+2* |
STATUS | STATUS+1~*, STATUS+3*, STATUS+4 |
STR | LOOP+1~*, LOOP+2*, LOOP+3 |
SURG | ONE~, ONE+4!, EN1~, XML~ |
SURG( | XML+3, XML+4, XML+6, XML+7, XML+11 |
SURG("category" | ONE+26*, EN1+24* |
SURG("dateTime" | ONE+6*, EN1+4* |
SURG("document" | ONE+24*, EN1+22* |
SURG("encounter" | ONE+10*, EN1+8* |
SURG("facility" | ONE+9*, EN1+7* |
SURG("id" | ONE+5*, EN1+4* |
SURG("modifier" | ONE+16*, EN1+14* |
SURG("name" | ONE+5*, EN1+4* |
SURG("opReport" | ONE+25*, EN1+23* |
SURG("otherProcedure" | ONE+20*, EN1+18* |
SURG("provider" | ONE+7*, EN1+5* |
SURG("status" | ONE+8*, EN1+6* |
SURG("type" | ONE+12*, EN1+10* |
TAG | LOOP+1~, LOOP+2* |
U | ONE+4, ONE+5, ONE+6, ONE+7, ONE+8, ONE+16, ONE+22, ONE+24, ONE+25, EN1+4 , EN1+5, EN1+6, EN1+14, EN1+20, EN1+22, EN1+23, CPT+3, CPT+4, CPT+8, LOOP+2 |
X | ONE+2~, ONE+7*, ONE+9*, ONE+11*, ONE+12, ONE+15*, ONE+19*, ONE+20, ONE+21*, ONE+22 , ONE+23, ONE+24, ONE+25, EN1+1~, EN1+5*, EN1+7*, EN1+9*, EN1+10, EN1+13*, EN1+17* , EN1+18, EN1+19*, EN1+20, EN1+21, EN1+22, EN1+23, CPT+1~, CPT+6*, CPT+7*, CPT+8 , XML+1~, XML+7*, XML+11*, XML+12, XML+14, LOOP+2, ADD~, ADD+2 |
X0 | CPT+1~, CPT+2*, CPT+3 |
Y | ONE+2~, ONE+15*, ONE+16, EN1+1~, EN1+13*, EN1+14, CPT+1~, CPT+3*, CPT+4, CPT+8* , CPT+9, XML+1~, XML+3, XML+4*, XML+9*, XML+11*, XML+12*, XML+14* |
Name | Field # of Occurrence |
---|---|
$T(LIST^SROESTV | EN+9 |