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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: XDRRMRG2

Package: Toolkit

Routine: XDRRMRG2


Information

XDRRMRG2 ;SF-IRMFO/GB,JLI - GET PATIENT HEALTH SUMMARY ;06/26/98 13:35 [ 04/02/2003 8:47 AM ]

Source Information

Source file <XDRRMRG2.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 3 DOCLIST^DDBR  ^DIC  ^DIR  
Health Summary 1 ENX^GMTSDVR  
Toolkit 1 $$GET^XPAR  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Toolkit 2 XDRDPICK  XDRRMRG1  
IHS Patient Merge 1 BPMVER  

Entry Points

Name Comments DBIA/ICR reference
QUEUE ;Will process the print task for patients' health summaries.
PRINT2 ;Prints the record pair using the Browser of to a device.
QUEUEX
PRINTX
LABIEN(FILE,REC) ;REM - Resolve LABs DFNFR and DFNTO.
ASKX
GATHER(DFN,FDATE,TDATE,HIUSERS,QLIST) ; No need to gather
PRINT2X
COUNTX
COUNT(XDRFILE,FROM,TO)
LABIENX
REC2
PRINT(QLIST) ;Call to print health summary
REC1
ASK(QLIST,ABORT) ; Report-specific questions

External References

Name Field # of Occurrence
^%ZIS REC1+2, REC2+2
^%ZISC REC1+10, REC2+10
^%ZTLOAD REC1+6, REC2+6
DOCLIST^DDBR REC2+13
^DIC ASK+19
^DIR PRINT2+9
ENX^GMTSDVR PRINT+1, REC1+9, REC2+9, QUEUE+1
$$GET^XPAR ASK+15, PRINT2+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT2+2
Function Call: WRITE
  • Prompt: !
  • Line Location: REC1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: REC2+2
Routine Call
  • DIC
  • Line Location:
    • ASK+19
Routine Call
  • DIR
  • Line Location:
    • PRINT2+9
Routine Call
  • %ZIS
  • Line Location:
    • REC1+2
    • REC2+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMT(142 - [#142] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( COUNT+6
^DIC - [#1] COUNT+3, LABIEN+2
^TMP("DDB" REC1+12, REC2+12
^TMP("XDRRMRG" PRINT2+10!, REC1+11*, REC2+11*, REC2+13, REC2+14!
^TMP("XDRRMRG1" PRINT2+10!, REC1+12*, REC2+12*, REC2+14!

Label References

Name Line Occurrences
PRINTX REC2+3
REC2 REC1+3

Naked Globals

Name Field # of Occurrence
^( COUNT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS REC1*, REC2*
>> %ZIS("A" REC1+1*, REC2+1*
ABORT ASK~, ASK+19*
DFN GATHER~, REC1+5*, REC2+5*, QUEUE+1
>> DFNFR(1 REC1+11
>> DFNFR(2 REC1+11
>> DFNFRX REC1+5, REC1+9, REC1+11
>> DFNTO(1 REC2+11
>> DFNTO(2 REC2+11
>> DFNTOX REC2+5, REC2+9, REC2+11
DIC ASK+1~, ASK+10!, ASK+12*
DIC("A" ASK+17*
DIC("B" ASK+15*
DIC(0 ASK+13*
>> DIR("?" PRINT2+4*
>> DIR("A" PRINT2+2*, PRINT2+3*
>> DIR("B" PRINT2+4*, PRINT2+7*
>> DIR(0 PRINT2+2*
>> DIRUT PRINT2+9
DTOUT ASK+1~, ASK+19
DUOUT ASK+1~, ASK+19
FDATE GATHER~
FIL1 COUNT+1~, COUNT+4*, COUNT+10
FIL2 COUNT+1~, COUNT+3*, COUNT+4, COUNT+5*, COUNT+11
>> FILDIC LABIEN+2*, LABIEN+3
FILE LABIEN~, LABIEN+2
>> FILREC LABIEN+3*, LABIEN+4
FROM COUNT~
HIUSERS GATHER~
I COUNT+1~, COUNT+6*
IO REC1+10
IO("Q" REC1+3, REC2+3
IO(0 REC1+8, REC2+8, REC2+10
ION REC1+4, REC2+4
>> IOP REC1*, REC2*
N1 COUNT+1~, COUNT+2*, COUNT+12*, COUNTX
N2 COUNT+1~, COUNT+2*, COUNT+13*, COUNTX
>> NAMREC LABIEN+1*, LABIEN+2, LABIEN+4*, LABIENX
NOD COUNT+1~, COUNT+7*, COUNT+10, COUNT+11
PIECE COUNT+1~, COUNT+8*, COUNT+9, COUNT+10, COUNT+11
>> POP REC1+2, REC2+2
QLIST ASK~, GATHER~, PRINT~
QLIST("DFN" PRINT+1
QLIST("TYPE" ASK+20*, PRINT+1, REC1+5, REC1+9, REC2+5, REC2+9
REC LABIEN~
TDATE GATHER~
TO COUNT~
>> TYPE REC1+5*, REC2+5*, QUEUE+1
U COUNT+7, COUNT+8, COUNT+10, COUNT+11, LABIEN+4
X COUNT+1~, COUNT+6*, COUNT+7, COUNT+8
X1 COUNT+1~, COUNT+10*, COUNT+12, COUNT+13
X2 COUNT+1~, COUNT+11*, COUNT+12, COUNT+13
XDRFILE COUNT~, COUNT+3, COUNT+6
XDRIOP PRINT2+1~, PRINT2+9*, REC1, REC1+8, REC2, REC2+8
Y ASK+1~, ASK+19, ASK+20, PRINT2+9
>> ZTDESC REC1+4*, REC2+4*
>> ZTIO REC1+4*, REC2+4*
>> ZTRTN REC1+4*, REC2+4*
>> ZTSAVE("DFN" REC1+5*, REC2+5*
>> ZTSAVE("TYPE" REC1+5*, REC2+5*
>> ZTSK REC1+6, REC2+6
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 |  Naked Globals |  Local Variables |  All