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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: DGPFRFR1

Package: Registration

Routine: DGPFRFR1


Information

DGPFRFR1 ;ALB/RBS - PRF ASSIGNMENTS DUE REVIEW REPORT CONT. ; 5/21/03 4:40pm

Source Information

Source file <DGPFRFR1.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Kernel 4 HOME^%ZIS  ^%ZISC  $$S^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  
Registration 4 $$GETASGN^DGPFAA  $$NOTIFYDT^DGPFAA3  ($$GETFIRST,$$GETHIST)^DGPFAAH  $$GETPAT^DGPFUT2  
VA FileMan 2 WAIT^DICD  ^DIR  
List Manager 1 $$FDATE^VALM1  

Entry Points

Name Comments DBIA/ICR reference
START ; compile and print report
LOOP(DGSORT) ;use sort var's for record searching to build list
; Input:
; DGSORT - array of user selected report parameters
BLDTMP(DGSORT,DGDFN,DGIEN,DGLIST) ; list global builder
; Input:
; DGSORT - array of user selected report parameters
; DGDFN - ien of patient in PATIENT (#2) file
; DGIEN - ien pointer to PRF ASSIGNMENT (#26.13) file record
PRINT(DGSORT,DGLIST) ;output report
; Input:
; DGSORT - array of user selected report parameters
PAUSE(DGQ) ; pause screen display
; Input:
; DGQ - var used to quit report processing to user CRT
; Output:
; DGQ - passed by reference - 0 = Continue, 1 = Quit
SUB(CNT,TYP) ; print sub-totals
; Input:
; CNT - count of records printed
; TYP - indicator of which total count is being printed
; Output: Write lines of Sub-Totals and Totals per Flag and Category
HEAD ;Print/Display page header
EXIT ;

External References

Name Field # of Occurrence
HOME^%ZIS EXIT+5
^%ZISC EXIT+5
$$S^%ZTLOAD HEAD+1
$$GETASGN^DGPFAA BLDTMP+14
$$NOTIFYDT^DGPFAA3 BLDTMP+30
$$GETFIRST^DGPFAAH BLDTMP+17
$$GETHIST^DGPFAAH BLDTMP+17
$$GETPAT^DGPFUT2 BLDTMP+21
WAIT^DICD START+1
^DIR PAUSE+6
$$FDATE^VALM1 BLDTMP+25, BLDTMP+27, HEAD+10
$$FMTE^XLFDT PRINT+8
$$NOW^XLFDT PRINT+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," >>> No Record Flag Assignments were found using the report criteria."
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !,$E(DGNAM,1,20),?22,$P(DGSTR,U),?33,$P(DGSTR,U,2),?43,$P(DGSTR,U,3),?60,$P(DGSTR,U,4)
  • Line Location: PRINT+28
Function Call: WRITE
  • Prompt: !!,"REPORT SUMMARY:",!,"---------------"
  • Line Location: PRINT+41
Function Call: WRITE
  • Prompt: !,"Total Review Assignments for Category "
  • Line Location: PRINT+45
Function Call: WRITE
  • Prompt: $S(DGCAT=1:"I",DGCAT=2:"II",1:"I & II"),":"
  • Line Location: PRINT+46
Function Call: WRITE
  • Prompt: ?47,$J(+$G(DGCNT(DGCAT)),6)
  • Line Location: PRINT+47
Function Call: WRITE
  • Prompt: !!,"<End of Report>"
  • Line Location: PRINT+49
Function Call: WRITE
  • Prompt: !,"Total Review Assignments for "_DGTYPE_": ",DGCOUNT
  • Line Location: SUB+10
Function Call: WRITE
  • Prompt: !?22,"PATIENT RECORD FLAGS"
  • Line Location: HEAD+6
Function Call: WRITE
  • Prompt: !?16,"ASSIGNMENTS DUE FOR REVIEW REPORT",?70,"Page: ",$G(DGPAGE)
  • Line Location: HEAD+7
Function Call: WRITE
  • Prompt: !?16,"---------------------------------",?51,"Printed: ",DGDT
  • Line Location: HEAD+8
Function Call: WRITE
  • Prompt: !?2,"CATEGORY: "_$S($G(DGCAT)=1:"Category I (National)",$G(DGCAT)=2:"Category II (Local)",1:"Both (Category I & II)")
  • Line Location: HEAD+9
Function Call: WRITE
  • Prompt: !,"DATE RANGE: ",$$FDATE^VALM1($G(DGSORT("DGBEG")))_" TO "_$$FDATE^VALM1($G(DGSORT("DGEND")))
  • Line Location: HEAD+10
Function Call: WRITE
  • Prompt: !?1,"FLAG NAME: ",$G(DGFG),!
  • Line Location: HEAD+11
Function Call: WRITE
  • Prompt: DGLINE
  • Line Location: HEAD+12
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?22,"SSN",?33,"ASSIGNED",?43,"REVIEW DT",?54,"NOTIFICATION SENT"
  • Line Location: HEAD+13
Function Call: WRITE
  • Prompt: !,"--------------------",?22,"---------",?33,"--------",?43,"---------",?54,"-----------------"
  • Line Location: HEAD+14
Routine Call
  • %ZIS
  • Line Location:
    • EXIT+5
Routine Call
  • DIR
  • Line Location:
    • PAUSE+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPF(26.13 - [#26.13] LOOP+14, LOOP+17, LOOP+19, LOOP+20, LOOP+21, BLDTMP+31
^TMP("DGPFRFR1" START+3

Label References

Name Line Occurrences
BLDTMP LOOP+22
EXIT START+7
HEAD PRINT+12, PRINT+20, PRINT+25, PRINT+40
LOOP START+5
PAUSE HEAD+2
PRINT START+6
SUB PRINT+19, PRINT+31, PRINT+32

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS EXIT+4!
CNT SUB~, SUB+8
DGBEG LOOP+7~, LOOP+13
DGC LOOP+7~, LOOP+10*, LOOP+11*, BLDTMP+15
DGCAT LOOP+7~, LOOP+10, PRINT+6~, PRINT+10*, PRINT+15*, PRINT+16*, PRINT+17, PRINT+22, PRINT+23, PRINT+24
, PRINT+27, PRINT+39*, PRINT+42*, PRINT+43, PRINT+44, PRINT+46, PRINT+47, SUB+7, SUB+8, HEAD+9
DGCATG BLDTMP+9~, BLDTMP+11*, BLDTMP+22*, BLDTMP+34
DGCNT PRINT+6~, PRINT+7*, PRINT+19, PRINT+21*, PRINT+24*, PRINT+30, PRINT+31, PRINT+32, PRINT+33*
DGCNT( PRINT+24*, PRINT+43, PRINT+47, SUB+8
DGCNT(3 PRINT+43*
DGCOUNT SUB+6~, SUB+8*, SUB+10
DGDFN LOOP+7~, LOOP+16*, LOOP+17*, LOOP+19, LOOP+20, LOOP+21, LOOP+22, BLDTMP~, BLDTMP+21, BLDTMP+34
, PRINT+6~, PRINT+15*, PRINT+23*, PRINT+27
DGDT PRINT+6~, PRINT+8*, HEAD+8
DGEND LOOP+7~, LOOP+15
DGFG LOOP+7~, LOOP+8*, LOOP+12*, LOOP+21, BLDTMP+10~, BLDTMP+23*, BLDTMP+34, PRINT+6~, PRINT+11*, PRINT+15*
, PRINT+17*, PRINT+18, PRINT+21, PRINT+22, PRINT+23, PRINT+27, PRINT+39*, HEAD+11
DGFLAG LOOP+7~, LOOP+12
DGGRAND PRINT+6~, PRINT+7*, PRINT+39*, HEAD+12
DGIEN LOOP+7~, LOOP+18*, LOOP+19*, LOOP+20, LOOP+21, LOOP+22, BLDTMP~, BLDTMP+14, BLDTMP+17, BLDTMP+31
DGINIT BLDTMP+9~, BLDTMP+11*, BLDTMP+25*, BLDTMP+33
DGLINE BLDTMP+10~, BLDTMP+11*, BLDTMP+33*, BLDTMP+34, PRINT+6~, PRINT+7*, HEAD+12
DGLIST START+2~, START+3*, START+4, START+6, LOOP+22, BLDTMP~, BLDTMP+34, PRINT~, PRINT+9, PRINT+16
, PRINT+17, PRINT+22, PRINT+23, PRINT+27, EXIT+2
DGNAM PRINT+6~, PRINT+15*, PRINT+22*, PRINT+23, PRINT+27, PRINT+28
DGNAME BLDTMP+10~, BLDTMP+11*, BLDTMP+24*, BLDTMP+34
DGNOT BLDTMP+10~, BLDTMP+11*, BLDTMP+30*, BLDTMP+31, BLDTMP+32*
DGNOW LOOP+7~, BLDTMP+28
DGOFG PRINT+6~, PRINT+15*, PRINT+18, PRINT+21*, PRINT+33*
DGPAGE PRINT+6~, PRINT+7*, PAUSE+6, HEAD+4, HEAD+5*, HEAD+7
DGPFA BLDTMP+9~, BLDTMP+12!, BLDTMP+14, BLDTMP+35!
DGPFA("FLAG" BLDTMP+15, BLDTMP+22, BLDTMP+23, BLDTMP+30
DGPFA("REVIEWDT" BLDTMP+26, BLDTMP+27, BLDTMP+28, BLDTMP+30
DGPFAH BLDTMP+9~, BLDTMP+12!, BLDTMP+17, BLDTMP+35!
DGPFAH("ASSIGNDT" BLDTMP+19
DGPFAH("INITASSIGN" BLDTMP+19*, BLDTMP+20, BLDTMP+25
DGPFPAT BLDTMP+9~, BLDTMP+12!, BLDTMP+21, BLDTMP+35!
DGPFPAT("NAME" BLDTMP+24
DGPFPAT("SSN" BLDTMP+33
DGPTR BLDTMP+9~, BLDTMP+11*
DGQ LOOP+7~, LOOP+8*, LOOP+14, LOOP+15*, PRINT+6~, PRINT+7*, PRINT+16, PRINT+17, PRINT+22, PRINT+23
, PRINT+26, PRINT+29, PRINT+36, PAUSE~, PAUSE+6*, HEAD+1*, HEAD+2, HEAD+3
DGREV BLDTMP+10~, BLDTMP+11*, BLDTMP+27*, BLDTMP+28*, BLDTMP+32*, BLDTMP+33
DGSORT START+5, START+6, LOOP~, LOOP+22, BLDTMP~, PRINT~
DGSORT( LOOP+9
DGSORT("DGBEG" HEAD+10
DGSORT("DGCAT" PRINT+10, PRINT+38
DGSORT("DGEND" HEAD+10
DGSORT("DGFLAG" PRINT+11, PRINT+32
DGSTR PRINT+6~, PRINT+15*, PRINT+27*, PRINT+28
DGSUB LOOP+7~, LOOP+13*, LOOP+14*, LOOP+15, LOOP+17, LOOP+19
DGTYPE SUB+6~, SUB+7*, SUB+10
DGX LOOP+7~, LOOP+9*
DGYN BLDTMP+10~, BLDTMP+11*, BLDTMP+31*, BLDTMP+32*, BLDTMP+33
DIR PAUSE+6!
DIR(0 PAUSE+6*
IOF HEAD+4
IOSL PRINT+25
IOST START+1, PAUSE+6, HEAD+4
POP EXIT+4!
TYP SUB~, SUB+7, SUB+8, SUB+9, SUB+11
U LOOP+12, BLDTMP+15, BLDTMP+22, BLDTMP+23, BLDTMP+30, BLDTMP+33, PRINT+11, PRINT+28
X PRINT+6~
Y PRINT+6~, PAUSE+6
>> ZTQUEUED PRINT+36, HEAD+1, EXIT+1, EXIT+3
>> ZTREQ EXIT+1*
>> ZTSTOP HEAD+1*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All