Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: VAFCTFU1

Package: Registration

Routine: VAFCTFU1


Information

VAFCTFU1 ;BHM/RGY-Utilities for the Treating Facility file 391.91, CONTINUED ;6 May 2021 1:56 PM

Source Information

Source file <VAFCTFU1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 2 $$GET1^DIQ  EN^DIQ1  
Kernel 1 ($$IEN,$$STA)^XUAF4  
Master Patient Index VistA 1 ($$GETDFN,$$GETICN,$$IFLOCAL)^MPIF001  

Caller Graph

Caller Graph Total: 35

Package Total Caller Graph
Registration 7 DG53P951  DGREG  VAFCOFIN  VAFCTFU CONVERT DFN TO ICN  VAFCTFU CONVERT ICN TO DFN  VAFCTFU GET TREATING LIST  VAFCTFU LOCAL ICN  
Integrated Billing 5 IBARXMU  IBCNEDE6  IBCNIUF  IBECEA37  IBMHPMPY1  
Master Patient Index VistA 4 MPIF002  MPIFA24  MPIFDEL  MPIFQUE4  
Clinical Information Resource Network 3 RGADT1  RGFIU  RGRSDYN1  
Order Entry Results Reporting 3 ORVW  ORWCIRN  ORWMHV  
Imaging 2 MAGGTPT1  MAGJLST1  
Virtual Patient Record 2 VPRDJ00  VPRDPT  
Automated Medical Information Exchange 1 DVBABDOD  
Beneficiary Travel 1 DGBTRDV  
Clinical Reminders 1 PXRMRDI  
Enterprise Health Management Platform 1 HMPDJ00  
Health Summary 1 GMTSDEMB  
National Health Information Network 1 NHINVPT  
Outpatient Pharmacy 1 PSORX1  
PCE Patient Care Encounter 1 PXVRPC7A  
VA Point of Service 1 VPSRPC5  

Entry Points

Name Comments DBIA/ICR reference
TFL(LIST,DFN) ;for dfn get list of treating facilities
  • ICR #2990
    • Status: Active
    • Usage: Supported
    GETICN(RESULT,DFN) ;
    GETDFN(RESULT,ICN) ;
    IFLOCAL(RESULT,DFN) ;
    SET(TFIEN,ARY,CTR) ;This sets the array with the treating facility list.
    ; Returns: treating facility ^ treatment date ^ event reason (if any)
    ; *261 gjc@120899 (formerly part of VAFCTFU prior to DG*5.3*261)
    QUERYTF(PAT,ARY,INDX) ;a query for Treating Facility.
  • ICR #2990
    • Status: Active
    • Usage: Supported
    QUERYTFQ
    ISVAMC(SITEIEN,SITEID) ;Return 1 if this is a VAMC
    ISPATIEN(TFLIEN) ;Return 1 if Source ID Type is "PI" or null

    External References

    Name Field # of Occurrence
    $$GET1^DIQ ISVAMC+7
    EN^DIQ1 TFL+11
    $$GETDFN^MPIF001 GETDFN+1, QUERYTF+28
    $$GETICN^MPIF001 TFL+4, GETICN+1
    $$IFLOCAL^MPIF001 IFLOCAL+1
    $$IEN^XUAF4 ISVAMC+3
    $$STA^XUAF4 SET+5, ISVAMC+4

    Used in RPC

    RPC Name Call Tags
    VAFCTFU CONVERT DFN TO ICN GETICN
    VAFCTFU CONVERT ICN TO DFN GETDFN
    VAFCTFU LOCAL ICN IFLOCAL
    VAFCTFU GET TREATING LIST TFL

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DIC(4 - [#4] GET1^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZOSF("TEST" TFL+2, QUERYTF+27
    ^DGCN(391.91 - [#391.91] SET+3, QUERYTF+37, QUERYTF+40, QUERYTF+42, QUERYTF+46, QUERYTF+52, ISPATIEN+2, ISPATIEN+3

    Label References

    Name Line Occurrences
    $$ISPATIEN QUERYTF+41
    $$ISVAMC QUERYTF+38
    $$QUERYTF TFL+6
    QUERYTFQ QUERYTF+25, QUERYTF+27, QUERYTF+29
    SET QUERYTF+45, QUERYTF+52

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    ARY SET~, SET+7, QUERYTF~, QUERYTF+25, QUERYTF+45, QUERYTF+52, QUERYTF+54
    CTR SET~, SET+7*, QUERYTF+24~, QUERYTF+26*, QUERYTF+45, QUERYTF+52
    DA TFL+1~, TFL+10*
    DFN TFL~, TFL+4, GETICN~, GETICN+1, IFLOCAL~, IFLOCAL+1
    DGCN SET+3~
    DGCN(0 SET+3*, SET+5, SET+6, SET+7
    DIC TFL+1~, TFL+3*
    DIERR ISVAMC+2~
    DIQ TFL+1~, TFL+3*
    DIQ(0 TFL+3*
    DR TFL+1~, TFL+3*
    ICN TFL+1~, TFL+4*, TFL+5, TFL+6, GETDFN~, GETDFN+1
    INDX QUERYTF~, QUERYTF+26*, QUERYTF+37, QUERYTF+46
    INSTIEN SET+3~, SET+5*
    LIST TFL~
    LIST( TFL+8, TFL+10, TFL+12*
    LIST(1 TFL+2*, TFL+5*, TFL+7*
    LP QUERYTF+24~, QUERYTF+37*, QUERYTF+38, QUERYTF+40, QUERYTF+46*, QUERYTF+52
    LSTA SET+3~, SET+5*, SET+6
    MSG ISVAMC+2~
    PAT QUERYTF~, QUERYTF+25, QUERYTF+28
    PDFN QUERYTF+24~, QUERYTF+28*, QUERYTF+29, QUERYTF+37, QUERYTF+40, QUERYTF+46, QUERYTF+52
    RESULT GETICN~, GETICN+1*, GETDFN~, GETDFN+1*, IFLOCAL~, IFLOCAL+1*
    SITEID ISVAMC~, ISVAMC+3, ISVAMC+4*, ISVAMC+6, ISVAMC+7
    SITEIEN ISVAMC~, ISVAMC+3*, ISVAMC+4, ISVAMC+7
    TFIEN SET~, SET+3, QUERYTF+40*, QUERYTF+41, QUERYTF+42, QUERYTF+43, QUERYTF+44, QUERYTF+52*
    TFLIEN ISPATIEN~, ISPATIEN+2, ISPATIEN+3
    U TFL+7, SET+7, ISVAMC+6
    VAFC TFL+1~, TFL+8*, TFL+10, TFL+12
    VAFCER QUERYTF+24~, QUERYTF+25*, QUERYTF+26*, QUERYTF+29*, QUERYTF+54*, QUERYTFQ
    VAFCTFU1 TFL+1~, TFL+9!
    VAFCTFU1(4 TFL+12
    X TFL+1~, TFL+2*, TFL+6*, TFL+7, QUERYTF+27*
    ZDLT QUERYTF+24~, QUERYTF+42*, QUERYTF+44
    ZTDLT QUERYTF+24~, QUERYTF+39*, QUERYTF+43, QUERYTF+44*
    ZTFIEN QUERYTF+24~, QUERYTF+39*, QUERYTF+43*, QUERYTF+44*, QUERYTF+45
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All