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

Package: VA FileMan

Routine: DDEPRT


Information

DDEPRT ;SLC/MKB -- Entity Print Utilities ;09/18/18 4:36pm

Source Information

Source file <DDEPRT.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 ^%ZIS  (,$$S)^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  ($$LJ,$$REPEAT,$$RJ)^XLFSTR  
VA FileMan 3 ^DIC  $$GET1^DID  ^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
VA FileMan 2 DDE ENTITY INQUIRE  DDEOPT  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- enter here to print a SDA entity
ENP ; -- entry point for [queued] report
END ;
ENTITY(Y) ; -- select an entity
FORMAT() ; -- summary or details?
SUM ; -- print summary of ENTity
LINE(DA) ; -- print single item row
DET ; -- print details of ENTity
DESC ; -- description
MAIN ; -- main Entity properties
ITEM(DA,NUM,LVL) ; -- print single item
TYPE(X,L) ; -- return display name of item type X
NAME(NUM) ; -- return name of sub/file
MCODE(CAPTION,CODE) ; -- print code fields
PG ; -- check line count for new page
HEADER ; -- all headers except first
HDR1 ;first header for CRTs
HDR2 ;first header for non-CRTs

External References

Name Field # of Occurrence
^%ZIS EN+7, EN+20
^%ZTLOAD EN+16
$$S^%ZTLOAD HEADER+4
^DIC ENTITY+2
$$GET1^DID ITEM+10, ITEM+12, ITEM+14
^DIR FORMAT+5, HEADER+3
$$FMTE^XLFDT ENP+3
$$NOW^XLFDT ENP+3
$$LJ^XLFSTR ITEM+4
$$REPEAT^XLFSTR SUM+4, ITEM+2, MCODE+4, HDR2+6
$$RJ^XLFSTR LINE+3, HDR2+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !,"Report queued!",!,"Task number: "_$G(ZTSK),!
  • Line Location: EN+17
Function Call: WRITE
  • Prompt: !,"Report canceled!",!
  • Line Location: EN+18
Function Call: WRITE
  • Prompt: !!,"Seq Item Type Field Sub/File Entity"
  • Line Location: SUM+3
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",79)
  • Line Location: SUM+4
Function Call: WRITE
  • Prompt: !,$P(X0,U,2),?5,$P(X0,U),?35,$P(X0,U,3),$$RJ^XLFSTR($P(X0,U,5),7)," ",$P(X0,U,4)
  • Line Location: LINE+3
Function Call: WRITE
  • Prompt: !!,"Seq Item",!,"Number Properties",!,"------ ----------"
  • Line Location: DET+4
Function Call: WRITE
  • Prompt: !,$G(^(I,0))
  • Line Location: DESC+2
Function Call: WRITE
  • Prompt: !!," DISPLAY NAME: "_$G(^DDE(+DDENT,.1))
  • Line Location: MAIN+2
Function Call: WRITE
  • Prompt: !!," SORT BY: "_$P(X0,U,3)
  • Line Location: MAIN+4
Function Call: WRITE
  • Prompt: ?40,"DATA MODEL: "_$S($P(X0,U,6)="S":"SDA",$P(X0,U,6)="F":"FHIR",1:"")
  • Line Location: MAIN+5
Function Call: WRITE
  • Prompt: !," FILTER BY: "_$P(X0,U,4)
  • Line Location: MAIN+7
Function Call: WRITE
  • Prompt: ?41,"READ ONLY: "_$S($P(X0,U,5):"YES",1:"NO")
  • Line Location: MAIN+8
Function Call: WRITE
  • Prompt: !,"QUERY ROUTINE: "_$G(^DDE(+DDENT,5)),!
  • Line Location: MAIN+11
Function Call: WRITE
  • Prompt: !!,TAB,$$LJ^XLFSTR($G(NUM),9),"NAME: "_$P(X0,U)
  • Line Location: ITEM+4
Function Call: WRITE
  • Prompt: !,TAB,"TYPE: "_$$TYPE(TYPE,+X1)
  • Line Location: ITEM+6
Function Call: WRITE
  • Prompt: !,TAB,"FIELD: "_$$GET1^DID(FN,FLD,,"LABEL")_" (#"_FLD_")"
  • Line Location: ITEM+10
Function Call: WRITE
  • Prompt: " > "_$$GET1^DID(FN,FLD,,"LABEL")_" (#"_FLD_")"
  • Line Location: ITEM+14
Function Call: WRITE
  • Prompt: " [internal]"
  • Line Location: ITEM+15
Function Call: WRITE
  • Prompt: " [word wrap]"
  • Line Location: ITEM+16
Function Call: WRITE
  • Prompt: !,TAB," in "_$$NAME(FN)_" (#"_FN_")"
  • Line Location: ITEM+18
Function Call: WRITE
  • Prompt: !,TAB,"FILE: "_$$NAME(FN)_" (#"_FN_")"
  • Line Location: ITEM+21
Function Call: WRITE
  • Prompt: !,TAB,"SUBFILE: "_$$NAME(FN)_" (#"_FN_")"
  • Line Location: ITEM+22
