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

Package: Registration

Routine: DGPFUT2


Information

DGPFUT2 ;ALB/KCL - PRF UTILITIES CONTINUED ; 2/12/2020

Source Information

Source file <DGPFUT2.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 3 BLD^DIALOG  FILE^DIE  ($$GET1,GETS)^DIQ  
Registration 2 TFL^VAFCTFU2  $$SITE^VASITE  
Kernel 1 ($$IEN,$$STA)^XUAF4  
Master Patient Index VistA 1 $$GETDFN^MPIF001  

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: 26

Package Total Caller Graph
Registration 26 DGPFAPI  DGPFBGR  DGPFCNV  DGPFHLF  DGPFHLQ  DGPFHLR  DGPFHLS  DGPFHLT1  
DGPFHLU  DGPFHLU5  DGPFHLUQ  DGPFLMA4  DGPFLMQ1  DGPFLMT1  DGPFLMT3  DGPFLMU  
DGPFMPI  DGPFRAB1  DGPFRAL1  DGPFRDB1  DGPFRFA1  DGPFRFR1  DGPFRPA1  DGPFRPI1  
DGPFUT  DGPFUT3  

Entry Points

Name Comments DBIA/ICR reference
GETPAT(DGDFN,DGPAT) ;retrieve patient identifying information
; Used to obtain identifying information for a patient
; in the PATIENT (#2) file and place it in an array format.
GETDFN(DGICN,DGEROOT) ;Used to convert an ICN to a DFN.
SORT(DGPFARR) ;Re-sort of active record assignments by category then flag name
; This function re-sorts the active record flag assignment list for a
; patient by category (Cat I or Cat II) and then by flag name.
ACTDT ; update PRF Software Activation Date field in (#26.18)
; This utility should only be run at the Alpha and Beta test sites
; of the Patient Record Flags Project, Patch DG*5.3*425.
; If necessary, this entry point will change the date that the
; Patient Record Flags (PRF) System became active.
; The (#1) PRF SOFTWARE ACTIVATION DATE field of the (#26.18) PRF
; PARAMETERS file, will be changed to: SEP 25, 2003
BLDTFL(DGDFN,DGTFL) ;build array of Treating Facilities
; This function builds an array of INSTITUTION (#4) file pointers
; that are non-local medical treating facilities for a given patient.
BLDTFL2(DGDFN,DGTFL) ;

External References

Name Field # of Occurrence
BLD^DIALOG GETDFN+24
FILE^DIE ACTDT+52, ACTDT+60
$$GET1^DIQ BLDTFL+27
GETS^DIQ ACTDT+37
$$GETDFN^MPIF001 GETDFN+23
TFL^VAFCTFU2 BLDTFL+15
$$SITE^VASITE BLDTFL+12, BLDTFL+13
$$IEN^XUAF4 BLDTFL+19, BLDTFL+25
$$STA^XUAF4 BLDTFL+27, BLDTFL2+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Updating the PRF SOFTWARE ACTIVATION DATE (#1) field in the PRF PARAMETERS FILE (#26.18) to the value of SEP 25, 2003..."
  • Line Location: ACTDT+25
Function Call: WRITE
  • Prompt: !!,$C(7)
  • Line Location: ACTDT+67
Function Call: WRITE
  • Prompt: "Field could not be updated...",DGERRMSG
  • Line Location: ACTDT+69
Function Call: WRITE
  • Prompt: "Field was successfully changed from ",$G(DGPARM(26.18,"1,",1,"E"))," to ",$G(DGFDA(26.18,DGIENS,DGFLD)),"."
  • Line Location: ACTDT+71
Routine Call
  • DIALOG
  • Line Location:
    • GETDFN+24
Routine Call
  • DIE
  • Line Location:
    • ACTDT+52
    • ACTDT+60

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCN(391.91 - [#391.91] BLDTFL+20, BLDTFL+22, BLDTFL+28, BLDTFL+30
^DPT - [#2] GETPAT+26, GETPAT+29
^TMP("DGPFUT2" SORT+25

Label References

Name Line Occurrences
$$BLDTFL BLDTFL2+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DGACTDT ACTDT+12~, ACTDT+20*, ACTDT+59
DGCAT SORT+15~, SORT+31*, SORT+32, SORT+35*, SORT+36*, SORT+38, SORT+40
DGDFN GETPAT~, GETPAT+26, GETPAT+29, GETPAT+31, GETDFN+16~, GETDFN+23*, GETDFN+24, GETDFN+26, BLDTFL~, BLDTFL+14
, BLDTFL+20, BLDTFL+28, BLDTFL2~, BLDTFL2+2
DGDLT BLDTFL+11~, BLDTFL+22*, BLDTFL+23, BLDTFL+30*, BLDTFL+31
DGEROOT GETDFN~, GETDFN+20*, GETDFN+21, GETDFN+24
DGERR ACTDT+16~, ACTDT+40, ACTDT+55, ACTDT+63
DGERR("DIERR" ACTDT+41, ACTDT+56, ACTDT+64
DGERRMSG ACTDT+17~, ACTDT+29*, ACTDT+32, ACTDT+33*, ACTDT+36, ACTDT+41*, ACTDT+45*, ACTDT+48, ACTDT+56*, ACTDT+64*
, ACTDT+68, ACTDT+69
DGFDA ACTDT+15~
DGFDA( ACTDT+51*, ACTDT+59*, ACTDT+71
DGFLD ACTDT+14~, ACTDT+22*, ACTDT+71
DGI BLDTFL+11~, BLDTFL+16*, BLDTFL+17, BLDTFL+18, BLDTFL+19, BLDTFL+25, BLDTFL2+1~, BLDTFL2+4*, BLDTFL2+6
DGICN GETDFN~, GETDFN+23
DGIEN BLDTFL+11~, BLDTFL+20*, BLDTFL+21, BLDTFL+22, BLDTFL+28*, BLDTFL+29, BLDTFL+30
DGIENS ACTDT+13~, ACTDT+21*, ACTDT+51, ACTDT+59, ACTDT+71
DGINDX SORT+16~
DGINDX( SORT+32*, SORT+36, SORT+38, SORT+40
DGJ BLDTFL2+1~, BLDTFL2+3*, BLDTFL2+5*, BLDTFL2+6
DGKEY BLDTFL+11~, BLDTFL+14*, BLDTFL+15
DGNAME SORT+17~, SORT+37*, SORT+38*, SORT+40
DGNODE GETPAT+21~, GETPAT+29*, GETPAT+32, GETPAT+33, GETPAT+34, GETPAT+35
DGOUT BLDTFL+11~, BLDTFL+15
DGOUT( BLDTFL+16, BLDTFL+17, BLDTFL+18, BLDTFL+19, BLDTFL+25
DGPARM ACTDT+18~
DGPARM( ACTDT+44, ACTDT+71
DGPAT GETPAT~
DGPAT("DFN" GETPAT+31*
DGPAT("DOB" GETPAT+34*
DGPAT("NAME" GETPAT+32*
DGPAT("SEX" GETPAT+33*
DGPAT("SSN" GETPAT+35*
DGPFARR SORT~, SORT+22, SORT+23, SORT+30, SORT+31, SORT+32, SORT+40, SORT+43, SORT+44
DGRET BLDTFL2+1~, BLDTFL2+2*
DGSORT SORT+18~, SORT+25*, SORT+26, SORT+40, SORT+44, SORT+45
DGSTAT BLDTFL+11~, BLDTFL+12*, BLDTFL+14
DGSTATI BLDTFL+11~, BLDTFL+13*, BLDTFL+27
DGSTI BLDTFL+11~, BLDTFL+19*, BLDTFL+20, BLDTFL+23, BLDTFL+25*, BLDTFL+27, BLDTFL+28, BLDTFL+31
DGTFL BLDTFL~, BLDTFL2~
DGTFL( BLDTFL+23*, BLDTFL+31*, BLDTFL2+6*
DGTFL(0 BLDTFL+33
DGTMP BLDTFL2+1~, BLDTFL2+2
DGTMP( BLDTFL2+4
DGX SORT+19~, SORT+29*, SORT+30*, SORT+31, SORT+32, SORT+35*, SORT+39*, SORT+40
DIERR GETDFN+17~
DT ACTDT+28, ACTDT+32
DUZ ACTDT+28
DUZ(0 ACTDT+28
RESULT GETPAT+22~, GETPAT+24*, GETPAT+36*, GETPAT+38
U SORT+31, SORT+32, ACTDT+28, BLDTFL+12, BLDTFL+13, BLDTFL+14, BLDTFL+17, BLDTFL+18, BLDTFL+19, BLDTFL+22
, BLDTFL+25, BLDTFL+30
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All