ICDEXLK6 ;SLC/KER - ICD Extractor - Lookup, Miscellaneous ;04/21/2014
Source file <ICDEXLK6.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PR | ; Fileman Lookup Procedure (interactive)
|
|
OUT(X,Y,Z,ARY) | ; Output Array
|
|
DIC0(X) | ; Correct DIC(0) for a versioned file
|
|
PA(ICD,X) | ; Parse Array
|
|
SAV(X,DIC) | ; Save Defaults
|
|
DX9 | ; Fileman Lookup ICD-9 Diagnosis (interactive)
|
|
CDTT(X) | ; Date Transform
|
|
CDT(CDT,SYS) | ; Date
|
|
SYS(FILE,SYS) | ; System
|
|
FILE(FILE,SYS) | ; File
|
|
PR10 | ; Fileman Lookup ICD-10 Procedures (interactive)
|
|
DX10 | ; Fileman Lookup ICD-10 Diagnosis (interactive)
|
|
CDTH | ; Date Help
|
|
DX | ; Fileman Lookup Diagnosis (interactive)
|
|
DIM(X) | ; Check MUMPS Code
|
|
TM(X,Y) | ; Trim Y
|
|
FILH | ; File Help
|
|
PR9 | ; Fileman Lookup ICD-9 Procedures (interactive)
|
|
FILN(X) | ; File Number
|
|
RET(DIC) | ; Retrieve Defaults
|
|
FILT(X) | ; File Transform
|
Name | Field # of Occurrence |
---|---|
^DIM | DIM+1 |
$$GET1^DIQ | FILH+4, SAV+9, RET+6 |
^DIR | FILE+6, CDT+10 |
^DIWP | PA+3 |
$$CS^ICDEX | SYS+4 |
$$FILE^ICDEX | FILE+1, FILE+2, SYS+1, SYS+2, SAV+5, RET+4, OUT+3 |
$$IMP^ICDEX | CDT+2, CDT+3 |
$$LD^ICDEX | OUT+6 |
$$ROOT^ICDEX | SAV+3, RET+2 |
$$SD^ICDEX | OUT+5 |
$$SNAM^ICDEX | DX+14, PR+14 |
$$SYS^ICDEX | FILE+2, SYS+1, CDT+2 |
PAR^ICDEX | OUT+8 |
LK^ICDEXLK | DX+18, PR+18 |
$$DT^XLFDT | DX+13, PR+13, CDT+3, CDT+6, SAV+11 |
$$FMADD^XLFDT | CDT+3, SAV+11 |
$$FMTE^XLFDT | CDT+6, CDTH+4 |
$$UP^XLFSTR | FILT+1, FILN+1, CDT+6, CDTT+1, CDTH+4 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DIC - [#1] | GET1^DIQ |
^VA(200 - [#200] | GET1^DIQ |
^ICD9 - [#80] | Classic Fileman Calls |
^ICD0 - [#80.1] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DISV( | SAV+13*, RET+9 |
^ICDS - [#80.4] | DX+14, PR+14, SYS+4 |
^ICDS("F" | DX+11, PR+11, FILE+1, FILE+2, FILE+3, FILN+2, FILH+1, FILH+2, SYS+2, SYS+3 |
^UTILITY($J | PA+1!, PA+4, PA+5, PA+6! |
^XTMP( | SAV+12*, RET+8 |
Name | Line Occurrences |
---|---|
$$DIM | DX+17, PR+17 |
$$FILN | FILE+3, SYS+2 |
$$TM | PA+5 |
DX | DX9+6, DX10+6 |
PR | PR9+6, PR10+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARY | OUT~, OUT+1!, OUT+8 |
ARY(1 | OUT+7* |
BEG | CDTH+4~*, CDTH+5, CDTH+6 |
CD | FILH+3~*, FILH+5 |
CDT | CDT~, CDT+2*, CDT+4*, CDT+5, OUT+5, OUT+6 |
CHR | DIC0+16~*, DIC0+17, DIC0+18* |
CM | SAV+1~, SAV+7*, SAV+10*, SAV+12, RET+1~, RET+5*, RET+7* |
CUR | SAV+1~, SAV+11*, SAV+12, RET+1~ |
DIC | DX+10*, DX+18!, PR+10*, PR+18!, SAV~, SAV+2, SAV+3, RET~, RET+2 |
DIC("A" | DX+16*, PR+16* |
DIC("S" | DX+17!, PR+17! |
DIC("W" | DX+17!, PR+17! |
DIC(0 | DX+10*, PR+10* |
DINUM | DIC0+16! |
DIR | FILE+4~, SYS+1~, CDT+1~ |
DIR("?" | FILE+5*, CDT+9* |
DIR("??" | FILE+5*, CDT+9* |
DIR("A" | FILE+5*, CDT+8* |
DIR("B" | CDT+6* |
DIR("PRE" | FILE+5*, CDT+9* |
DIR(0 | FILE+4*, CDT+7* |
DIROUT | FILE+4~, SYS+1~, CDT+1~ |
DIRUT | FILE+4~, SYS+1~, CDT+1~ |
DIW | PA+1~ |
DIWF | PA+1~, PA+3* |
DIWI | PA+1~ |
DIWL | PA+1~, PA+3* |
DIWR | PA+1~ |
DIWT | PA+1~ |
DIWTC | PA+1~ |
DIWX | PA+1~ |
DLAYGO | DIC0+16! |
DN | PA+1~ |
DTOUT | FILE+4~, SYS+1~, CDT+1~ |
DUOUT | FILE+4~, SYS+1~, CDT+1~ |
DUZ | SAV+2, SAV+8, SAV+13, RET+6 |
DY | CDTH+4~, CDTH+5*, CDTH+8, CDTH+9 |
END | CDTH+4~*, CDTH+6 |
FI | FILH+2~*, FILH+3, FILH+4, FILH+5 |
FILE | FILE~, FILE+1, FILE+3, SYS~, SYS+1, SYS+2, SYS+3*, SYS+4, SAV+1~, SAV+5* , SAV+6, SAV+7, SAV+10, RET+1~, RET+4*, RET+5, RET+7, OUT+1~, OUT+3*, OUT+5 , OUT+6 |
FMT | OUT+1~*, OUT+4*, OUT+5, OUT+6, OUT+7, OUT+8 |
FUT | SAV+1~, SAV+11*, SAV+12, RET+1~ |
HI | CDT+1~, CDT+3*, CDT+4, CDT+5, CDT+6, CDT+7, CDTH+3, CDTH+4, CDTH+12 |
ICD | PA~, PA+1, PA+2, PA+4!, PA+6* |
ICD( | PA+3, PA+5* |
ICD(" " | PA+2 |
ICDC | PA+1~, PA+2*, PA+4*, PA+5*, PA+6 |
ICDFMT | DX+12~*, PR+12~* |
ICDI | PA+1~, PA+3*, PA+4*, PA+5 |
ICDLEN | PA+1~, PA+2*, PA+3 |
ICDSYS | DX9+6~*, DX10+6~*, DX+11~*, DX+14*, PR9+6~*, PR10+6~*, PR+11~*, PR+14* |
ICDVDT | DX+13~*, PR+13~* |
ID | SAV+1~, SAV+11*, SAV+12, RET+1~, RET+8* |
IEN | OUT+1~*, OUT+4, OUT+5, OUT+6 |
KEY | SAV+1~, SAV+10*, SAV+11, RET+1~, RET+7*, RET+8 |
LAYGO | DIC0+16! |
LO | CDT+1~, CDT+2*, CDT+3*, CDT+4, CDT+5, CDT+6, CDT+7, CDTH+3, CDTH+4, CDTH+10 , CDTH+11, CDTH+12 |
MO | CDTH+4~, CDTH+5*, CDTH+8, CDTH+9 |
NAM | SAV+1~, SAV+9*, RET+1~, RET+6* |
NM | FILH+3~, FILH+4*, FILH+5 |
NUM | FILN+1~*, FILN+2*, SAV+1~, SAV+8*, SAV+9, SAV+11, RET+1~, RET+6*, RET+8, RET+9 |
NX | CDT+1~, CDT+3* |
OFMT | DX+10~, DX+12*, PR+10~, PR+12* |
OSYS | DX+10~, DX+11*, PR+10~, PR+11* |
OVDT | DX+10~, DX+13*, PR+10~, PR+13* |
ROOT | FILE+1~*, SYS+1~*, CDT+1~, SAV+1~, SAV+3*, SAV+4, SAV+5, SAV+13, RET+1~, RET+2* , RET+3, RET+4, RET+9, OUT+1~*, OUT+2, OUT+3, OUT+4 |
RT | FILH+3~*, FILH+5 |
SNAM | DX+10~*, DX+14*, DX+15*, DX+16, PR+10~*, PR+14*, PR+15*, PR+16 |
STR | DIC0+16~, DIC0+18*, DIC0+22*, DIC0+26*, DIC0+27*, DIC0+28 |
SUB | SAV+1~, SAV+4*, SAV+12, RET+1~, RET+3*, RET+8 |
SYS | FILE~, FILE+2*, SYS~, SYS+1*, SYS+2, SYS+3, SYS+4*, CDT~, CDT+2*, CDT+3 |
SYSD | DX+10~*, DX+13, DX+14*, PR+10~*, PR+13, PR+14* |
TD | CDT+1~, CDT+6* |
TERM | OUT+1~, OUT+5*, OUT+6*, OUT+7 |
TMP | FILE+1~*, FILE+2*, FILE+3*, FILN+1~*, FILN+2, SYS+1~*, SYS+2*, SYS+3, CDT+1~, CDT+6* |
VAL | SAV+1~, SAV+9*, SAV+12 |
X | DX+10!, PR+10!, DIM~, DIM+1*, FILT~, FILT+1*, FILT+2*, FILN~, FILN+1, FILN+3 , CDTT~, CDTT+1*, CDTT+2, DIC0~, DIC0+16*, DIC0+17*, DIC0+18, DIC0+26, DIC0+28*, DIC0+29 , SAV~, RET+8*, RET+9*, RET+10, PA~, PA+2, PA+3*, OUT~, OUT+1, TM~ , TM+2*, TM+3*, TM+4 |
Y | FILE+1~, FILE+6*, FILE+7, SYS+1~, CDT+1~, CDT+11, SAV+2, SAV+9, SAV+13, OUT~ , OUT+1, TM~, TM+1*, TM+2, TM+3 |
YR | CDTH+4~, CDTH+5*, CDTH+8, CDTH+9 |
Z | OUT~, OUT+1 |