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

Package: Text Integration Utility

Routine: TIUFPR


Information

TIUFPR ;SLC/MAM - Action Print List ;;3/7/00

Source Information

Source file <TIUFPR.m>

Entry Points

Name Comments DBIA/ICR reference
CAPTION(RMSUFFIX) ; -- set up caption line of header
TBAR(RMSUFFIX) ; -- print caption/top bar
; Needs TIUFWD,TIUFCAP,RMSUFFIX
CRT(DX,DY) ;
PRTL ; Action Print List. Prints whole list of items, but if Template permits right/left scroll, prints only the present right/left portion of each item.
PRTL1 ;
PRTLX
TERM ; -- set up term characteristics
COLUMNS(FIRST,LAST,NOSCRNS,TIUFPAGE,RMSUFFIX) ; Writes columns for LM entries FIRST through LAST;
; Returns the display back to far left before quitting.
; NOSCRNS = Number of (left/right) screens to be printed (depends on LM Template Right Margin) and on users choice to print all or only first left/right screen.
EXTRACT(X) ; -- extract string
; Requires TIUFWD
HDR ; -- prt/display header
; Requires TIUFHDR, TIUFWD, TIUFPGE, TIUFIOFPG, TIUFAR, TITLE
FTR ; -- footer to print
XPAUSE(Y) ; Pause with ^ to exit; omits carriage return that scrolls top line off
PAGE(BEG,LINES) ; -- calc page #
; Requires TIUFAR
SAVE ; -- save to queue for PRTL
; TIU*1*99: add VALM(, VALMCC to list:

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: X
  • Line Location: TBAR+6
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: CRT+1
Function Call: WRITE
  • Prompt: !,TEXT
  • Line Location: COLUMNS+8
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: $J(" ",30-$L(TITLE))
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: $J("",((TIUFWD-80)/2)),$$MIXED^TIULS($$NOW^TIULO),$J("",10+((TIUFWD-80)/2)),"Page: ",$J(TIUFPGE,4)," of ",$J(TIUFOFPG,4)
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !,TIUFHDR,!
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: !
  • Line Location: XPAUSE+2
Info |  Source |  Entry Points |  Interaction Calls