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

Package: Clinical Information Resource Network

Routine: RGMTHLPD


Information

RGMTHLPD ;BIR/CML-MPI/PD HL7 MESSAGE STATUS REPORT (DETAILED) ;12/12/00

Source Information

Source file <RGMTHLPD.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 3 ^%ZISC  $$FMTE^XLFDT  EN^XUTMDEVQ  
VA FileMan 3 NOW^%DTC  ^DIC  ^DIR  
Health Level Seven 1 $$REPROC^HLUTIL  
Master Patient Index VistA 1 $$GETDFN^MPIF001  
Registration 1 $$SITE^VASITE  

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

Package Total Caller Graph
Clinical Information Resource Network 1 RGMTHLP  

Entry Points

Name Comments DBIA/ICR reference
BEGIN ; Produce DETAILED Report
PROT ;Ask for all or single PROTCOL
ASK1 ;Ask for Date Range
DEV ;
START ;Print report
QUIT ;
LOOP ;
HDR ;HEADER
REPROC ;reprocess entries in xtmp global ^XTMP("REPROC"

External References

Name Field # of Occurrence
NOW^%DTC START+3
^%ZISC QUIT+6
^DIC PROT+7
^DIR PROT+4, ASK1+4, ASK1+7, QUIT+1, HDR+2
$$REPROC^HLUTIL REPROC+15
$$GETDFN^MPIF001 LOOP+18
$$SITE^VASITE START+1
$$FMTE^XLFDT START+2, START+3, LOOP+12, LOOP+14, LOOP+24
EN^XUTMDEVQ DEV+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option allows you to print information found during the ""Compile MPI/PD"
  • Line Location: BEGIN+1
Function Call: WRITE
  • Prompt: !,"HL7 Data"" compilation. The report is sorted by RELATED EVENT PROTOCOL, date,"
  • Line Location: BEGIN+2
Function Call: WRITE
  • Prompt: !,"transmission type, and status. Detailed information for each HL7 message is"
  • Line Location: BEGIN+3
Function Call: WRITE
  • Prompt: !,"displayed."
  • Line Location: BEGIN+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: PROT+2
Function Call: WRITE
  • Prompt: !!,"Enter date range for data to be included in report."
  • Line Location: ASK1+1
Function Call: WRITE
  • Prompt: !!,"The right margin for this report is 132.",!!
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED!!"
  • Line Location: DEV+4
Function Call: WRITE
  • Prompt: !!,REPNM,":"
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !
  • Line Location: QUIT+2
Function Call: WRITE
  • Prompt: ?96,"<<PURGED>>"
  • Line Location: LOOP+13
Function Call: WRITE
  • Prompt: !!?110,"TOTAL: ",CNT
  • Line Location: LOOP+30
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"MPI/PD HL7 MESSAGE STATUS REPORT - DETAILED (",PRGBDT," to ",PRGEDT,")"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?117,"Page: ",PG,!,"Printed at ",SITE," on ",HDT
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !!,"RELATED EVENT PROTOCOL",!?3,"DATE",?18,"TYPE",?29,"STATUS IN FILE #772"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?61,"DATE PROCESSED",?83,"FILE #772 IEN"
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !?6,"=>FILE #773 ENTRY",?29,"STATUS IN FILE #773",?61,"DATE PROCESSED"
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: ?83,"PROTOCOL",?116,"LOGICAL LINK",!,LN
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !!,CNT," messages to attempt to process."
  • Line Location: REPROC+7
Function Call: WRITE
  • Prompt: !!,CNT," messages successfully processed."
  • Line Location: REPROC+16
Routine Call
  • DIC
  • Line Location:
    • PROT+7
Routine Call
  • DIR
  • Line Location:
    • PROT+4
    • ASK1+4
    • ASK1+7
    • QUIT+1
    • HDR+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(101 - [#101] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] LOOP+19
^HL(771.6 - [#771.6] LOOP+23
^HL(772 - [#772] LOOP+13, LOOP+14, LOOP+16, LOOP+17
^HLCS(870 - [#870] LOOP+27
^HLMA - [#773] LOOP+23, LOOP+24, LOOP+25, LOOP+26
^HLMA("B" LOOP+22
^ORD(101 - [#101] LOOP+25, REPROC+14
^XTMP("REPROC" REPROC+3, REPROC+5, REPROC+11, REPROC+13
^XTMP("RGMT" START+7, LOOP+3, LOOP+6, LOOP+8, LOOP+10

Label References

Name Line Occurrences
ASK1 PROT+4
HDR START+4, START+8, LOOP+4, LOOP+11, LOOP+28
LOOP START+5, START+9
QUIT PROT+4, PROT+7, ASK1+4, ASK1+7, DEV+5, START+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% START+3, QUIT+3!
CNT QUIT+3!, LOOP+1*, LOOP+11*, LOOP+30, REPROC+1*, REPROC+6*, REPROC+7, REPROC+9*, REPROC+15*, REPROC+16
, REPROC+17!
DFN QUIT+3!, LOOP+18*, LOOP+19
DIC PROT+5*, PROT+7!, QUIT+3!
DIC("S" PROT+6*
DIC(0 PROT+5*
DIR PROT+1!, PROT+4!, ASK1+2!, ASK1+4!, ASK1+7!, QUIT+1!, QUIT+3!, HDR+2!
DIR("A" PROT+3*, ASK1+3*, ASK1+6*
DIR(0 PROT+2*, ASK1+3*, ASK1+5*, QUIT+1*, HDR+2*
DIRUT PROT+1!, PROT+4, ASK1+2!, ASK1+4, ASK1+7, QUIT+3!
DTOUT PROT+1!, ASK1+2!, QUIT+3!
DUOUT PROT+1!, ASK1+2!, QUIT+3!
HDT START+3*, QUIT+3!, HDR+5
HLMADTPR QUIT+3!, LOOP+24*, LOOP+29
HLMAICN QUIT+3!
HLMAIEN LOOP+21*, LOOP+22*, LOOP+23, LOOP+24, LOOP+25, LOOP+26, LOOP+29, REPROC+4*, REPROC+5*, REPROC+12*
, REPROC+13*, REPROC+15, REPROC+17!
HLMALINK QUIT+3!, LOOP+27*, LOOP+29, REPROC+2*, REPROC+3*, REPROC+5, REPROC+10*, REPROC+11*, REPROC+13, REPROC+17!
HLMALL QUIT+3!, LOOP+26*, LOOP+27
HLMAPROT QUIT+3!, LOOP+25*, LOOP+29
HLMASTAT QUIT+3!, LOOP+23*, LOOP+29
ICN QUIT+3!, LOOP+17*, LOOP+18, LOOP+20
IEN QUIT+3!, LOOP+9*, LOOP+10*, LOOP+13, LOOP+14, LOOP+15, LOOP+16, LOOP+17, LOOP+22
IEN0 QUIT+4!
IOF QUIT+6, HDR+3
IOSL START+8, LOOP+4, LOOP+11, LOOP+28
IOST QUIT+1, QUIT+6, HDR+1, HDR+2, HDR+3
JJ QUIT+2*, QUIT+4!, HDR+1*
LN START+1*, QUIT+4!, HDR+9
PG START+1*, QUIT+4!, HDR+2, HDR+3*, HDR+5
>> POP DEV+3
PRGBDT START+2*, QUIT+4!, HDR+4
PRGEDT START+2*, QUIT+4!, HDR+4
PROCDT QUIT+4!, LOOP+14*, LOOP+15
PROT PROT+8*, QUIT+4!, REPROC+14
PTNM QUIT+4!, LOOP+19*, LOOP+20
QFLG START+1*, START+7, START+8, QUIT+1, QUIT+4!, LOOP+3, LOOP+4, LOOP+6, LOOP+8, LOOP+10
, LOOP+11, LOOP+22, LOOP+28, HDR+2*
REP QUIT+4!
REPNM PROT+1!, PROT+8*, START+5, START+6*, START+7*, START+9, QUIT+4!, LOOP+3, LOOP+6, LOOP+8
, LOOP+10, LOOP+16
RGBDT ASK1+5*, START+2, QUIT+4!, LOOP+2
RGDT QUIT+4!, LOOP+2*, LOOP+3*, LOOP+6, LOOP+8, LOOP+10, LOOP+12
RGEDT ASK1+7*, START+2, QUIT+4!, LOOP+1
RGRTN REPROC+14*, REPROC+15, REPROC+17!
SITE START+1*, QUIT+4!, HDR+5
SS QUIT+2*, QUIT+4!, HDR+1*
STAT QUIT+4!, LOOP+7*, LOOP+8*, LOOP+10, LOOP+12
STATNM QUIT+5!
STOPDT QUIT+5!, LOOP+1*, LOOP+3
TXT QUIT+5!
TYPE QUIT+5!, LOOP+5*, LOOP+6*, LOOP+8, LOOP+10, LOOP+12, LOOP+16
U START+1*, LOOP+14
X QUIT+5!
Y PROT+4, PROT+7, PROT+8, ASK1+5, ASK1+7, QUIT+5!, HDR+2
>> ZTQUEUED QUIT+6
>> ZTREQ QUIT+6*
>> ZTSAVE("REPNM" DEV+2*
>> ZTSAVE("RGBDT" DEV+2*
>> ZTSAVE("RGEDT" DEV+2*
ZTSK QUIT+5!
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