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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BRNRUP1

Package: IHS Release Of Information

Routine: BRNRUP1


Information

BRNRUP1 ; IHS/OIT/LJF - CONTINUED REPORT UTILITY PRINT LOGIC

Source Information

Source file <BRNRUP1.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
IHS Release Of Information 1 PAUSE^BRNU  
VA Fileman 1 ^DIWP  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Release Of Information 2 BRNRUP  BRNRUP3  

Entry Points

Name Comments DBIA/ICR reference
COUNT ;if COUNTING entries only
COVPAGE ;EP
SHOWP ; display what the report will contain based on report type
WP ;EP - Entry point to print wp fields
; pass file in BRNFILE, entry in BRNDA, subscript in BRNNODE

External References

Name Field # of Occurrence
PAUSE^BRNU COVPAGE+14, SHOWP+6, SHOWP+8, SHOWP+10, SHOWP+11, SHOWP+24, SHOWP+29, SHOWP+33, SHOWP+37, SHOWP+39
, COUNT+1
^DIWP WP+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?20,"ROI REPORT UTILITY ",$S(BRNCTYP="D":"LISTING",1:"COUNT")
  • Line Location: COVPAGE+2
Function Call: WRITE
  • Prompt: !?34,"SUMMARY PAGE"
  • Line Location: COVPAGE+3
Function Call: WRITE
  • Prompt: !!,"REPORT REQUESTED BY: ",$P(^VA(200,DUZ,0),U),!
  • Line Location: COVPAGE+4
Function Call: WRITE
  • Prompt: !,"Disclosure Record Selection Criteria"
  • Line Location: COVPAGE+5
Function Call: WRITE
  • Prompt: !?6,"Request Date range: ",BRNBDD," to ",BRNEDD
  • Line Location: COVPAGE+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: COVPAGE+14
Function Call: WRITE
  • Prompt: !?6,$P(^BRNSORT(BRNI,0),U),": "
  • Line Location: COVPAGE+15
Function Call: WRITE
  • Prompt: X
  • Line Location: COVPAGE+18
Function Call: WRITE
  • Prompt: !!,"REPORT/OUTPUT TYPE",!
  • Line Location: SHOWP+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SHOWP+6
Function Call: WRITE
  • Prompt: ?6,"Report will contain sub-totals by ",$P(^BRNSORT(BRNSORT,0),U)," and ",!?6,"total counts."
  • Line Location: SHOWP+7
Function Call: WRITE
  • Prompt: !!,"NO DATA TO REPORT.",!
  • Line Location: SHOWP+8
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $D(IOF)
  • Line Location: SHOWP+8
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SHOWP+11
Function Call: WRITE
  • Prompt: ?6,"Detailed Listing containing"
  • Line Location: SHOWP+13
Function Call: WRITE
  • Prompt: !?5,"PLEASE NOTE: The first column of the delimited output will always"
  • Line Location: SHOWP+16
Function Call: WRITE
  • Prompt: !?5," be the patient internal entry number which uniquely"
  • Line Location: SHOWP+17
Function Call: WRITE
  • Prompt: !?5," identifies the patient. The second column will always"
  • Line Location: SHOWP+18
Function Call: WRITE
  • Prompt: !?5," be the request internal entry number which uniquely"
  • Line Location: SHOWP+19
Function Call: WRITE
  • Prompt: !?5," identifies the disclosure request.",!
  • Line Location: SHOWP+20
Function Call: WRITE
  • Prompt: ?6,"A File of records called ",BRNDELF," will be created."
  • Line Location: SHOWP+21
Function Call: WRITE
  • Prompt: !?6,"Delimited output file will contain:"
  • Line Location: SHOWP+22
Function Call: WRITE
  • Prompt: !?6,$P(^BRNSORT(BRNCRIT,0),U)
  • Line Location: SHOWP+30
Function Call: WRITE
  • Prompt: " ("
  • Line Location: SHOWP+31
Function Call: WRITE
  • Prompt: $P(^BRNRPT(BRNRPT,12,X,0),U,2),")"
  • Line Location: SHOWP+31
Function Call: WRITE
  • Prompt: !?10," TOTAL column width: ",BRNTCW
  • Line Location: SHOWP+34
Function Call: WRITE
  • Prompt: !!,"Disclosure Requests will be SORTED by: ",$P(^BRNSORT(BRNSORT,0),U),!
  • Line Location: SHOWP+38
Function Call: WRITE
  • Prompt: !?6,"Each ",$P(^BRNSORT(BRNSORT,0),U)," will be on a separate page.",!
  • Line Location: SHOWP+40