Function Call: WRITE
  • Prompt: !,TAB,"XREF: "_$P(X1,U,3)
  • Line Location: ITEM+23
Function Call: WRITE
  • Prompt: !,TAB,"FILTER: "_$P(X1,U,4)
  • Line Location: ITEM+24
Function Call: WRITE
  • Prompt: !,TAB,"VALUE: "_^DDE(+DDENT,1,DA,2)
  • Line Location: ITEM+29
Function Call: WRITE
  • Prompt: !,TAB,"ENTITY: "_$P($G(^DDE(+$P(X0,U,8),0)),U)
  • Line Location: ITEM+31
Function Call: WRITE
  • Prompt: !,TAB,"TAG: "_$P(X1,U,2)
  • Line Location: ITEM+32
Function Call: WRITE
  • Prompt: !!,TAB,"Group Item"
  • Line Location: ITEM+35
Function Call: WRITE
  • Prompt: !,TAB,"Order Properties"
  • Line Location: ITEM+36
Function Call: WRITE
  • Prompt: !,TAB,"----- ----------"
  • Line Location: ITEM+37
Function Call: WRITE
  • Prompt: !,CAPTION,$E(CODE,1,WIDTH)
  • Line Location: MCODE+5
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR1+1
Function Call: WRITE
  • Prompt: X1,!,X2,$$RJ^XLFSTR(Y,79-$L(X2))
  • Line Location: HDR2+5
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",79)
  • Line Location: HDR2+6
Routine Call
  • %ZIS
  • Line Location:
    • EN+7
    • EN+20
Routine Call
  • DIC
  • Line Location:
    • ENTITY+2
