VAFCTFU ;ALB/JLU-UTILITIES FOR THE TREATING FACILITY FILE 391.91 ; 1/15/10 5:00pm
Source file <VAFCTFU.m>
| Package | Total | Call Graph | 
|---|---|---|
| Registration | 6 | XMITFLAG^VAFCDD01 RETPDR^VAFCEHU2 FILENEW^VAFCTFU $$PIVNW^VAFHPIVT $$SEND^VAFHUTL $$SITE^VASITE | 
| VA Fileman | 5 | ^%DT $$FIND1^DIC (CHK,FILE,UPDATE)^DIE ^DIK $$IENS^DILF | 
| 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 | ||
| DELALLTF(PAT) | ;Entry point to delete all Treating Facilities for a single | 
 
 | 
| FILETFQ | ||
| DELTFQ | ||
| DELETE(TFIEN) | ;the actual deletion code | 
 
 | 
| DELETETF(PAT,INST) | ;deletion entry point | 
 
 | 
| SETSND(PDFN) | ;sets the pivot file entry to send MFU | |
| SETSNDQ | ||
| UPDSID(PDFN,FAC,SID,IDSTAT,TFIEN) | ;Update sourceid multiple | |
| FILENEW(PDFN,FAC,PDLT,EVNTR,VAFCSLT,ERROR,IPP,SOURCEID,IDENSTAT) | ; | |
| FILEDIT(TFIEN,PDLT,PDFN,FAC,EVNTR,VAFCSLT,ERROR,IPP,SOURCEID,IDENSTAT) | ; | |
| FILE(PDFN,FSTRG,TICN,VAFCSLT,ERROR,IPP,SOURCEID,IDENSTAT) | ;this module files the individual entry | 
 
 | 
| 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 | UPDSID+7, FILEDIT+8 | 
| UPDATE^DIE | FILENEW+12, UPDSID+11 | 
| ^DIK | DELETE+5 | 
| $$IENS^DILF | UPDSID+5, UPDSID+9 | 
| 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+15, UPDSID+3, UPDSID+4, 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 | 
| UPDSID | FILENEW+13, FILEDIT+9 | 
| >> | 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+16!, DELETE+2!, DELETE+4*, DELETE+5! | 
| DD | FILENEW+2!, FILENEW+16! | 
| DGENDA | UPDSID+1~, UPDSID+4*, UPDSID+5, UPDSID+9* | 
| DGENDA(1 | UPDSID+5*, UPDSID+9* | 
| DGSENFLG | FILENEW+1~, FILENEW+3*, FILEDIT+1~* | 
| DIC | FILENEW+2!, FILENEW+16! | 
| DIK | DELETE+2!, DELETE+3*, DELETE+5! | 
| DO | FILENEW+2!, FILENEW+16! | 
| 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, FILENEW+13, UPDSID~, FILEDIT~, FILEDIT+9 | 
| FDA | FILENEW+4~, UPDSID+1~, FILEDIT+1~ | 
| FDA( | UPDSID+6*, UPDSID+10* | 
| FDA(1 | FILENEW+6*, FILENEW+7*, FILENEW+8*, FILENEW+9*, FILENEW+10*, FILEDIT+5*, FILEDIT+6*, FILEDIT+7* | 
| FDAIEN | FILENEW+4~, FILEDIT+1~ | 
| FDAIEN(1 | FILENEW+13 | 
| FILE | UPDSID+1~, UPDSID+2*, UPDSID+6, UPDSID+10 | 
| FSTRG | FILETF+19~, FILE~, FILE+14 | 
| >> HL("MID" | FILE+18, FILE+21, DELETETF+11 | 
| >> HLER | DELETETF+24 | 
| ICN | FILE+12~, FILE+24* | 
| IDENSTAT | FILE~, FILE+27, FILE+28, FILENEW~, FILENEW+13, FILEDIT~, FILEDIT+9 | 
| IDSTAT | UPDSID~, UPDSID+6, UPDSID+10 | 
| IEN | DELETETF+9~ | 
| IENS | UPDSID+1~, UPDSID+5*, UPDSID+6, UPDSID+9*, UPDSID+10 | 
| 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, FILENEW+13, UPDSID~ , SETSND~, SETSND+6, SETSND+10, SETSND+11, SETSND+13, FILEDIT~, FILEDIT+9, 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 | 
| SID | UPDSID~, UPDSID+3, UPDSID+4, UPDSID+6, UPDSID+10 | 
| SIT | SETSND+5~, SETSND+9*, SETSND+10*, SETSND+11* | 
| SOURCEID | FILE~, FILE+27, FILE+28, FILENEW~, FILENEW+13, FILEDIT~, FILEDIT+9 | 
| 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, UPDSID~, UPDSID+3, UPDSID+4, UPDSID+5, UPDSID+9, FILEDIT~ , FILEDIT+3, FILEDIT+5, FILEDIT+6, FILEDIT+7, FILEDIT+9, 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 |