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 |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: BPMRP1

Package: IHS Patient Merge

Routine: BPMRP1


Information

BPMRP1 ;IHS/PHXAO/AEF - BPM 1.0 P2 PRINT LIST OF PATIENTS MERGED - 6/26/12 ;

Source Information

Source file <BPMRP1.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 3 NOW^%DTC  EN^DDIOL  ^DIR  
IHS VA Utilities 1 ^XBKVAR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Patient Merge 1 BPM PRINT MERGED LIST  

Entry Points

Name Comments DBIA/ICR reference
EN ;EP -- MAIN ENTRY POINT
NOW()
PRT ;----- PRINT THE ACTUAL REPORT
SLDATE(X) ;EP
QUE(ZTRTN,ZTDESC) ;
HDR(BPMPAGE,BPMOUT) ;
DESC ;----- ROUTINE DESCRIPTION
LOOP ;----- MAIN LOOP THROUGH MERGE IMAGES FILE
DQ ;EP -- QUEUED JOB STARTS HERE

External References

Name Field # of Occurrence
NOW^%DTC NOW+4
^%ZIS QUE+4
^%ZISC DQ+7
^%ZTLOAD QUE+9
EN^DDIOL DESC+10
^DIR HDR+7
^XBKVAR DQ+2, NOW+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"NO DATA TO PRINT"
  • Line Location: PRT+15
Function Call: WRITE
  • Prompt: !?0,"FROM:"
  • Line Location: PRT+18
Function Call: WRITE
  • Prompt: ?7,$P(BPMX,U,2)
  • Line Location: PRT+19
Function Call: WRITE
  • Prompt: ?14,$P(BPMX,U,3)
  • Line Location: PRT+20
Function Call: WRITE
  • Prompt: ?46,$P(BPMX,U,4)
  • Line Location: PRT+21
Function Call: WRITE
  • Prompt: ?56,$P(BPMX,U,5)
  • Line Location: PRT+22
Function Call: WRITE
  • Prompt: ?67,$P(BPMX,U,8)
  • Line Location: PRT+23
Function Call: WRITE
  • Prompt: !?0," TO:"
  • Line Location: PRT+24
Function Call: WRITE
  • Prompt: ?7,$P(BPMX,U,6)
  • Line Location: PRT+25
Function Call: WRITE
  • Prompt: ?14,$P(BPMX,U,7)
  • Line Location: PRT+26
Function Call: WRITE
  • Prompt: ?46,$P(BPMX,U,9)
  • Line Location: PRT+27
Function Call: WRITE
  • Prompt: ?56,$P(BPMX,U,10)
  • Line Location: PRT+28
Function Call: WRITE
  • Prompt: !
  • Line Location: PRT+29
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+13
Function Call: WRITE
  • Prompt: !,"MERGED PATIENTS"
  • Line Location: HDR+14
Function Call: WRITE
  • Prompt: ?49,$$NOW
  • Line Location: HDR+15
Function Call: WRITE
  • Prompt: " PAGE ",BPMPAGE
  • Line Location: HDR+16
Function Call: WRITE
  • Prompt: !?7,"DFN",?14,"PATIENT NAME",?46,"DOB",?56,"SSN",?67,"DATE MERGED"
  • Line Location: HDR+17
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+18
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+19
Function Call: WRITE
  • Prompt: !,"Task #",$G(ZTSK)," queued"
  • Line Location: QUE+10
Routine Call
  • DIR
  • Line Location:
    • HDR+7
Routine Call
  • %ZIS
  • Line Location:
    • QUE+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" NOW+6
