BTIUSTSC ; IHS/MSC/JS - V STROKE SCALE OBJECT ;17-Nov-2014 15:54;DU
Source file <BTIUSTSC.m>
Package | Total | Call Graph |
---|---|---|
IHS Mods To Text Integration Utilities | 2 | $$QUAL^BTIULO7A ($$LASTMSR,$$LSTDATE)^BTIUPCC1 |
VA Fileman | 2 | FILE^DID ($$GET1,GETS)^DIQ |
IHS Electronic Health Record | 1 | $$VSTR2VIS^BEHOENCX |
IHS VA Utilities | 1 | ENP^XBDIQ1 |
VueCentric Framework | 1 | $$GETVAR^CIAVMEVT |
Name | Comments | DBIA/ICR reference |
---|---|---|
NIH | ;
|
|
SCALE | ; -- check V STROKE file #9000010.63 for NIH records and not EIE --
|
|
GETS | ; -- check/retrieve file entry --
|
|
FNUM() | ; returns 0/invalid file ref number, 9000010.63/valid file ref number
|
|
PRINT(STRIEN,STCNT) | ;
|
|
STSCALE(DFN,TARGET,VIEN,STCNT) | ; EHR p12
; -- get patient visit -- |
|
WEIGHT(VIEN) | ; -- from routine BTIULO4 --
|
|
NAME(X) | ;return full name for measurement
|
FileNo | Call Tags |
---|---|
^AUTTMSR - [#9999999.07] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVMSR("AD" | WEIGHT+3 |
^AUPNVSTR - [#9000010.63] | SCALE+5, SCALE+6, SCALE+7 |
^AUPNVSTR("AD" | SCALE+4 |
Name | Line Occurrences |
---|---|
$$FNUM | GETS+1 |
$$NAME | WEIGHT+9, WEIGHT+10 |
GETS | SCALE+8 |
NIH | PRINT+19 |
GETS+12 | |
SCALE | STSCALE+4 |
WEIGHT | GETS+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARRIVED | PRINT+1~, PRINT+3* |
ATTRIB | FNUM+1~, FNUM+2*, FNUM+3 |
BY | NIH+1~, NIH+8*, NIH+11 |
CNT | SCALE+1~, SCALE+3*, GETS+13, PRINT+8*, PRINT+9, PRINT+10*, PRINT+11, PRINT+12, PRINT+13*, PRINT+14 , PRINT+15*, PRINT+16, PRINT+17*, PRINT+18, NIH+9*, NIH+10, NIH+11, NIH+13*, NIH+14, NIH+16* , NIH+17, NIH+19*, NIH+20, NIH+22*, NIH+23, NIH+25*, NIH+26, NIH+28*, NIH+29, NIH+31* , NIH+32, NIH+34*, NIH+35, NIH+37*, NIH+38, NIH+40*, NIH+41, NIH+43*, NIH+44, NIH+46* , NIH+47, NIH+49*, NIH+50, NIH+52*, NIH+53, NIH+55*, NIH+56, NIH+57*, NIH+58, NIH+59* , NIH+61, NIH+62*, NIH+63, NIH+66*, NIH+67, NIH+68*, NIH+69, NIH+72*, NIH+73, NIH+74* , NIH+75, NIH+78*, NIH+79, NIH+80*, NIH+81, NIH+84*, NIH+85, NIH+86*, NIH+87, NIH+90* , NIH+91, NIH+92*, NIH+93, NIH+96*, NIH+97, NIH+98*, NIH+99, NIH+100*, NIH+101 |
DFN | STSCALE~, STSCALE+8, WEIGHT+14 |
FIBINIT | PRINT+1~, PRINT+6*, PRINT+11 |
FIBNOT | PRINT+1~, PRINT+7*, PRINT+12 |
FILEINFO | FNUM+1~ |
FILEN | FNUM+1~, FNUM+2*, FNUM+3 |
FILERR | GETS+2!, FNUM+4 |
FILERR("DIERR" | GETS+2 |
FNUM | SCALE+1~, GETS+1*, GETS+2, GETS+5, PRINT+3, PRINT+4, PRINT+5, PRINT+6, PRINT+7 |
HANDED | PRINT+1~, PRINT+5*, PRINT+14 |
MIEN | WEIGHT+1~, WEIGHT+3*, WEIGHT+4, WEIGHT+6 |
MSGROOT | FNUM+1~, FNUM+2*, FNUM+3 |
NODE | NIH+1~, NIH+3*, NIH+5*, NIH+7, NIH+8, NIH+12, NIH+15, NIH+18, NIH+21, NIH+24 , NIH+27, NIH+30, NIH+33, NIH+36, NIH+39, NIH+42, NIH+45, NIH+48, NIH+51, NIH+54 , NIH+60, NIH+64, NIH+70, NIH+76, NIH+82, NIH+88, NIH+94 |
PATNAME | PRINT+1~, PRINT+4* |
QUALIF | WEIGHT+1~, WEIGHT+6*, WEIGHT+9, WEIGHT+10 |
QUIT | NIH+1~, NIH+2*, NIH+5, NIH+6* |
SPACE | PRINT+1~, PRINT+2*, PRINT+18, NIH+1~, NIH+4*, NIH+63, NIH+101 |
SSTIME | NIH+1~ |
STCNT | STSCALE~, STSCALE+3*, GETS+12, PRINT~, NIH+6* |
STIME | NIH+1~, NIH+7*, NIH+11 |
STRIEN | SCALE+1~, SCALE+2*, SCALE+4*, SCALE+5, SCALE+6, SCALE+7, GETS+5, GETS+12, PRINT~, PRINT+3 , PRINT+4, PRINT+5, PRINT+6, PRINT+7 |
STRING | NIH+1~, NIH+3*, NIH+12*, NIH+14, NIH+15*, NIH+17, NIH+18*, NIH+20, NIH+21*, NIH+23 , NIH+24*, NIH+26, NIH+27*, NIH+29, NIH+30*, NIH+32, NIH+33*, NIH+35, NIH+36*, NIH+38 , NIH+39*, NIH+41, NIH+42*, NIH+44, NIH+45*, NIH+47, NIH+48*, NIH+50, NIH+51*, NIH+53 , NIH+54*, NIH+56, NIH+60*, NIH+61, NIH+64*, NIH+65, NIH+69, NIH+70*, NIH+71, NIH+75 , NIH+76*, NIH+77, NIH+81, NIH+82*, NIH+83, NIH+87, NIH+88*, NIH+89, NIH+93, NIH+94* , NIH+95, NIH+99 |
TARGET | STSCALE~, STSCALE+6, STSCALE+8, STSCALE+10, SCALE+9, GETS+2, GETS+6, GETS+7, GETS+13, PRINT+9 , PRINT+11, PRINT+12, PRINT+14, PRINT+16, PRINT+18, NIH+10, NIH+11, NIH+14, NIH+17, NIH+20 , NIH+23, NIH+26, NIH+29, NIH+32, NIH+35, NIH+38, NIH+41, NIH+44, NIH+47, NIH+50 , NIH+53, NIH+56, NIH+58, NIH+61, NIH+63, NIH+67, NIH+69, NIH+73, NIH+75, NIH+79 , NIH+81, NIH+85, NIH+87, NIH+91, NIH+93, NIH+97, NIH+99, NIH+101 |
TAROOT | FNUM+1~, FNUM+2*, FNUM+3 |
TIU | WEIGHT+4!, WEIGHT+13! |
TIU( | WEIGHT+5, WEIGHT+7, WEIGHT+8*, WEIGHT+9, WEIGHT+10 |
TIU(1201 | WEIGHT+9, WEIGHT+10 |
TIU(2 | WEIGHT+5 |
U | SCALE+7, GETS+2, GETS+7 |
VCNT | PRINT+1~ |
VIEN | STSCALE~, STSCALE+4, STSCALE+8*, STSCALE+10, SCALE+4, GETS+10, WEIGHT~, WEIGHT+3, WEIGHT+9, WEIGHT+10 |
VST | STSCALE+2~, STSCALE+5*, STSCALE+6, STSCALE+7, STSCALE+8 |
VSTRARR | SCALE+1~, GETS+4! |
VSTRARR( | PRINT+3, PRINT+4, PRINT+5, PRINT+6, PRINT+7, NIH+5, NIH+7, NIH+8, NIH+12, NIH+15 , NIH+18, NIH+21, NIH+24, NIH+27, NIH+30, NIH+33, NIH+36, NIH+39, NIH+42, NIH+45 , NIH+48, NIH+51, NIH+54, NIH+60, NIH+64, NIH+70, NIH+76, NIH+82, NIH+88, NIH+94 |
VSTRERR | SCALE+1~, GETS+4!, GETS+6 |
VSTRERR("DIERR" | GETS+7 |
WT | GETS+9~, PRINT+16, WEIGHT+2*, WEIGHT+9*, WEIGHT+10*, WEIGHT+14* |
X | NAME~, NAME+1 |