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

Package: Registration

Routine: DGRPCP1


Information

DGRPCP1 ;ALB/MRL/BAJ - CONSISTENCY PRINT, CONTINUED ; 10/18/2005

Source Information

Source file <DGRPCP1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Registration 2 ($$FIRST,$$SUBSEQ,ENDREP)^DGUTL  CLOSE^DGUTQ  
Kernel 1 $$FMTE^XLFDT  

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
Registration 1 DGRPCP  

Entry Points

Name Comments DBIA/ICR reference
ST
A
I
PR
W
HDR
TRA
SET
Q

External References

Name Field # of Occurrence
$$FIRST^DGUTL PR
$$SUBSEQ^DGUTL W+1
ENDREP^DGUTL Q+1
CLOSE^DGUTQ Q+1
$$FMTE^XLFDT W+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"** NO RECORDS MATCH SELECTION CRITERIA **",!!
  • Line Location: PR+4
Function Call: WRITE
  • Prompt: !,$P(X,"^",1),?33,$P(X,"^",2),?56,$P(X,"^",3),?67,$TR($$FMTE^XLFDT($P(X,"^",4),"5DZ"),"/","-"),?78,DGCLK,?$S($E($P(X,"^",6))="*":87,1:89),$P(X,"^",6)
  • Line Location: W+1
Function Call: WRITE
  • Prompt: !,DGHDR,", PAGE ",DGPG,?X,Y,!?67,"Last Day",?78,"Last",!,"Patient Name",?33,"Home Phone #",?56,"Soc Sec #",?67,"ID'ed",?78,"Edited by",?89,"Inconsistent/Missing Data Elements"
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,X1,!
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,X1,!,"An inconsistent Data element preceded by '**' prevents a Z07 record from being sent to the HEC.",!
  • Line Location: TRA+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" PR+1
^DGIN(38.5 - [#38.5] ST+2, AI+1, SET+1
^DGIN(38.6 - [#38.6] SET+2, SET+4, SET+8
^DGPM - [#405] A
^DGPM("ATT1" A
^DPT - [#2] ST+2, AI+1, SETSET+12
^DPT("ADIS" ST+2
^UTILITY($J PR+4, PR+5, SET+14*, SET+15*, Q!
^VA(200 - [#200] W

Label References

Name Line Occurrences
A ST+1
HDR PR+3, W+1
I ST+1
PR ST+3, A+1
Q PRPR+3, PR+4, PR+5, PR+6
SET ST+2, AI+1
TRA PR+6, W+1
W PR+5

Naked Globals

Name Field # of Occurrence
^( PR+5
^(0 ST+2, AI+1, W

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% Q!
%DT Q!
>> DFN ST+2*, A*, I+1*, SETSET+1, SET+12, SET+14
DG6 SET+4*, SET+5, SET+6, SET+8, SET+16!
DGCHK SET+5*, SET+6, SET+16!
DGCLK W*, W+1, Q!
DGCLK1 SET+11*, SET+14, Q!
DGCONRUN Q!
DGCT TRA*, Q!
DGDATA ST+2*, A*, I+1*, SET+11, SET+14, Q!
DGDFN SET*, SET+14, SET+16!, Q!
DGEDCN Q!
DGER Q!
>> DGFILT SET+5*
DGFRD ST+2, AIPR+1, Q!
DGFRD1 I*, I+1, PR+1*, PR+2*, PR+3, Q!
DGHDR PR+1*, PR+3*, HDR, Q!
DGHOW ST+1, PR+3, Q!
DGHOW1 SET, Q!
DGINC SET*, SET+16!, Q!
DGLOOP SET*, SET+10*, SET+14, SET+15, SET+16!
DGOFF Q!
DGPG PR+1*, HDR*, Q!
DGPGM Q!
DGPHONE SET+12*, SET+14, Q!
DGSSN SET*, SET+16!, Q!
DGSTOP ST~, PR+3, PR+5, W+1*, HDR, Q!
DGSTORE SET*, SET+14, SET+15, SET+16!, Q!
DGTEXT SET+8*, SET+14, SET+15, SET+16!
DGTOD ST+2, AIPR+1, Q!
DGTOD1 I*, Q!
DGVAR Q!
DGZ Q!
I ST+2*, A*, I*, I+1*, PR+3*, PR+5*, Q!
I1 A*, I+1*, PR+5*, Q!
I2 PR+5*, W, Q!
IOM HDR
J SET+1*, SET+2, SET+4, SET+8, SET+16!, Q!
U WSET+11, SET+12, SET+14, SET+15
X PR+5*, WW+1, HDR*, Q!
X1 HDR+1*, TRA*, TRA+1, Q!
Y PR+1*, HDR, Q!
Z Q!
ZTSTOP ST~, ST+2, AI+1, Q!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All