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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: VAFCTFU

Package: Registration

Routine: VAFCTFU


Information

VAFCTFU ;ALB/JLU-UTILITIES FOR THE TREATING FACILITY FILE 391.91 ; 5/23/12 12:58pm

Source Information

Source file <VAFCTFU.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
VA FileMan 6 ^%DT  $$FIND1^DIC  (CHK,FILE,UPDATE)^DIE  ^DIK  $$IENS^DILF  $$GET1^DIQ  
Registration 4 XMITFLAG^VAFCDD01  $$PIVNW^VAFHPIVT  $$SEND^VAFHUTL  $$SITE^VASITE  
Health Level Seven 2 UPD^HLSUB  LINK^HLUTIL3  
Kernel 2 $$NOW^XLFDT  ($$LKUP,$$STA)^XUAF4  
Master Patient Index VistA 2 ($$GETDFN,$$GETVCCI)^MPIF001  $$MPINODE^MPIFAPI  
Clinical Information Resource Network 1 (EXC,STOP)^RGHLLOG  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 23

Package Total Caller Graph
Master Patient Index VistA 9 MPIFA24  MPIFA37  MPIFA43  MPIFBT3  MPIFDEL  MPIFQ0  MPIFQ3  MPIFQUE4  
MPIFVTQ  
Clinical Information Resource Network 8 RGADT  RGADT1  RGADT2  RGADTUT  RGDRM02  RGFIPM  RGI15PST  RGMTUT01  
Registration 6 VAFCOTFU  VAFCTF  VAFCTFIN  VAFCTFMF  VAFCTFPR  VAFCTFU2  

Entry Points

