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  | All
Print Page as PDF
Routine: XDRDSHOW

Package: Toolkit

Routine: XDRDSHOW


Information

XDRDSHOW ;SF-IRMFO.SEA/JLI - DISPLAY DATA IN FIELDS, GET OVERWRITES ; Jun 23, 2022@08:57:56

Source Information

Source file <XDRDSHOW.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Clinical Information Resource Network 1 CALC^RGVCCMR2  
Kernel 1 $$FMTE^XLFDT  
VA FileMan 1 ^DIR  

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

Package Total Caller Graph
Toolkit 2 XDRDCOMP  XDRRMRG1  

Entry Points

Name Comments DBIA/ICR reference
SHOW(FILE,REC1,REC2,FLDS,REVIEW) ;
LOOP ;
MULT
PAGE ;
HEADER ;
POINT(VAL,FILE) ;
TYPE(VAL,TYPE,DDNODE0,REC) ;
WARNING ;

External References

Name Field # of Occurrence
^DIR PAGE+3, PAGE+7
CALC^RGVCCMR2 SHOW+24, SHOW+25
$$FMTE^XLFDT TYPE+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!
  • Line Location: SHOW+4
Function Call: WRITE
  • Prompt: !
  • Line Location: LOOP+20
Function Call: WRITE
  • Prompt: !,X0," ",$E(XN,1,20),?30,$E(X1,1,20),?55,$E(X2,1,20)
  • Line Location: LOOP+22
Function Call: WRITE
  • Prompt: !!,$E(NAME,1,25),?30,N1,?55,N2
  • Line Location: MULT+15
Function Call: WRITE
  • Prompt: !
  • Line Location: PAGE+2
Function Call: WRITE
  • Prompt: !,I," ",$P(^DD(FILE,DIFFS(I),0),U)
  • Line Location: PAGE+6
Function Call: WRITE
  • Prompt: !
  • Line Location: PAGE+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: !,?30,$S(PACKAGE="PRIMARY":"RECORD1 [#"_REC1_"]",PACKAGE="LABORATORY":"MERGE FROM [#"_NAMIEN1_"]",1:"MERGE FROM [#"_REC1_"]")
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: ?55,$S(PACKAGE="PRIMARY":"RECORD2 [#"_REC2_"]",PACKAGE="LABORATORY":"MERGE TO [#"_NAMIEN2_"]",1:"MERGE TO [#"_REC2_"]")
  • Line Location: HEADER+11
Function Call: WRITE
  • Prompt: !?38,"[#"_NAMIEN1_"]",?55,"[#"_NAMIEN2_"]"
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: !,?30,$E(NAMREC1,1,20),?55,$E(NAMREC2,1,20)
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: !,?30,$E(NAMREC1,21,40),?55,$E(NAMREC2,21,40)
  • Line Location: HEADER+16
Function Call: WRITE
  • Prompt: !,?30,"CMOR SCORE = "_$S($P($G(^DPT(REC1,"MPI")),U,6):$P(^DPT(REC1,"MPI"),U,6),1:"NULL"),?55,"CMOR SCORE = "_$S($P($G(^DPT(REC2,"MPI")),U,6):$P(^DPT(REC2,"MPI"),U,6),1:"NULL")
  • Line Location: HEADER+21
Function Call: WRITE
  • Prompt: !,?30,$S(REC1MB:"**MULTIPLE BIRTH**",1:""),?55,$S(REC2MB:"**MULTIPLE BIRTH**",1:"")
  • Line Location: HEADER+29
Function Call: WRITE
  • Prompt: !,"----------------------------------------------------------------------------"
  • Line Location: HEADER+32
Function Call: WRITE
  • Prompt: !,?2,"*** WARNING!!! One or both of these records indicated MULTIPLE BIRTH. ***",!,?2,"Use caution to ensure that these records are truly duplicates and not",!,?2,"siblings before proceeding.",!
  • Line Location: WARNING+1