Routine Call
  • DIR
  • Line Location:
    • FORMAT+5
    • HEADER+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS("C" END+2
^%ZTSK - [#14.4] EN+6, EN+11
^DD( NAME+1
^DDE - [#1.5] SUM+5, SUM+6, LINE+1, LINE+4, LINE+8, LINE+9, LINE+10, LINE+11, DET+5, DET+6
DESC+2, MAIN+2, MAIN+10, MAIN+11, MAIN+12, MAIN+13, MAIN+14, ITEM+3, ITEM+26, ITEM+27
, ITEM+29, ITEM+30, ITEM+31, ITEM+38, ITEM+39, ITEM+40, ITEM+41, ITEM+42

Label References

Name Line Occurrences
$$FORMAT EN+3
$$NAME ENP+4, ITEM+18, ITEM+21, ITEM+22
$$TYPE ITEM+6
@( ENP+8, ENP+9
DESC DET+2
END EN+11
ENTITY EN+2
HEADER PG+1
ITEM DET+6, ITEM+43
LINE SUM+6, LINE+11
MAIN SUM+2, DET+3
MCODE MAIN+10, MAIN+12, MAIN+13, MAIN+14, ITEM+26, ITEM+30
PG LINE+2, DESC+2, MAIN+1, MAIN+3, MAIN+6, MAIN+9, MAIN+11, ITEM+4, ITEM+6, ITEM+9
, ITEM+18, ITEM+21, ITEM+22, ITEM+23, ITEM+24, ITEM+28, ITEM+31, ITEM+32, ITEM+35, ITEM+36
, ITEM+37, MCODE+2, MCODE+5

Naked Globals

Name Field # of Occurrence
^( DESC+2
^(1 ITEM+3
^(4 ITEM+30
^(6 ITEM+26

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS EN+6*, EN+7!
CAPTION MCODE~, MCODE+1, MCODE+3, MCODE+4*, MCODE+5
CDA LINE+11*, ITEM+1~, ITEM+41*, ITEM+42, ITEM+43
CITM LINE+7~, LINE+9*, LINE+10
CNM LINE+10*, LINE+11, ITEM+1~
CODE MCODE~, MCODE+3, MCODE+5*
CSEQ LINE+7~, LINE+8*, LINE+9, ITEM+38*, ITEM+39, ITEM+43
DA LINE~, LINE+1, LINE+8, LINE+9, LINE+10, ITEM~, ITEM+3, ITEM+26, ITEM+27, ITEM+29
, ITEM+30, ITEM+38, ITEM+39, ITEM+40
DDECRT ENP+1~, ENP+5*, ENP+8, HEADER+1
DDEDT ENP+1~, ENP+3*, HDR2+4
DDEFILE ENP+1~, ENP+4*, ITEM+17, ITEM+20, HDR2+3
DDEFMT EN+1~, EN+3*, ENP+9
DDEFN ENP+1~, ENP+3*, ENP+4
DDELN DET+1~
DDENT EN+1~, EN+2, EN+14, SUM+5, SUM+6, LINE+1, LINE+8, LINE+9, LINE+10, LINE+11
DET+5, DET+6, DESC+2, MAIN+2, MAIN+10, MAIN+11, MAIN+12, MAIN+13, MAIN+14, ITEM+3
, ITEM+26, ITEM+27, ITEM+29, ITEM+30, ITEM+38, ITEM+39, ITEM+40, ITEM+41, ITEM+42, HDR2+2
DDENT(0 ENP+3, MAIN+1
DDEPG ENP+1~, ENP+5*, HDR2+1*, HDR2+4
DIC ENTITY+1~, ENTITY+2*
DIC(0 ENTITY+2*
DIR FORMAT+1~, HEADER+2~
DIR("?" FORMAT+4*
DIR("A" FORMAT+3*
DIR(0 FORMAT+2*, HEADER+3*
DIRUT ENP+6!, END+3!, FORMAT+1~, SUM+2, SUM+5, SUM+6, LINE+2, DET+2, DET+3, DET+5
DET+6, DESC+2, MAIN+1, MAIN+3, MAIN+6, MAIN+9, MAIN+10, MAIN+11, MAIN+12, MAIN+13
MAIN+14, ITEM+4, ITEM+6, ITEM+8, ITEM+9, ITEM+18, ITEM+20, ITEM+21, ITEM+22, ITEM+23
, ITEM+24, ITEM+26, ITEM+28, ITEM+30, ITEM+31, ITEM+32, ITEM+34, ITEM+35, ITEM+36, ITEM+37
, ITEM+38, MCODE+2, MCODE+5, PG+1, HEADER+1, HEADER+4*
DITM SUM+1~, SUM+6*, DET+1~, DET+6*
DSEQ SUM+1~, SUM+5*, SUM+6, DET+1~, DET+5*, DET+6
DTOUT ENP+6!, END+3!, FORMAT+1~, FORMAT+5
DUOUT ENP+6!, END+3!, FORMAT+1~
FLD ITEM+1~, ITEM+8*, ITEM+10, ITEM+12, ITEM+13*, ITEM+14, ITEM+20
FN ITEM+1~, ITEM+8*, ITEM+10, ITEM+12, ITEM+13*, ITEM+14, ITEM+17, ITEM+18, ITEM+20, ITEM+21
, ITEM+22
GBL ITEM+12~*, ITEM+13
I DESC+1~*, DESC+2*, ITEM+1~, ITEM+39*, ITEM+40
IO EN+22
IO("Q" EN+11
IOF HDR1+1
>> IOP EN+20*
IOSL PG+1
IOST ENP+5
L TYPE~, TYPE+8*, TYPE+9
LVL ITEM~, ITEM+2*, ITEM+43
NM ITEM+1~, ITEM+40*, ITEM+41
NUM ITEM~, ITEM+4, NAME~, NAME+1
POP EN+7!, EN+8!
TAB ITEM+1~, ITEM+2*, ITEM+4, ITEM+5*, ITEM+6, ITEM+10, ITEM+18, ITEM+21, ITEM+22, ITEM+23
, ITEM+24, ITEM+26, ITEM+29, ITEM+30, ITEM+31, ITEM+32, ITEM+35, ITEM+36, ITEM+37
TYPE ITEM+1~, ITEM+3*, ITEM+6, ITEM+16, ITEM+20, ITEM+27, ITEM+32, ITEM+34
U EN+14, ENP+3, ENP+4, LINE+3, LINE+4, LINE+6, LINE+10, MAIN+4, MAIN+5, MAIN+7
MAIN+8, ITEM+3, ITEM+4, ITEM+8, ITEM+11, ITEM+12, ITEM+13, ITEM+15, ITEM+16, ITEM+23
, ITEM+24, ITEM+31, ITEM+32, ITEM+40, HDR2+2, HDR2+3
WIDTH MCODE+1~*, MCODE+3, MCODE+5
X ENTITY+1~, FORMAT+1~, TYPE~, TYPE+1*, TYPE+2, TYPE+3, TYPE+4, TYPE+5, TYPE+6, TYPE+7
, TYPE+8, HEADER+2~
X0 LINE+1~*, LINE+3, LINE+4, LINE+6, MAIN+1~*, MAIN+4, MAIN+5, MAIN+7, MAIN+8, ITEM+1~
, ITEM+3*, ITEM+4, ITEM+8, ITEM+11, ITEM+13, ITEM+15, ITEM+16, ITEM+31
X1 ITEM+1~, ITEM+3*, ITEM+6, ITEM+21, ITEM+22, ITEM+23, ITEM+24, ITEM+32, ITEM+34, HDR2+1~
HDR2+2*, HDR2+5
X2 HDR2+1~, HDR2+3*, HDR2+5
Y ENTITY~, ENTITY+3*, ENTITY+4, FORMAT+1~, FORMAT+5*, FORMAT+6, TYPE+1~*, TYPE+2*, TYPE+3*, TYPE+4*
, TYPE+5*, TYPE+6*, TYPE+7*, TYPE+8*, TYPE+9*, TYPE+10, HEADER+2~, HDR2+1~, HDR2+4*, HDR2+5
ZTDESC EN+12~, EN+14*
>> ZTQUEUED END+1, HEADER+4
>> ZTREQ END+1*
ZTRTN EN+12~, EN+13*
ZTSAVE EN+12~
ZTSAVE("DDEFMT" EN+15*
ZTSAVE("DDENT" EN+15*
ZTSK EN+17, EN+19!
>> ZTSTOP HEADER+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All