Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: DDSPRNT1

Package: VA FileMan

Routine: DDSPRNT1


Information

DDSPRNT1 ;SFISC/MKO-PRINT A FORM ;9DEC2003

Source Information

Source file <DDSPRNT1.m>

Entry Points

Name Comments DBIA/ICR reference
PAGE ;Print page properties
BLOCK ;Print Block properties
HBLKS ;Header blocks
WR(DDSLAB,DDSVAL,DDSFLG) ;Write label and value
PCOL(DDSVAL,DDSCOL) ;Print DDSVAL starting in column DDSCOL
W(DDSSTR,DDSCOL) ;Write DDSSTR preceded by !?DDSCOL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Page Page"
  • Line Location: PAGE+3
Function Call: WRITE
  • Prompt: !,"Number Properties"
  • Line Location: PAGE+4
Function Call: WRITE
  • Prompt: !,"------ ----------"
  • Line Location: PAGE+5
Function Call: WRITE
  • Prompt: ?DDSCOL1,$P(DDSPG(0),U),?DDSCOL2,$P(DDSPG(1),U)
  • Line Location: PAGE+13
Function Call: WRITE
  • Prompt: !?DDSCOL2,"Block Block"
  • Line Location: PAGE+41
Function Call: WRITE
  • Prompt: !?DDSCOL2,"Order Properties (Form File)"
  • Line Location: PAGE+42
Function Call: WRITE
  • Prompt: !?DDSCOL2,"----- ----------------------"
  • Line Location: PAGE+43
Function Call: WRITE
  • Prompt: ?DDSCOL2,$P($G(^DIST(.404,DDSBK,0)),U)_" (#"_DDSBK_")"
  • Line Location: BLOCK+6
Function Call: WRITE
  • Prompt: !!?DDSCOL2,"Block Properties (Block File)"
  • Line Location: BLOCK+27
Function Call: WRITE
  • Prompt: !,?DDSCOL2,"-----------------------------"
  • Line Location: BLOCK+28
Function Call: WRITE
  • Prompt: !!,"Header Block Properties"
  • Line Location: HBLKS+3
Function Call: WRITE
  • Prompt: !,"------------------------"
  • Line Location: HBLKS+4
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: !?+$G(DDSCOL),$G(DDSSTR)
  • Line Location: W+2
Info |  Source |  Entry Points |  Interaction Calls