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

Package: VA FileMan

Routine: DDSPRNT


Information

DDSPRNT ;SFISC/MKO-PRINT A FORM ;02:51 PM 18 Nov 1994

Source Information

Source file <DDSPRNT.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 7 YX^%DTC  (HBLKS,PAGE)^DDSPRNT1  ^DIC  INIZE^DIEFU  $$EXTERNAL^DILFD  ^DIR  ^DIWP  
Kernel 2 ^%ZIS  (,$$S)^%ZTLOAD  

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

Package Total Caller Graph
VA FileMan 3 DDS  DDSPRNT1  DDSPRNT2  

Entry Points

Name Comments DBIA/ICR reference
PRINT ;Entry point for queued reports
FORM ;Form data
WR(DDSLAB,DDSVAL,DDSFLG) ;Write label and value
PCOL(DDSVAL,DDSCOL) ;Print DDSVAL
WP(DDSWP,DIWL,DDSLF) ;Print text in array @DDSWP
W(DDSSTR,DDSCOL) ;Write DDSSTR
HEADER ;All headers except first
HDR1 ;First header for CRTs
HDR2 ;First header for non-CRTs
SELFORM(DDSFORM) ;Select form
PAGEBRK(DDSPBRK) ;Prompt
INIT ;Setup
END ;Finish up

External References

Name Field # of Occurrence
YX^%DTC INIT+2
^%ZIS DDSPRNT+15, DDSPRNT+27
^%ZTLOAD DDSPRNT+23
$$S^%ZTLOAD HEADER+4
HBLKS^DDSPRNT1 FORM+38
PAGE^DDSPRNT1 FORM+35
^DIC SELFORM+3
INIZE^DIEFU DDSPRNT+7, PRINT+5
$$EXTERNAL^DILFD FORM+9, FORM+11
^DIR HEADER+3, PAGEBRK+5
^DIWP WP+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DDSPRNT+15
Function Call: WRITE
  • Prompt: !,"Report queued!",!,"Task number: "_$G(ZTSK),!
  • Line Location: DDSPRNT+24
Function Call: WRITE
  • Prompt: !,"Report canceled!",!
  • Line Location: DDSPRNT+25
Function Call: WRITE
  • Prompt: !
  • Line Location: FORM+1
Function Call: WRITE
  • Prompt: ?49,"READ ACCESS: "_$P(DDSFORM(0),U,2)
  • Line Location: FORM+8
Function Call: WRITE
  • Prompt: ?48,"WRITE ACCESS: "_$P(DDSFORM(0),U,3)
  • Line Location: FORM+10
Function Call: WRITE
  • Prompt: ?53,"CREATOR: "_$P(DDSFORM(0),U,4)
  • Line Location: FORM+12
Function Call: WRITE
  • Prompt: ?DDSCOL2,DDSLAB
  • Line Location: WR+4
Function Call: WRITE
  • Prompt: ?DDSCOL,$E(DDSVAL,DDSIND,DDSIND+DDSWIDTH-1)
  • Line Location: PCOL+5
Function Call: WRITE
  • Prompt: ?DIWL-1,$G(^UTILITY($J,"W",DIWL,1,0))
  • Line Location: WP+18
Function Call: WRITE
  • Prompt: !?+$G(DDSCOL),$G(DDSSTR)
  • Line Location: W+2
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR1+1
Function Call: WRITE
  • Prompt: "FORM LISTING - "_$P(DDSFORM,U,2)_" (#"_+DDSFORM_")"
  • Line Location: HDR2+3
Function Call: WRITE
  • Prompt: !,"FILE: "_DDSFILE
  • Line Location: HDR2+4
Function Call: WRITE
  • Prompt: ?(IOM-$L(DDSHLIN)-$L(DDSPAGE)-1),DDSHLIN_DDSPAGE
  • Line Location: HDR2+5
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM-1)," ","-")
  • Line Location: HDR2+6
Function Call: WRITE
  • Prompt: !
  • Line Location: PAGEBRK+5
Routine Call
  • DIC
  • Line Location:
    • SELFORM+3
Routine Call
  • DIR
  • Line Location:
    • HEADER+3
    • PAGEBRK+5