Function Call: WRITE
  • Prompt: !!,"NO DATA TO REPORT.",!
  • Line Location: SHOWP+42
Function Call: WRITE
  • Prompt: !!!,"Total Disclosure Requests: ",BRNRCNT
  • Line Location: SHOWP+45
Function Call: WRITE
  • Prompt: !,"Total Patients: ",BRNPTCT
  • Line Location: SHOWP+46
Function Call: WRITE
  • Prompt: ?6,"Totals Displayed"
  • Line Location: COUNT+2
Function Call: WRITE
  • Prompt: !!!,"NO DATA TO REPORT.",!
  • Line Location: COUNT+3
Function Call: WRITE
  • Prompt: !?6,"Total COUNT of Patients: ",?34,BRNPTCT
  • Line Location: COUNT+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BRNRPT - [#90264.8] COVPAGE+9, COVPAGE+13, COVPAGE+17, SHOWP+24, SHOWP+28, SHOWP+31, WP+6
^BRNSORT - [#90264.7] COVPAGE+15, COVPAGE+18, SHOWP+7, SHOWP+30, SHOWP+38, SHOWP+40
^DIC - [#1] WP+5
^UTILITY($J WP+3!, WP+9, WP+11!
^VA(200 - [#200] COVPAGE+4
^XTMP("BRNVL" SHOWP+8, SHOWP+42, COUNT+3

Label References

Name Line Occurrences
COUNT SHOWP+2
SHOWP COVPAGE+9, COVPAGE+19

Naked Globals

Name Field # of Occurrence
^(2 COVPAGE+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BRNBDD COVPAGE+6
>> BRNBTH SHOWP+8, SHOWP+42, COUNT+3
BRNCRIT SHOWP+27~, SHOWP+28*, SHOWP+30, SHOWP+31
>> BRNCTYP COVPAGE+2, SHOWP+2, SHOWP+5, SHOWP+10, SHOWP+13, SHOWP+15, SHOWP+31, SHOWP+34, SHOWP+44
BRNDA WP+5, WP+11!
>> BRNDELF SHOWP+21
>> BRNEDD COVPAGE+6
BRNFILE WP+5, WP+11!
BRNG WP+2~, WP+5*, WP+6
BRNG1 WP+2~, WP+5*
>> BRNGR WP+5*, WP+7
BRNI COVPAGE+12~, COVPAGE+13*, COVPAGE+15, COVPAGE+17, COVPAGE+18, SHOWP+27~, SHOWP+28*, WP+6
>> BRNJOB SHOWP+8, SHOWP+42, COUNT+3
BRNNODE WP+5, WP+11!
>> BRNPCNT WP+9*, WP+10*
>> BRNPRNM( WP+9*
>> BRNPTCT SHOWP+46, COUNT+5
BRNQ COVPAGE+12~, COVPAGE+16!, COVPAGE+17
>> BRNRCNT SHOWP+45, COUNT+4
BRNRLX WP+2~, WP+4*, WP+6*
>> BRNRPT COVPAGE+9, COVPAGE+13, COVPAGE+17, SHOWP+24, SHOWP+28, SHOWP+31, WP+6
>> BRNSORT SHOWP+7, SHOWP+36, SHOWP+38, SHOWP+40
>> BRNSPAG SHOWP+40
>> BRNTCW SHOWP+34
BRNY COVPAGE+12~, COVPAGE+16*, COVPAGE+17*, COVPAGE+18
C COVPAGE+12~, COVPAGE+16*, COVPAGE+17*
DIWF WP+2~
DIWL WP+2~, WP+6*, WP+9
DIWR WP+2~, WP+6*
DUZ COVPAGE+4
IOF COVPAGE+1, COVPAGE+14, SHOWP+6, SHOWP+8, SHOWP+10, SHOWP+11, SHOWP+29, SHOWP+33, SHOWP+37, SHOWP+39
, COUNT+1
IOSL COVPAGE+14, SHOWP+6, SHOWP+11, SHOWP+29, SHOWP+33, SHOWP+37, SHOWP+39, COUNT+1
U COVPAGE+4, COVPAGE+15, SHOWP+7, SHOWP+28, SHOWP+30, SHOWP+31, SHOWP+38, SHOWP+40, WP+6
X COVPAGE+12~, COVPAGE+18*, SHOWP+31*, WP+2~, WP+7*
Y WP+2~, WP+7*
Z WP+2~, WP+9*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All