^DPT - [#2] LOOP+9, LOOP+11
^TMP("BPMRP1" DQ+4!, LOOP+27*, LOOP+33*, PRT+11, PRT+14, PRT+17
^XDRM - [#15.4] LOOP+6, LOOP+7, LOOP+15, LOOP+17, LOOP+20, LOOP+23, LOOP+29

Label References

Name Line Occurrences
$$NOW HDR+15
$$SLDATE LOOP+13, LOOP+25, LOOP+31
@( QUE+11
HDR PRT+7, PRT+12
LOOP DQ+5
PRT DQ+6
QUE EN+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% NOW+2~, NOW+7
%H NOW+2~
%I NOW+2~
%ZIS QUE+2~, QUE+3*
BPMD0 LOOP+2~, LOOP+5*, LOOP+6*, LOOP+7, LOOP+15, LOOP+17, LOOP+20, LOOP+23, LOOP+27, LOOP+29
BPMD1 LOOP+2~, LOOP+14*, LOOP+15*, LOOP+17, LOOP+20, LOOP+23, LOOP+29
BPMD2 LOOP+2~, LOOP+16*, LOOP+17*, LOOP+20, LOOP+23, LOOP+29
BPMDATA LOOP+2~, LOOP+7*, LOOP+8, LOOP+10, LOOP+12, LOOP+23*, LOOP+24, LOOP+26, LOOP+29*, LOOP+30
, LOOP+32
BPMDATE LOOP+2~, LOOP+12*, LOOP+13*, LOOP+27
BPMDOB LOOP+2~, LOOP+24*, LOOP+25*, LOOP+27, LOOP+30*, LOOP+31*, LOOP+33
BPMFR LOOP+2~, LOOP+8*, LOOP+9, LOOP+20, LOOP+27, LOOP+33
BPMFRN LOOP+2~, LOOP+9*, LOOP+27, LOOP+33
BPMOUT LOOP+2~, LOOP+4*, LOOP+15, LOOP+17, LOOP+20, LOOP+21*, PRT+2~, PRT+4*, PRT+7, PRT+8
, PRT+11, PRT+12, PRT+13, PRT+16*, HDR~, HDR+9*, HDR+10
BPMPAGE PRT+2~, PRT+5*, PRT+7, PRT+12, HDR~, HDR+5, HDR+12*, HDR+16
BPMPAT PRT+2~, PRT+10*, PRT+11*, PRT+17
BPMSSN LOOP+2~, LOOP+26*, LOOP+27, LOOP+32*, LOOP+33
BPMTO LOOP+2~, LOOP+10*, LOOP+11, LOOP+27
BPMTON LOOP+2~, LOOP+11*, LOOP+27
BPMX PRT+2~, PRT+17*, PRT+19, PRT+20, PRT+21, PRT+22, PRT+23, PRT+25, PRT+26, PRT+27
, PRT+28
DIR HDR+3~, HDR+8!
DIR(0 HDR+6*
DIRUT HDR+3~
DT NOW+5
DTOUT HDR+3~
DUOUT HDR+3~
I DESC+10~*, HDR+3~, HDR+19*
IO QUE+2~
IO("Q" QUE+6, QUE+7!
IOF HDR+13
IOM HDR+19, QUE+8
ION QUE+8
IOSL PRT+12, QUE+8
IOST HDR+5, QUE+8
POP QUE+2~, QUE+5
U LOOP+8, LOOP+9, LOOP+10, LOOP+11, LOOP+12, LOOP+24, LOOP+26, LOOP+27, LOOP+30, LOOP+32
, LOOP+33, PRT+19, PRT+20, PRT+21, PRT+22, PRT+23, PRT+25, PRT+26, PRT+27, PRT+28
X DESC+10~*, HDR+3~, NOW+2~, SLDATE~, SLDATE+7, SLDATE+8, SLDATE+9
Y HDR+3~, HDR+9, NOW+5*, NOW+7, SLDATE+5~, SLDATE+6*, SLDATE+9*, SLDATE+10
ZTDESC EN+2~, EN+5*, EN+6, QUE~
ZTIO QUE+2~, QUE+8*
ZTRTN EN+2~, EN+4*, EN+6, QUE~, QUE+11
ZTSAVE EN+2~
ZTSK QUE+2~, QUE+10

Marked Items

Name Field # of Occurrence
$T(DESC+I DESC+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All