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

Package: Registration

Routine: DGEEREIM


Information

DGEEREIM ;ALB/BRM;Reimbursable Primary Eligibility Code Report ; 5/23/05 11:04am

Source Information

Source file <DGEEREIM.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  $$NOW^XLFDT  
VA Fileman 3 NOW^%DTC  $$EXTERNAL^DILFD  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DG REIMBURSABLE PRIM EC RPT  

Entry Points

Name Comments DBIA/ICR reference
QUETASK ; Queue the DMZ/Reimbursable Stats job
HDR ; Report Header
PAUSE ; Screen pause. Sets QUIT=1 if user decides to quit.
PSET ; set up printer variables
REPORT ;report results
LOOP ; entry point

External References

Name Field # of Occurrence
NOW^%DTC PSET+5
^%ZIS QUETASK+4
HOME^%ZIS QUETASK+10, LOOP+21
^%ZISC LOOP+21
^%ZTLOAD QUETASK+8
$$EXTERNAL^DILFD LOOP+18
^DIR PAUSE+4
$$NOW^XLFDT QUETASK+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Job Terminated!"
  • Line Location: QUETASK+4
Function Call: WRITE
  • Prompt: !,?((IOM-40)\2),"Reimbursable Insurance Primary EC Report"
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,?((IOM-22-$L(RDT))\2),"Date/Time Report Run: ",RDT
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,?((IOM-35-$L(RCNT))\2),"Total Patients with RI Primary EC: ",RCNT
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !!,?5,"SSN",?17,"NAME",?50,"PRIMARY ELIG. CODE"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,?5,"---------",?17,"------------------------------"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?50,"-------------------"
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: REPORT+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: REPORT+6
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+2
Function Call: WRITE
  • Prompt: !,?68,"Page: "_PAGE,!
  • Line Location: PAUSE+3
Routine Call
  • %ZIS
  • Line Location:
    • QUETASK+10
    • LOOP+21
Routine Call
  • DIR
  • Line Location:
    • PAUSE+4
Routine Call
  • %ZIS
  • Line Location:
    • QUETASK+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" PSET+5
^DIC(8 - [#8] LOOP+6
^DIC(8.1 - [#8.1] LOOP+4
^DPT - [#2] LOOP+9, LOOP+11, LOOP+13, LOOP+17
^TMP($J QUETASK+3!, LOOP+16*, LOOP+18*, PSET+7, REPORT+4, REPORT+5

Label References

Name Line Occurrences
HDR REPORT+3, REPORT+6
PAUSE REPORT+6
PSET LOOP+20
REPORT LOOP+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% LOOP+2~, PSET+5
%ZIS QUETASK+2~, QUETASK+4*
CRT LOOP+2~, PSET+2*, REPORT+2, REPORT+6
DATA LOOP+2~, REPORT+5*, REPORT+7
DFN LOOP+1~, LOOP+8*, LOOP+9*, LOOP+11, LOOP+13, LOOP+17
DIR PAUSE+1~
DIR(0 PAUSE+4*
DIRUT LOOP+2~, PAUSE+4
EC8 LOOP+2~, LOOP+4*, LOOP+6
EC81 LOOP+2~, LOOP+5*, LOOP+6*, LOOP+13*, LOOP+14*, LOOP+15
ELIG LOOP+1~
ELIG( LOOP+6*, LOOP+14
IO QUETASK+1~, LOOP+19
IO("Q" QUETASK+5
IOBS QUETASK+1~
IOF QUETASK+1~, REPORT+2, REPORT+6
IOHG QUETASK+1~
IOM QUETASK+1~, PSET+4, HDR+1, HDR+2, HDR+3
ION QUETASK+1~
IOPAR QUETASK+1~
IOS QUETASK+2~
IOSL QUETASK+2~, REPORT+6, PAUSE+2
IOST QUETASK+2~, PSET+2
IOT QUETASK+2~
IOUPAR QUETASK+2~
IOXY QUETASK+2~
LINE LOOP+2~, PSET+4*, HDR+4
NAME LOOP+2~, LOOP+17*, LOOP+18
PAGE LOOP+2~, REPORT+2, REPORT+3*, REPORT+6*, PAUSE+3
POP QUETASK+1~, QUETASK+4
PRIMEC LOOP+2~, LOOP+13*, LOOP+15, LOOP+18
QFLG LOOP+1~, LOOP+13*, LOOP+14, LOOP+16*
QUIT LOOP+1~, REPORT+4, REPORT+6, PAUSE+4*
RCNT LOOP+1~, PSET+7*, HDR+3
RDT LOOP+1~, PSET+3*, PSET+6*, HDR+2
SSN LOOP+17*, LOOP+18, REPORT+1~, REPORT+4*, REPORT+5, REPORT+7
TXT QUETASK+1~, QUETASK+9*, QUETASK+11
X LOOP+2~, PAUSE+1~
X1 LOOP+2~
X2 LOOP+2~
Y PSET+3*, PSET+5*, PSET+6, PAUSE+1~, PAUSE+4
ZTDESC QUETASK+1~, QUETASK+7*
ZTDTH QUETASK+1~, QUETASK+6*
ZTIO QUETASK+1~
ZTRTN QUETASK+1~, QUETASK+6*
ZTSAVE QUETASK+2~
ZTSK QUETASK+1~, QUETASK+9
ZZ LOOP+1~, PSET+1~, PSET+4*
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