Call Graph
Call Graph Total: 4
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 1 | ($$IEN,$$STA)^XUAF4 |
| Master Patient Index VistA | 1 | ($$GETDFN,$$GETICN)^MPIF001 |
| Registration | 1 | FILENEW^VAFCTFU |
| VA FileMan | 1 | ($$GET1,GETS)^DIQ |
VAFCTFU2 ;BHM/CMC,CKN-Utilities for the Treating Facility file 391.91, CONTINUED ;2/2/21 10:41
Source file <VAFCTFU2.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 1 | ($$IEN,$$STA)^XUAF4 |
| Master Patient Index VistA | 1 | ($$GETDFN,$$GETICN)^MPIF001 |
| Registration | 1 | FILENEW^VAFCTFU |
| VA FileMan | 1 | ($$GET1,GETS)^DIQ |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Registration | 6 | DGPFHLS DGPFUT2 DGRPU VAFC LOCAL GETCORRESPONDINGIDS VAFC NEW NC TREATING FACILITY VAFCCRNR |
| Consult Request Tracking | 3 | GMRCCCR1 GMRCIEVT GMRCIUTL |
| Integrated Billing | 1 | IBARXCFL |
| Mental Health | 1 | YTQRQAD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TFL(LIST,PT) | ;for this PT [patient] (either DFN, ICN or EDIPI) return the list of treating facilities
; CALLED FROM RPC VAFC LOCAL GET CORRESPONDINGIDS ; PT values --> |
|
| GETICN(EDIPI) | ;return the ICN when EDIPI is passed
|
|
| SET(TFIEN,ARY,CTR) | ;This sets the array with the treating facility list.
; Ex ARY(1)=<ID> ^ <ID TYPE> ^ <Assigning Authority> ^ <Assigning Facility> ^ <ID Status> |
|
| QUERYTF(PAT,ARY) | ;a query for Treating Facility.
|
|
| QUERYTFQ | ||
| NEWTF(RESULT,DFN,EDIPI) | ;
; for MPIC_2019 ; called from RPC: VAFC NEW NC TREATING FACILITY ; Input: ; DFN: Vista Patient Identifier will be the PATIENT file (#2) IEN (aka DFN) ; example of DFN="7168937" |
| RPC Name | Call Tags |
|---|---|
| VAFC LOCAL GETCORRESPONDINGIDS | TFL |
| VAFC NEW NC TREATING FACILITY | NEWTF |
| FileNo | Call Tags |
|---|---|
| ^DGCN(391.92 - [#391.92] | GET1^DIQ, GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | TFL+19, QUERYTF+19, NEWTF+27 |
| ^DGCN(391.91 - [#391.91] | TFL+35, TFL+56, GETICN+4, GETICN+5, GETICN+6, GETICN+7, SET+3, SET+32, SET+33, QUERYTF+30 , QUERYTF+31, NEWTF+48, NEWTF+55, NEWTF+67, NEWTF+69 |
| ^DGCN(391.919 - [#391.919] | TFL+51, SET+43 |
| ^DGCN(391.92 - [#391.92] | TFL+44, TFL+45 |
| ^DIC(4 - [#4] | TFL+31, NEWTF+44 |
| ^DPT - [#2] | NEWTF+34 |
| Name | Line Occurrences |
|---|---|
| $$QUERYTF | TFL+59 |
| QUERYTFQ | QUERYTF+17, QUERYTF+19, QUERYTF+24 |
| SET | QUERYTF+32, NEWTF+58, NEWTF+72 |
| Name | Field # of Occurrence |
|---|---|
| ^( | NEWTF+55, NEWTF+69 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AA | TFL+42~, TFL+50*, TFL+52 |
| ARY | SET~, SET+44, QUERYTF~, QUERYTF+17, QUERYTF+26, QUERYTF+32, QUERYTF+33 |
| ASSAUTH | SET+2~, SET+35*, SET+37*, SET+39*, SET+40*, SET+44 |
| ASSIGN | TFL+18~, TFL+23*, TFL+34, TFL+35, TFL+44, NEWTF+26~, NEWTF+37*, NEWTF+42 |
| CTR | TFL+42~, TFL+43*, TFL+52*, SET~, SET+44*, QUERYTF+13~, QUERYTF+18*, QUERYTF+26, QUERYTF+32, NEWTF+26~ , NEWTF+52*, NEWTF+58, NEWTF+72, NEWTF+73 |
| DA | TFL+18~ |
| DFN | TFL+18~, TFL+56*, TFL+57, TFL+58*, GETICN+1~, GETICN+7*, GETICN+8, GETICN+9, QUERYTF+23, NEWTF~ , NEWTF+31 |
| DGCN | SET+2~ |
| DGCN(0 | SET+3*, SET+5, SET+7 |
| DIC | TFL+18~ |
| DIQ | TFL+18~ |
| DR | TFL+18~ |
| EDIPI | TFL+18~, GETICN~, GETICN+4, GETICN+5, GETICN+6, NEWTF~, NEWTF+37, NEWTF+38 |
| EN | GETICN+1~, GETICN+6*, GETICN+7, SET+2~ |
| ERROR | NEWTF+26~, NEWTF+61 |
| ERROR( | NEWTF+62, NEWTF+63 |
| FAC | TFL+42~, TFL+47*, TFL+51, TFL+52 |
| FOUND | SET+2~, SET+44* |
| ICN | TFL+18~, TFL+34*, TFL+41, TFL+54, TFL+57*, TFL+58, TFL+59, GETICN+1~, GETICN+8*, GETICN+9* , GETICN+10 |
| ID | TFL+18~, TFL+23*, TFL+25, TFL+34, TFL+35, TFL+44, TFL+54, SET+2~, SET+7*, NEWTF+26~ , NEWTF+37*, NEWTF+40, NEWTF+61 |
| IDENSTAT | TFL+42~, TFL+51*, TFL+52 |
| IDTYP | TFL+42~, TFL+49*, TFL+52 |
| IDTYPE | SET+2~, SET+34*, SET+36*, SET+38*, SET+40, SET+44 |
| IEN | TFL+18~, TFL+35*, TFL+41, TFL+54, TFL+56, GETICN+1~, GETICN+2*, GETICN+3, GETICN+4, GETICN+5 |
| II | NEWTF+26~, NEWTF+67* |
| INSTIEN | SET+2~, SET+5* |
| LIST | TFL~, TFL+21!, TFL+41 |
| LIST( | TFL+52* |
| LIST(1 | TFL+19*, TFL+25*, TFL+29*, TFL+32*, TFL+54* |
| LP | QUERYTF+13~, QUERYTF+30*, QUERYTF+31, NEWTF+26~, NEWTF+55*, NEWTF+69* |
| LSTA | SET+2~, SET+5* |
| NCTFIEN | NEWTF+26~, NEWTF+48*, NEWTF+53 |
| NODE | SET+2~ |
| NODE0 | SET+2~, SET+32*, SET+34 |
| NODE2 | SET+2~, SET+33*, SET+34, SET+35 |
| NPIEN | TFL+42~, TFL+44*, TFL+45 |
| NPTFIEN | TFL+42~, TFL+44*, TFL+45*, TFL+46, TFL+47, TFL+48, TFL+49, TFL+50, TFL+51 |
| PAT | QUERYTF~ |
| PDFN | QUERYTF+13~, QUERYTF+23*, QUERYTF+24, QUERYTF+26, QUERYTF+30, QUERYTF+31 |
| PT | TFL~, TFL+23 |
| PTDFN | NEWTF+26~, NEWTF+31*, NEWTF+32, NEWTF+34, NEWTF+35, NEWTF+48, NEWTF+55, NEWTF+61, NEWTF+67, NEWTF+69 |
| RESULT | NEWTF~, NEWTF+29! |
| RESULT( | NEWTF+73* |
| RESULT(1 | NEWTF+27*, NEWTF+32*, NEWTF+35*, NEWTF+40*, NEWTF+41*, NEWTF+42*, NEWTF+43*, NEWTF+45*, NEWTF+63* |
| SDFN | SET+2~, SET+34*, SET+44 |
| SITE | TFL+18~, TFL+23*, TFL+29, TFL+31, TFL+34, TFL+44, SET+2~, SET+7*, NEWTF+26~, NEWTF+38* , NEWTF+43 |
| SITEIEN | TFL+18~, TFL+31*, TFL+32, TFL+35, NEWTF+44*, NEWTF+45, NEWTF+48, NEWTF+61, NEWTF+62, NEWTF+63 , NEWTF+67 |
| SITEN | SET+2~, SET+3*, SET+7*, SET+36, SET+37, SET+40, SET+43, SET+44 |
| SOURCE | SET+2~ |
| SOURCEID | TFL+42~, TFL+48*, TFL+52 |
| STATUS | SET+2~, SET+34*, SET+43*, SET+44 |
| TFIEN | SET~, SET+3, SET+32, SET+33, QUERYTF+31*, QUERYTF+32, NEWTF+54~, NEWTF+55*, NEWTF+56, NEWTF+58 , NEWTF+69*, NEWTF+70, NEWTF+72 |
| TYPE | TFL+18~, TFL+23*, TFL+34, TFL+35, TFL+44, NEWTF+26~, NEWTF+37*, NEWTF+41 |
| U | TFL+52 |
| VAFC | TFL+18~ |
| VAFCARR | TFL+42~ |
| VAFCARR( | TFL+47, TFL+48, TFL+49, TFL+50, TFL+51 |
| VAFCER | QUERYTF+13~, QUERYTF+17*, QUERYTF+18*, QUERYTF+24*, QUERYTF+33*, QUERYTFQ |
| VAFCTFU1 | TFL+18~ |
| X | TFL+18~, TFL+19*, TFL+59*, QUERYTF+19*, NEWTF+26~, NEWTF+27* |