Routine Call
  • %ZIS
  • Line Location:
    • DDSPRNT+15
    • DDSPRNT+27

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS("C" END+2
^%ZTSK - [#14.4] DDSPRNT+14, DDSPRNT+19
^DIC - [#1] INIT+5
^DIST( FORM+4, FORM+16, FORM+19, FORM+21, FORM+23, FORM+25, FORM+31, FORM+35
^UTILITY($J WP+8!, WP+18, WP+21, WP+22, WP+24!

Label References

Name Line Occurrences
@( PRINT+7
END DDSPRNT+19, PRINT+8
FORM PRINT+8
HEADER W+1
INIT PRINT+6
PAGEBRK DDSPRNT+11
PCOL FORM+20, FORM+22, FORM+24, FORM+26, WR+7
SELFORM DDSPRNT+10
W FORM+7, FORM+9, FORM+11, FORM+13, FORM+15, FORM+16, FORM+18, FORM+20, FORM+22, FORM+24
, FORM+26, FORM+30, WR+3, PCOL+4, WP+22, WP+25
WP FORM+4

Naked Globals

Name Field # of Occurrence
^(0 WP+15, INIT+5
^(21 FORM+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% SELFORM+1~, INIT+1~
%H INIT+1~, INIT+2*
%W SELFORM+1~
%Y SELFORM+1~
%ZIS DDSPRNT+14*, DDSPRNT+15!
C SELFORM+1~
DDH SELFORM+1~
DDSBK PRINT+1~
DDSCNT WP+6~, WP+13*, WP+14, WP+15, WP+19*, WP+20*, WP+21*, WP+22
DDSCOL PCOL~, PCOL+2, PCOL+5, W~, W+2
DDSCOL1 PRINT+1~
DDSCOL2 PRINT+1~, WR+4
DDSCOL3 PRINT+1~, WR+6~*, WR+7
DDSCRT PRINT+1~, PRINT+7, HEADER+1, INIT+7*
DDSFILE PRINT+1~, HDR2+4, INIT+4*, INIT+5*, INIT+6*
DDSFLG WR~, WR+1
DDSFORM DDSPRNT+9~, DDSPRNT+10, DDSPRNT+21, FORM+4, FORM+16, FORM+19, FORM+21, FORM+23, FORM+25, FORM+31
, FORM+35, HDR2+3, SELFORM~, SELFORM+4*
DDSFORM(0 FORM+7, FORM+8, FORM+9, FORM+10, FORM+11, FORM+12, FORM+15, FORM+27!, SELFORM+4*, INIT+4
DDSHBK PRINT+2~, FORM+38
DDSHLIN PRINT+2~, HDR2+5, INIT+3*
DDSI WP+6~, WP+15*
DDSIND PCOL+1~, PCOL+3*, PCOL+4, PCOL+5
DDSLAB WR~, WR+4
DDSLF WP~, WP+11*, WP+17, WP+25
DDSPAGE PRINT+2~, HDR2+2*, HDR2+5
DDSPBRK DDSPRNT+9~, DDSPRNT+11, PAGEBRK~, PAGEBRK+6*
DDSPFRST FORM+34*, FORM+36!
DDSPG FORM+33~, FORM+35*
DDSPGN FORM+33~, FORM+34*, FORM+35*
DDSQUE PRINT+2~, HEADER+4, INIT+8*
DDSSTR W~, W+2
DDSVAL WR~, WR+1, WR+7, PCOL~, PCOL+3, PCOL+5
DDSWIDTH PCOL+1~, PCOL+2*, PCOL+3, PCOL+5
DDSWP WP~, WP+4, WP+13, WP+15
DIC SELFORM+1~, SELFORM+2*, SELFORM+3!
DIC(0 SELFORM+2*
DIFM DDSPRNT+7~*, PRINT+5~*
DIR HEADER+2~, PAGEBRK+1~
DIR("A" PAGEBRK+3*
DIR("B" PAGEBRK+4*
DIR(0 HEADER+3*, PAGEBRK+2*
DIROUT PAGEBRK+1~
DIRUT FORM+4, FORM+7, FORM+9, FORM+11, FORM+13, FORM+15, FORM+16, FORM+18, FORM+20, FORM+22
, FORM+24, FORM+26, FORM+30, FORM+35, FORM+36, WR+3, PCOL+3, PCOL+4, WP+21, W+1
, HEADER+1, HEADER+4*, PAGEBRK+1~, PAGEBRK+5, END+3!
DIW WP+5~
DIWF WP+5~
DIWI WP+5~
DIWL WP~, WP+9*, WP+18, WP+21, WP+22
DIWR WP+5~, WP+10*
DIWT WP+5~
DIWTC WP+5~
DIWX WP+5~
DN WP+5~
DTOUT PAGEBRK+1~, END+3!
DUOUT PAGEBRK+1~, END+3!
DX PRINT+3~
DY PRINT+3~
I DDSPRNT+22~*, WP+6~, SELFORM+1~
IO DDSPRNT+29
IO("Q" DDSPRNT+19
IOF HDR1+1
IOM PCOL+2, WP+10, HDR2+5, HDR2+6
>> IOP DDSPRNT+27*
IOSL W+1
IOST INIT+7
POP DDSPRNT+15!, DDSPRNT+16!
Q SELFORM+1~
U DDSPRNT+21, FORM+7, FORM+8, FORM+9, FORM+10, FORM+11, FORM+12, FORM+15, FORM+16, WP+4
, WP+13, HDR2+3, INIT+4, INIT+5
X PRINT+3~, FORM+19*, FORM+20, FORM+21*, FORM+22, FORM+23*, FORM+24, FORM+25*, FORM+26, WP+6~
, WP+15*, HEADER+2~, SELFORM+1~, PAGEBRK+1~, INIT+1~
Y PRINT+3~, HEADER+2~, SELFORM+1~, SELFORM+4, PAGEBRK+1~, PAGEBRK+6, INIT+1~, INIT+3
Y(0 SELFORM+4
Z WP+6~
>> ZTDESC DDSPRNT+21*
>> ZTQUEUED INIT+8, END+1
>> ZTREQ END+1*
>> ZTRTN DDSPRNT+20*
>> ZTSAVE( DDSPRNT+22*
ZTSK DDSPRNT+24, DDSPRNT+26!
>> 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