Name Comments DBIA/ICR reference
FILETF(PAT,INST) ;programmer entry point.
FILETFQ
FILE(PDFN,FSTRG,TICN,VAFCSLT,ERROR,IPP,SOURCEID,IDENSTAT,AA,IDTYP) ;this module files the individual entry
  • ICR #2988
    • Status: Active
    • Usage: Controlled Subscription
    FILEQ
    FILENEW(PDFN,FAC,PDLT,EVNTR,VAFCSLT,ERROR,IPP,SOURCEID,IDENSTAT,AA,IDTYP) ;
    UPDSID(PDFN,FAC,SID,IDSTAT,TFIEN) ;Update sourceid multiple
    SETSND(PDFN) ;sets the pivot file entry to send MFU
    SETSNDQ
    FILEDIT(TFIEN,PDLT,PDFN,FAC,EVNTR,VAFCSLT,ERROR,IPP,SOURCEID,IDENSTAT,AA,IDTYP) ;
    DELETETF(PAT,INST,DTIEN) ;deletion entry point
  • ICR #2988
    • Status: Active
    • Usage: Controlled Subscription
    DELTFQ
    DELETE(TFIEN) ;the actual deletion code
  • ICR #2988
    • Status: Active
    • Usage: Controlled Subscription
    DELALLTF(PAT) ;Entry point to delete all Treating Facilities for a single
  • ICR #2988
    • Status: Active
    • Usage: Controlled Subscription

    External References

    Name Field # of Occurrence
    ^%DT FILE+21
    $$FIND1^DIC FILE+18, DELETETF+18
    CHK^DIE FILENEW+5, FILEDIT+4
    FILE^DIE UPDSID+7, FILEDIT+13
    UPDATE^DIE FILENEW+17, UPDSID+11
    ^DIK DELETE+5
    $$IENS^DILF UPDSID+5, UPDSID+9
    $$GET1^DIQ FILE+26
    UPD^HLSUB DELETETF+25
    LINK^HLUTIL3 DELETETF+25
    $$GETDFN^MPIF001 FILETF+17, DELETETF+16, DELALLTF+10
    $$GETVCCI^MPIF001 SETSND+6
    $$MPINODE^MPIFAPI FILE+33, DELETETF+23
    EXC^RGHLLOG FILE+19, FILE+22
    STOP^RGHLLOG FILE+19
    XMITFLAG^VAFCDD01 SETSND+15
    $$PIVNW^VAFHPIVT SETSND+13
    $$SEND^VAFHUTL FILE+60
    $$SITE^VASITE FILE+20, FILE+23, FILENEW+17, SETSND+8, FILEDIT+13
    $$NOW^XLFDT DELETETF+25
    $$LKUP^XUAF4 SETSND+7
    $$STA^XUAF4 FILE+16, FILE+29

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DGCN(391.91 - [#391.91] Classic Fileman Calls,  CHK^DIE
    ^DIC(4 - [#4] FIND1^DIC,  GET1^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZOSF("TEST" FILETF+16, FILE+11, FILE+12, SETSND+3, DELETETF+15, DELALLTF+9
    ^DGCN(391.91 - [#391.91] FILE+37, FILE+43, FILE+44, FILE+45, FILE+46, FILENEW+16, FILENEW+21, UPDSID+3, UPDSID+4, SETSND+10
    , SETSND+11, FILEDIT+3, DELETETF+19, DELETETF+21, DELALLTF+12, DELALLTF+14

    Label References

    Name Line Occurrences
    DELETE DELETETF+20, DELALLTF+14
    DELTFQ DELETETF+14, DELETETF+18, DELETETF+19, DELETETF+21
    FILE FILETF+20
    FILEDIT FILE+49
    FILENEW FILE+50
    FILETFQ FILETF+14, FILETF+15, FILETF+16, FILETF+18, DELETETF+15, DELETETF+17
    SETSND FILE+60

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    %DT FILE+21!*
    AA FILE~, FILE+27*, FILE+29*, FILE+48, FILE+49, FILE+50, FILENEW~, FILENEW+12, FILEDIT~, FILEDIT+2
    , FILEDIT+9
    ANS SETSND+2~, SETSND+13*, SETSND+14, SETSND+15
    CMOR FILE+13~, SETSND+5~, SETSND+6*, SETSND+7*, SETSND+8, SETSND+11
    DA FILENEW+2!, FILENEW+22!, DELETE+2!, DELETE+4*, DELETE+5!
    DD FILENEW+2!, FILENEW+22!
    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+22!
    DIK DELETE+2!, DELETE+3*, DELETE+5!
    DO FILENEW+2!, FILENEW+22!
    DT SETSND+13
    DTIEN DELETETF~, DELETETF+11, DELETETF+19, DELETETF+20, DELETETF+21
    ECNT FILE+13~, FILE+14*
    ERR FILENEW+4~*, FILEDIT+1~*
    ERR("DIERR" FILENEW+17, FILEDIT+13
    ERROR FILE~, FILE+49, FILE+50, FILENEW~, FILEDIT~
    ERROR( FILE+20*, FILE+23*, FILENEW+17*, FILEDIT+13*, DELETETF+14*
    EVNTR FILE+13~, FILE+15*, FILE+49, FILE+50, FILENEW~, FILENEW+5*, FILENEW+9, FILEDIT~, FILEDIT+4*, FILEDIT+6
    FAC FILE+13~, FILE+15*, FILE+16, FILE+18, FILE+19, FILE+20, FILE+22, FILE+26, FILE+29, FILE+37
    , FILE+49, FILE+50, FILENEW~, FILENEW+7, UPDSID~, FILEDIT~
    FDA FILENEW+4~, UPDSID+1~, FILEDIT+1~
    FDA( UPDSID+6*, UPDSID+10*
    FDA(1 FILENEW+6*, FILENEW+7*, FILENEW+8*, FILENEW+9*, FILENEW+10*, FILENEW+12*, FILENEW+13*, FILENEW+14*, FILENEW+15*, FILEDIT+5*
    , FILEDIT+6*, FILEDIT+7*, FILEDIT+9*, FILEDIT+10*, FILEDIT+11*, FILEDIT+12*
    FDAIEN FILENEW+4~, FILEDIT+1~
    FILE UPDSID+1~, UPDSID+2*, UPDSID+6, UPDSID+10
    FSTRG FILETF+19~, FILE~, FILE+15
    >> HL("MID" FILE+19, FILE+22, DELETETF+14
    >> HLER DELETETF+25
    ICN FILE+13~, FILE+33*
    IDENSTAT FILE~, FILE+48, FILE+49, FILE+50, FILENEW~, FILENEW+15, FILEDIT~, FILEDIT+2, FILEDIT+12
    IDSTAT UPDSID~, UPDSID+6, UPDSID+10
    IDTYP FILE~, FILE+28*, FILE+29*, FILE+48, FILE+49, FILE+50, FILENEW~, FILENEW+13, FILEDIT~, FILEDIT+2
    , FILEDIT+10
    IEN DELETETF+12~
    IENS UPDSID+1~, UPDSID+5*, UPDSID+6, UPDSID+9*, UPDSID+10
    INST FILETF~, FILETF+14, FILETF+15, FILETF+20, DELETETF~, DELETETF+14, DELETETF+18, DELETETF+25
    IPP FILE~, FILE+49, FILE+50, FILENEW~, FILENEW+10, FILEDIT~, FILEDIT+2, FILEDIT+7
    LINK DELETETF+12~, DELETETF+25
    LINK( DELETETF+25
    LINK(0 DELETETF+25
    LP FILETF+12~, FILETF+20*, DELALLTF+6~, DELALLTF+12*, DELALLTF+14
    PAT FILETF~, FILETF+14, FILETF+17, DELETETF~, DELETETF+14, DELETETF+16, DELALLTF~, DELALLTF+8, DELALLTF+10
    PDFN FILETF+12~, FILETF+17*, FILETF+18, FILETF+20, FILE~, FILE+19, FILE+22, FILE+23, FILE+33, FILE+37
    , FILE+49, FILE+50, FILE+60, FILENEW~, FILENEW+6, UPDSID~, SETSND~, SETSND+6, SETSND+10, SETSND+11
    , SETSND+13, FILEDIT~, DELETETF+12~, DELETETF+16*, DELETETF+17, DELETETF+23, DELALLTF+6~, DELALLTF+10*, DELALLTF+11, DELALLTF+12
    , DELALLTF+14
    PDLT FILE+13~, FILE+15*, FILE+21, FILE+22, FILE+23, FILE+49, FILE+50, 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+48, FILE+49, FILE+50, FILENEW~, FILENEW+14, FILEDIT~, FILEDIT+2, FILEDIT+11
    STA FILE+13~, FILE+16*, FILE+20, FILE+23, FILENEW+17, FILEDIT+13
    STOP SETSND+5~, SETSND+11*, SETSND+12
    TFIEN FILE+13~, FILE+37*, FILE+40, FILE+43, FILE+44, FILE+45, FILE+46, FILE+49, UPDSID~, UPDSID+3
    , UPDSID+4, UPDSID+5, UPDSID+9, FILEDIT~, FILEDIT+3, FILEDIT+5, FILEDIT+6, FILEDIT+7, FILEDIT+9, FILEDIT+10
    , FILEDIT+11, FILEDIT+12, DELETETF+12~, DELETE~, DELETE+4, DELALLTF+6~, DELALLTF+13*, DELALLTF+14*
    TFIEN(0 FILEDIT+3*
    TICN FILE~, FILE+60
    TMPAA FILE+41~, FILE+43*, FILE+48
    TMPFLG FILE+9~, FILE+36*, FILE+37, FILE+48*, FILE+49, FILE+50
    TMPIDST FILE+41~, FILE+46*, FILE+48
    TMPIDTYP FILE+41~, FILE+44*, FILE+48
    TMPSID FILE+41~, FILE+45*, FILE+48
    U FILE+15
    VAFCER FILETF+12~, FILETF+13*, FILETF+14*, FILETF+15*, FILETF+18*, FILETFQ, FILE+13~, FILE+21*, DELETETF+12~, DELETETF+13*
    , DELETETF+14*, DELETETF+17*, DELETETF+18*, DELETETF+19*, DELETETF+21*, DELTFQ, DELALLTF+6~, DELALLTF+7*, DELALLTF+16
    VAFCLLN DELETETF+12~, DELETETF+25*
    VAFCSCN DELETETF+12~, DELETETF+23*, DELETETF+25
    VAFCSLT FILE~, FILE+10*, FILE+19, FILE+20, FILE+22, FILE+23, FILE+49, FILE+50, FILENEW~, FILEDIT~
    , FILEDIT+13
    X FILETF+12~, FILETF+16*, FILE+9~, FILE+11*, FILE+12*, FILE+21*, SETSND+2~, SETSND+3*, DELETETF+12~, DELETETF+15*
    , DELALLTF+6~, DELALLTF+9*
    Y FILE+9~, FILE+21
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All