VAFCOTFU ;ALB/JLU-UTILITIES FOR THE TREATING FACILITY FILE 391.91 ; 2/1/10 12:47pm
Source file <VAFCOTFU.m>
Package | Total | Call Graph |
---|---|---|
Registration | 6 | XMITFLAG^VAFCDD01 RETPDR^VAFCEHU2 FILENEW^VAFCTFU $$PIVNW^VAFHPIVT $$SEND^VAFHUTL $$SITE^VASITE |
VA Fileman | 4 | ^%DT $$FIND1^DIC (CHK,FILE,UPDATE)^DIE ^DIK |
Uncategorized | 3 | ($$GETDFN,$$GETVCCI)^MPIF001 $$MPINODE^MPIFAPI (EXC,STOP)^RGHLLOG |
Health Level Seven | 2 | UPD^HLSUB LINK^HLUTIL3 |
Kernel | 2 | $$NOW^XLFDT ($$LKUP,$$STA)^XUAF4 |
Name | Comments | DBIA/ICR reference |
---|---|---|
FILEQ | ||
DELTFQ | ||
DELETE(TFIEN) | ;the actual deletion code
|
|
FILE(PDFN,FSTRG,TICN,VAFCSLT,ERROR,IPP) | ;this module files the individual entry
|
|
DELETETF(PAT,INST) | ;deletion entry point
|
|
SETSND(PDFN) | ;sets the pivot file entry to send MFU
|
|
FILEDIT(TFIEN,PDLT,PDFN,FAC,EVNTR,VAFCSLT,ERROR,IPP) | ;
|
|
FILENEW(PDFN,FAC,PDLT,EVNTR,VAFCSLT,ERROR,IPP) | ;
|
|
SETSNDQ | ||
FILETFQ | ||
DELALLTF(PAT) | ;Entry point to delete all Treating Facilities for a single
|
|
FILETF(PAT,INST) | ;programmer entry point.
|
Name | Field # of Occurrence |
---|---|
^%DT | FILE+20 |
$$FIND1^DIC | FILE+17, DELETETF+15 |
CHK^DIE | FILENEW+5, FILEDIT+4 |
FILE^DIE | FILEDIT+8 |
UPDATE^DIE | FILENEW+12 |
^DIK | DELETE+5 |
UPD^HLSUB | DELETETF+24 |
LINK^HLUTIL3 | DELETETF+24 |
$$GETDFN^MPIF001 | FILETF+17, DELETETF+13, DELALLTF+10 |
$$GETVCCI^MPIF001 | FILE+30, SETSND+6 |
$$MPINODE^MPIFAPI | FILE+24, DELETETF+22 |
EXC^RGHLLOG | FILE+18, FILE+21 |
STOP^RGHLLOG | FILE+18 |
XMITFLAG^VAFCDD01 | SETSND+15 |
RETPDR^VAFCEHU2 | DELETETF+25 |
FILENEW^VAFCTFU | FILE+33 |
$$PIVNW^VAFHPIVT | SETSND+13 |
$$SEND^VAFHUTL | FILE+37 |
$$SITE^VASITE | FILE+19, FILE+22, FILENEW+12, SETSND+8, FILEDIT+8 |
$$NOW^XLFDT | DELETETF+24 |
$$LKUP^XUAF4 | FILE+31, SETSND+7 |
$$STA^XUAF4 | FILE+15 |
FileNo | Call Tags |
---|---|
^DGCN(391.91 - [#391.91] | Classic Fileman Calls, CHK^DIE |
^DIC(4 - [#4] | FIND1^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TEST" | FILETF+16, FILE+10, FILE+11, SETSND+3, DELETETF+12, DELALLTF+9 |
^DGCN(391.91 - [#391.91] | FILE+25, FILE+33, FILENEW+11, FILENEW+12, FILENEW+14, SETSND+10, SETSND+11, FILEDIT+3, DELETETF+16, DELETETF+19 , DELALLTF+12, DELALLTF+14 |
Name | Line Occurrences |
---|---|
DELETE | DELETETF+18, DELALLTF+14 |
DELTFQ | DELETETF+11, DELETETF+15, DELETETF+17, DELETETF+20 |
FILE | FILETF+20 |
FILEDIT | FILE+28 |
FILENEW | FILE+27 |
FILETFQ | FILETF+14, FILETF+15, FILETF+16, FILETF+18, DELETETF+12, DELETETF+14 |
SETSND | FILE+37 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | FILE+20!* |
ANS | SETSND+2~, SETSND+13*, SETSND+14, SETSND+15 |
CMOR | FILE+12~, FILE+30*, FILE+31*, FILE+33, SETSND+5~, SETSND+6*, SETSND+7*, SETSND+8, SETSND+11 |
DA | FILENEW+2!, FILENEW+15!, DELETE+2!, DELETE+4*, DELETE+5! |
DD | FILENEW+2!, FILENEW+15! |
DGSENFLG | FILENEW+1~, FILENEW+3*, FILEDIT+1~* |
DIC | FILENEW+2!, FILENEW+15! |
DIK | DELETE+2!, DELETE+3*, DELETE+5! |
DO | FILENEW+2!, FILENEW+15! |
DT | SETSND+13 |
ECNT | FILE+12~, FILE+13* |
ERR | FILENEW+4~*, FILEDIT+1~* |
ERR("DIERR" | FILENEW+12, FILEDIT+8 |
ERROR | FILE~, FILE+27, FILE+28, FILENEW~, FILEDIT~ |
ERROR( | FILE+19*, FILE+22*, FILENEW+12*, FILEDIT+8*, DELETETF+11* |
EVNTR | FILE+12~, FILE+14*, FILE+27, FILE+28, FILENEW~, FILENEW+5*, FILENEW+9, FILEDIT~, FILEDIT+4*, FILEDIT+6 |
FAC | FILE+12~, FILE+14*, FILE+15, FILE+17, FILE+18, FILE+19, FILE+21, FILE+25, FILE+27, FILE+28 , FILENEW~, FILENEW+7, FILENEW+12, FILEDIT~ |
FDA | FILENEW+4~, FILEDIT+1~ |
FDA(1 | FILENEW+6*, FILENEW+7*, FILENEW+8*, FILENEW+9*, FILENEW+10*, FILEDIT+5*, FILEDIT+6*, FILEDIT+7* |
FDAIEN | FILENEW+4~, FILEDIT+1~ |
FSTRG | FILETF+19~, FILE~, FILE+14 |
>> HL("MID" | FILE+18, FILE+21, DELETETF+11 |
>> HLER | DELETETF+24 |
ICN | FILE+12~, FILE+24* |
IEN | DELETETF+9~ |
INST | FILETF~, FILETF+14, FILETF+15, FILETF+20, DELETETF~, DELETETF+11, DELETETF+15, DELETETF+16, DELETETF+19, DELETETF+24 , DELETETF+25 |
IPP | FILE~, FILE+27, FILE+28, FILENEW~, FILENEW+10, FILEDIT~, FILEDIT+2, FILEDIT+7 |
LINK | DELETETF+9~, DELETETF+24 |
LINK( | DELETETF+24 |
LINK(0 | DELETETF+24 |
LP | FILETF+12~, FILETF+20*, DELALLTF+6~, DELALLTF+12*, DELALLTF+14 |
PAT | FILETF~, FILETF+14, FILETF+17, DELETETF~, DELETETF+11, DELETETF+13, DELALLTF~, DELALLTF+8, DELALLTF+10 |
PDFN | FILETF+12~, FILETF+17*, FILETF+18, FILETF+20, FILE~, FILE+18, FILE+21, FILE+22, FILE+24, FILE+25 , FILE+27, FILE+28, FILE+30, FILE+33, FILE+37, FILENEW~, FILENEW+6, FILENEW+12, SETSND~, SETSND+6 , SETSND+10, SETSND+11, SETSND+13, FILEDIT~, DELETETF+9~, DELETETF+13*, DELETETF+14, DELETETF+16, DELETETF+19, DELETETF+22 , DELETETF+25, DELALLTF+6~, DELALLTF+10*, DELALLTF+11, DELALLTF+12, DELALLTF+14 |
PDLT | FILE+12~, FILE+14*, FILE+20, FILE+21, FILE+22, FILE+27, FILE+28, FILENEW~, FILENEW+8, FILEDIT~ , FILEDIT+2, FILEDIT+5 |
RESULT | FILENEW+2!, FILENEW+5, FILEDIT+1~, FILEDIT+4 |
SIT | SETSND+5~, SETSND+9*, SETSND+10*, SETSND+11* |
STA | FILE+12~, FILE+15*, FILE+19, FILE+22, FILENEW+12, FILEDIT+8 |
STOP | SETSND+5~, SETSND+11*, SETSND+12 |
TFIEN | FILE+12~, FILE+25*, FILE+27, FILE+28, FILEDIT~, FILEDIT+3, FILEDIT+5, FILEDIT+6, FILEDIT+7, DELETETF+9~ , DELETETF+16*, DELETETF+17, DELETETF+18, DELETETF+19*, DELETETF+20, DELETE~, DELETE+4, DELALLTF+6~, DELALLTF+13*, DELALLTF+14* |
TFIEN(0 | FILEDIT+3* |
TICN | FILE~, FILE+37 |
U | FILE+14 |
VAFCER | FILETF+12~, FILETF+13*, FILETF+14*, FILETF+15*, FILETF+18*, FILETFQ, FILE+12~, FILE+20*, DELETETF+9~, DELETETF+10* , DELETETF+11*, DELETETF+14*, DELETETF+15*, DELETETF+17*, DELETETF+20*, DELTFQ, DELALLTF+6~, DELALLTF+7*, DELALLTF+16 |
VAFCLLN | DELETETF+9~, DELETETF+24* |
VAFCSCN | DELETETF+9~, DELETETF+22*, DELETETF+24 |
VAFCSLT | FILE~, FILE+9*, FILE+18, FILE+19, FILE+21, FILE+22, FILE+27, FILE+28, FILENEW~, FILEDIT~ , FILEDIT+8 |
X | FILETF+12~, FILETF+16*, FILE+8~, FILE+10*, FILE+11*, FILE+20*, SETSND+2~, SETSND+3*, DELETETF+9~, DELETETF+12* , DELALLTF+6~, DELALLTF+9* |
Y | FILE+8~, FILE+20 |