Routine Call
  • DIR
  • Line Location:
    • PAGE+3
    • PAGE+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( SHOW+15, SHOW+17, SHOW+23, LOOP+2, LOOP+3, LOOP+4, LOOP+5, MULT+4, PAGE+6, HEADER+20
, POINT+5, TYPE+1
^DIC - [#1] SHOW+6, SHOW+18, POINT+3
^DPT - [#2] SHOW+14, SHOW+31, HEADER+21, HEADER+26, HEADER+27

Label References

Name Line Occurrences
$$POINT POINT+5, TYPE+3
$$TYPE LOOP+10, LOOP+11
HEADER SHOW+34, LOOP+2, MULT+1, MULT+3
PAGE LOOP+2, MULT+1, MULT+3
WARNING HEADER+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D0 TYPE+1*
DDNODE0 TYPE~, TYPE+7
DDVAL SHOW+5~, LOOP+5*, LOOP+6, LOOP+7, LOOP+10, LOOP+11, LOOP+14, MULT+4*, MULT+5, MULT+6
DIFFS PAGE+3, PAGE+4, HEADER+5!
DIFFS( LOOP+18*, PAGE+6, PAGE+10
DIR PAGE+3!, PAGE+7!
DIR("A" PAGE+5*
DIR(0 PAGE+3*, PAGE+5*
DIRUT LOOP+2, MULT, MULT+1, MULT+3, PAGE+8!
FILDIC SHOW+5~, SHOW+6*, SHOW+8, SHOW+9
FILE SHOW~, SHOW+3, SHOW+6, SHOW+12, SHOW+15, SHOW+17, SHOW+23, SHOW+30, LOOP+2, LOOP+3
, LOOP+4, LOOP+5, LOOP+17, MULT+4, PAGE+6, HEADER+20, POINT~, POINT+3, POINT+5, POINT+6
, TYPE+1
>> FILREC1 SHOW+8*, SHOW+10, SHOW+13, LOOP+10, MULT+7
>> FILREC2 SHOW+9*, SHOW+11, SHOW+13, LOOP+11, MULT+8
FIRSTIME SHOW+5~, SHOW+29*, HEADER+2, HEADER+3, HEADER+4*
>> FLD LOOP+1*, LOOP+2*, LOOP+3, LOOP+4, LOOP+5, LOOP+8, LOOP+17, LOOP+18, MULT+3*, MULT+4
, TYPE+1
FLDS SHOW~
FLDS( LOOP+18, PAGE+10!*
>> I MULT+10*, MULT+11*, PAGE+6*, PAGE+9*
IOF HEADER+2
IOSL HEADER+6
IOST PAGE+1
MPIMB SHOW+5~, SHOW+31*, SHOW+32*, HEADER+3, HEADER+7*
MULT SHOW+5~, MULT+2
MULT( LOOP+8*, MULT+3
>> N1 MULT+9*, MULT+10*, MULT+12, MULT+13*, MULT+15
>> N2 MULT+9*, MULT+11*, MULT+12, MULT+14*, MULT+15
>> NAME MULT+5*, MULT+15
NAMIEN1 SHOW+5~, SHOW+13*, SHOW+14, HEADER+10
NAMIEN2 SHOW+5~, SHOW+13*, SHOW+14, HEADER+11
NAMREC1 SHOW+5~, SHOW+10*, SHOW+14*, SHOW+19*, HEADER+13, HEADER+15, HEADER+16
NAMREC2 SHOW+5~, SHOW+11*, SHOW+14*, SHOW+20*, HEADER+13, HEADER+15, HEADER+16
>> NDIFFS LOOP+18*, MULT+1, PAGE+5, PAGE+6, HEADER+5*
>> NLIN LOOP+2, LOOP+18*, LOOP+20*, LOOP+23*, MULT+3, MULT+16*, HEADER+6*, HEADER+7*, HEADER+14*, HEADER+17*
, HEADER+22*, HEADER+30*, HEADER+33*
>> NOD1 MULT+7*, MULT+10
>> NOD2 MULT+8*, MULT+11
>> NODE LOOP+6*, LOOP+10, LOOP+11, MULT+6*, MULT+7, MULT+8
>> PACKAGE HEADER+8*, HEADER+10, HEADER+11
>> PIECE LOOP+7*, LOOP+8, LOOP+9, LOOP+10, LOOP+11
REC TYPE~, TYPE+1
REC1 SHOW~, SHOW+1, SHOW+24, SHOW+31, LOOP+10, HEADER+10, HEADER+21, HEADER+26
REC1MB HEADER+1~, HEADER+25*, HEADER+26*, HEADER+28, HEADER+29
REC2 SHOW~, SHOW+2, SHOW+25, SHOW+31, LOOP+11, HEADER+11, HEADER+21, HEADER+27
REC2MB HEADER+1~, HEADER+25*, HEADER+27*, HEADER+28, HEADER+29
REVIEW SHOW~, SHOW+7*, LOOP+18, LOOP+19, PAGE+3, PAGE+4
RGDFN SHOW+24~*, SHOW+25~*
TYPE TYPE~, TYPE+1, TYPE+2, TYPE+3, TYPE+4, TYPE+6
U SHOW+10, SHOW+11, SHOW+13, SHOW+14, SHOW+15, SHOW+17, SHOW+19, SHOW+20, LOOP+3, LOOP+4
, LOOP+6, LOOP+7, LOOP+10, LOOP+11, LOOP+14, MULT+5, MULT+6, PAGE+6, HEADER+21, POINT+5
, TYPE+7
VAL POINT~, POINT+2, POINT+4, TYPE~, TYPE+1*, TYPE+2*, TYPE+3*, TYPE+4, TYPE+5*, TYPE+6
, TYPE+8, TYPE+9*, TYPE+10
X PAGE+8, PAGE+10*, POINT+1~, TYPE+7~*, TYPE+8*, TYPE+9
>> X0 LOOP+13*, LOOP+18*, LOOP+22, LOOP+24*
>> X1 LOOP+10*, LOOP+12, LOOP+16, LOOP+21, LOOP+22, LOOP+25*
>> X2 LOOP+11*, LOOP+12, LOOP+16, LOOP+21, LOOP+22, LOOP+26*
>> XDRA LOOP+15*, LOOP+18*, LOOP+19
XFIL SHOW+16~, SHOW+17*, SHOW+18*, SHOW+19, SHOW+20
>> XN LOOP+14*, LOOP+21, LOOP+22, LOOP+24*
Y PAGE+9*, PAGE+10*, POINT+1~, POINT+3*, POINT+4*, POINT+5*, POINT+6*, POINT+7, TYPE+1*
Y( PAGE+9!
>> ZTQUEUED PAGE+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All