XUMF ;OIFO-OAK/RAM - XUMF API's;04/15/02
Source file <XUMF.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 9 | ^%ZTLOAD $$NOW^XLFDT $$UP^XLFSTR $$FILE^XUMF (EM,MAIN)^XUMFH MAIN^XUMFI MAIN^XUMFP SEGPRSE^XUMFXHL7 ($$ADDNPI,$$NPI)^XUSNPI |
VA Fileman | 6 | $$FIND1^DIC FILE^DICN (FIELD,FILE)^DID (CHK,FILE,UPDATE)^DIE $$ROOT^DILFD $$GET1^DIQ |
Health Level Seven | 2 | $$PARAM^HLCS2 $$FMDATE^HLFNC |
Name | Comments | DBIA/ICR reference |
---|---|---|
ZERO(IFN,ERR) | ; -- zero node
|
|
MFP(IFN,ERR) | ; -- validate Master File Parameters entry FALSE=valid
|
|
MFS(IFN,IEN,TYP,ERROR) | ; -- get file from Master File Server
|
|
FIELD(FILE,FIELD,ATT) | ; field attributes
|
|
MFE(IFN,PKV,HLCS,IEN,ERROR) | ; -- update
|
|
FILE(FILE,ATT) | ; file attributes
|
|
GETCE(IFN,IEN,TYP,ERROR) | ; -- get master file provide coded element
|
|
PKV(IFN,IEN,HLCS) | ; Primary Key Value - MFE.4
|
|
LBL(FILE,FIELD) | ; field label
|
|
FLD(FILE,FIELD) | ; field
|
|
LOAD(IFN) | ; -- query and file
|
|
CDSYS(CDSYS,ID,IEN) | ; udpate coding system / ID
|
|
ARRAY(IFN) | ; -- query and put in array
|
|
TYP(FILE,FIELD) | ; field type
|
|
F(XUMF) | ; constrain edits to standard values
|
|
MFE1(IFN,ERR) | ; -- MFE node
|
|
PTR(FILE,FIELD) | ; pointer field?
|
|
NPI | ; -- NPI
|
|
IEN(IFN,CDSYS,ID) | ; -- Internal Entry Number
|
|
ECHO(FILE,IDX,X,XUMF) | ; validate field exists and echo name
|
|
BG1 | ; -- get file
|
|
EXIT | ; -- cleanup and quit
|
|
BG(IFN,IEN,TYP) | ; -- background job
|
|
SEQ(IFN,ERR) | ; -- sequence nodes
|
Name | Field # of Occurrence |
---|---|
^%ZTLOAD | BG+13 |
$$FIND1^DIC | MFE+24, MFE+49 |
FILE^DICN | MFE+62 |
FIELD^DID | FIELD+8 |
FILE^DID | FILE+7 |
CHK^DIE | MFE+58 |
FILE^DIE | MFE+74 |
UPDATE^DIE | MFE+41, NPI+21, NPI+28, CDSYS+10 |
$$ROOT^DILFD | IEN+12, MFE+47 |
$$GET1^DIQ | PKV+19, PKV+20, PKV+26, PKV+27 |
$$PARAM^HLCS2 | MFS+14 |
$$FMDATE^HLFNC | NPI+6 |
$$NOW^XLFDT | BG+9 |
$$UP^XLFSTR | NPI+14 |
$$FILE^XUMF | BG+11 |
EM^XUMFH | MFE+15, MFE+18, MFE+21, MFE+27, MFE+32, MFE+37, MFE+46, MFE+55, MFE+61, MFE+65 , MFE+76 |
MAIN^XUMFH | MFS+21 |
MAIN^XUMFI | MFS+20 |
MAIN^XUMFP | MFS+19 |
SEGPRSE^XUMFXHL7 | NPI+4 |
$$ADDNPI^XUSNPI | NPI+15 |
$$NPI^XUSNPI | NPI+13 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(4 - [#4] | IEN+2 |
^DIC(4.001 - [#4.001] | ECHO+6, PKV+6, MFE+12, MFE+28, ZERO+4, MFE1+4, SEQ+5, SEQ+6 |
^ORD(101 - [#101] | MFS+17 |
^TMP("DIERR" | EXIT+2! |
^TMP("XUMF MFS" | EXIT+2! |
Name | Line Occurrences |
---|---|
$$F | ECHO+2 |
$$FIELD | FLD+4, LBL+2, TYP+2 |
$$LBL | ECHO+8, SEQ+9 |
$$TYP | PTR+2, SEQ+7 |
EXIT | BG1+2 |
MFE1 | MFP+5 |
MFS | BG1+2, LOAD+2, ARRAY+2 |
SEQ | MFP+6 |
ZERO | MFP+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ATT | FIELD~, FIELD+6, FIELD+8, FIELD+10, FILE~, FILE+5, FILE+7, FILE+9 |
CDSYS | IEN~, IEN+6*, IEN+9, IEN+13, PKV+4~, PKV+10*, PKV+12, PKV+22, PKV+28*, PKV+30 , CDSYS~, CDSYS+6 |
CNT | ZERO+2~, ZERO+4*, ZERO+6*, ZERO+8*, ZERO+10*, ZERO+12*, ZERO+14*, MFE1+2~, MFE1+4*, MFE1+6 , MFE1+7*, MFE1+9*, MFE1+11*, MFE1+13* |
COL | NPI+2~ |
COL(17 | NPI+6 |
COL(18 | NPI+7 |
COL(19 | NPI+8 |
COL(20 | NPI+9 |
COL(21 | NPI+10 |
COL(22 | NPI+11 |
DA | FLD+2~, FIELD+2~, FILE+2~ |
DIC | MFE+2~, MFE+62!* |
DIC(0 | MFE+62* |
ERR | MFE+15, MFE+18, MFE+21, MFE+27, MFE+32, MFE+37, MFE+46, MFE+55, MFE+61, MFE+65 , MFE+75, MFE+76, MFE+77!, MFP~, MFP+4, MFP+5, MFP+6, ZERO~, MFE1~, SEQ~ , NPI+2~ |
ERR("FATAL" | MFP+8, ZERO+6*, ZERO+8*, MFE1+6*, MFE1+9*, SEQ+13*, SEQ+15*, SEQ+17*, SEQ+19*, SEQ+22* |
ERR("WARNING" | MFP+8, ZERO+10*, ZERO+12*, ZERO+14*, MFE1+11*, MFE1+13*, SEQ+11* |
ERROR | MFE~, MFE+4*, MFE+7, MFE+9*, MFE+11, MFE+14*, MFE+15, MFE+17*, MFE+18, MFE+20* , MFE+21, MFE+26*, MFE+27, MFE+31*, MFE+32, MFE+36*, MFE+37, MFE+45*, MFE+46, MFE+51 , MFE+54*, MFE+55, MFE+57*, MFE+60*, MFE+61, MFE+64*, MFE+65, BG1+2, LOAD+2, ARRAY+2 , GETCE~, MFS~, MFS+6*, MFS+10*, MFS+11*, MFS+12*, MFS+19, MFS+20 |
FDA | MFE+2~, MFE+39!, NPI+2~, NPI+18!, NPI+23!, CDSYS+2~, CDSYS+5! |
FDA( | MFE+40*, MFE+72*, NPI+19*, NPI+20*, NPI+25*, NPI+26*, NPI+27*, CDSYS+6*, CDSYS+7* |
FIELD | FLD~, FLD+4, LBL~, LBL+2, TYP~, TYP+2, PTR~, PTR+2, FIELD~, FIELD+5 , FIELD+8, PKV+19*, PKV+20*, PKV+26*, PKV+27* |
FILE | FLD~, FLD+4, LBL~, LBL+2, TYP~, TYP+2, PTR~, PTR+2, FIELD~, FIELD+4 , FIELD+8, FILE~, FILE+4, FILE+7, ECHO~, ECHO+6, ECHO+8 |
FLD | MFE+2~, MFE+71*, MFE+72 |
HLCS | PKV~, PKV+2*, PKV+9*, PKV+12, PKV+22, PKV+30, MFE~, MFE+4*, MFE+5*, MFE+24 , MFE+38, MFE+43, MFE+56, MFE+72 |
>> HLFS | MFE+30, MFE+33 |
>> HLNEXT | MFE+29 |
>> HLNODE | MFE+30, MFE+33 |
I | MFE+2~, MFE+34*, MFE+52*, MFE+70*, MFE+71, MFE+72, MFE1+2~, MFE1+5*, MFE1+10*, SEQ+2~ , SEQ+20*, SEQ+21 |
ID | IEN~, IEN+2, IEN+6*, IEN+10, IEN+13, PKV+4~, PKV+19*, PKV+22, PKV+26*, PKV+30 , MFE+2~, MFE+43*, MFE+44, MFE+48, MFE+49, CDSYS~, CDSYS+7 |
IDX | ECHO~, ECHO+6 |
IEN | IEN+4~, IEN+13*, IEN+15, PKV~, PKV+2*, PKV+12, PKV+15, PKV+17, MFE~, MFE+4* , MFE+24*, MFE+25, MFE+28, MFE+48*, MFE+49*, MFE+51, MFE+66*, MFE+68, BG~, BG+7* , BG1+2, GETCE~, MFS~, MFS+8*, MFS+11, NPI+13, NPI+15, NPI+17, NPI+24, CDSYS~ , CDSYS+4, CDSYS+9~ |
IENS | PKV+4~, PKV+17*, PKV+19, PKV+20, PKV+26, PKV+27, MFE+2~, MFE+68*, MFE+72, NPI+17* , NPI+19, NPI+20, NPI+24*, NPI+25, NPI+26, NPI+27, CDSYS+2~, CDSYS+4*, CDSYS+6, CDSYS+7 |
IFN | IEN~, IEN+2, IEN+6*, IEN+8, IEN+12, PKV~, PKV+2*, PKV+6, PKV+7, PKV+14 , PKV+19, PKV+20, PKV+26, PKV+27, MFE~, MFE+4*, MFE+9, MFE+11, MFE+12, MFE+23 , MFE+40, MFE+47, MFE+49, MFE+58, MFE+62, MFE+72, MFP~, MFP+2, MFP+4, MFP+5 , MFP+6, ZERO~, ZERO+4, MFE1~, MFE1+4, SEQ~, SEQ+5, SEQ+6, SEQ+7, SEQ+9 , BG~, BG+11, BG1+2, LOAD~, LOAD+2, ARRAY~, ARRAY+2, GETCE~, MFS~, MFS+8* , MFS+10, MFS+19, MFS+20 |
MFE | PKV+4~, PKV+22*, PKV+24, PKV+30, MFE+2~, MFE+12*, MFE+13, MFE+16, MFE+33*, MFE+34 , MFE+52, MFE+71 |
MULT | SEQ+2~, SEQ+12*, SEQ+14, SEQ+16, SEQ+18, SEQ+20 |
NAME | ECHO+4~, ECHO+8*, ECHO+10, MFE+2~, MFE+38*, MFE+40, MFE+56*, MFE+57, MFE+58 |
NODE | PKV+4~, PKV+6*, PKV+7, PKV+10, PKV+19, PKV+20, PKV+24, PKV+26, PKV+27, PKV+28 |
NPI | NPI+2~, NPI+8*, NPI+14, NPI+15, NPI+20 |
NPIDT | NPI+2~, NPI+6*, NPI+13, NPI+15 |
NPISTAT | NPI+2~, NPI+7*, NPI+14, NPI+15 |
>> PARAM | MFS+19, MFS+20 |
>> PARAM("LLNK" | MFS+16* |
>> PARAM("PROTOCOL" | MFS+17* |
PKV | MFE~, MFE+24, MFE+38, MFE+43, MFE+56, MFE+72 |
ROOT | IEN+4~, IEN+12*, IEN+13, MFE+47*, MFE+48 |
SEQ | SEQ+2~, SEQ+4*, SEQ+5*, SEQ+6, SEQ+11, SEQ+13, SEQ+15, SEQ+17, SEQ+19, SEQ+22 , NPI+30* |
SUBFILE | ECHO+4~, ECHO+6*, ECHO+8 |
TAX | NPI+2~, NPI+9*, NPI+25 |
TAXPC | NPI+2~, NPI+10*, NPI+26 |
TAXSTAT | NPI+2~, NPI+11*, NPI+27 |
TEST | MFS+4~, MFS+6*, MFS+14*, MFS+16 |
TEXT | PKV+4~, PKV+20*, PKV+22, PKV+27*, PKV+30 |
TYP | BG~, BG+6*, BG1+2, GETCE~, MFS~, MFS+8*, MFS+12, MFS+19, MFS+20 |
U | ECHO+6, PKV+10, PKV+19, PKV+20, PKV+24, PKV+26, PKV+27, PKV+28, MFE+12, MFE+13 , MFE+16, MFE+33, MFE+34, MFE+52, MFE+71, ZERO+5, ZERO+7, ZERO+9, ZERO+11, ZERO+13 , MFE1+5, MFE1+8, MFE1+10, MFE1+12, SEQ+7, SEQ+8, SEQ+9, SEQ+12, SEQ+13, SEQ+14 , SEQ+16, SEQ+18, SEQ+21, MFS+14, NPI+14 |
VALUE | CDSYS+9~ |
X | IEN+2~*, FLD+2~, FIELD+2~, FILE+2~, ECHO~, ECHO+8, MFE+2~, MFE+34*, MFE+35, MFE+38! , MFE+52*, MFE+53, MFE+56!, MFE+58, MFE+59, ZERO+2~, ZERO+4*, ZERO+5, ZERO+7, ZERO+9 , ZERO+11, ZERO+13, MFE1+2~, MFE1+4*, MFE1+5, MFE1+8, MFE1+10, MFE1+12, SEQ+2~, SEQ+6* , SEQ+7, SEQ+8, SEQ+9, SEQ+12, SEQ+13, SEQ+14, SEQ+16, SEQ+18, SEQ+21, NPI+2~ , NPI+13*, NPI+14, NPI+15* |
XREF | MFE+2~, MFE+12*, MFE+19, MFE+48 |
XUMF | ECHO~, ECHO+2, F~, F+2 |
Y | FLD+2~, FLD+4*, FLD+6, FIELD+2~, FILE+2~, MFE+63, MFE+66, SEQ+2~, SEQ+9*, SEQ+10* , SEQ+11 |
Y( | FIELD+10, FILE+9 |
ZTDESC | BG+4~, BG+11* |
ZTDTH | BG+4~, BG+9* |
ZTIO | BG+4~, BG+9* |
>> ZTREQ | EXIT+4* |
ZTRTN | BG+4~, BG+9* |
ZTSAVE | BG+4~ |
ZTSAVE("IEN" | BG+10* |
ZTSAVE("IFN" | BG+10* |
ZTSAVE("TYP" | BG+10* |