Routine: TIUFPR

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Entry Points
External References
Interaction Calls
Global Variables Directly Accessed
Label References
Local Variables

Information

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

Source Information

Source file <TIUFPR.m>

Call Graph

Call Graph Total: 9

Package	Total	Call Graph
Kernel	4	(,HOME)^%ZIS ^%ZISC ENDR^%ZISS ^%ZTLOAD
Text Integration Utility	3	(LEFT,RIGHT)^TIUFL1 $$NOW^TIULO $$MIXED^TIULS
Registration	1	($$SETSTR,CLEAR,FULL)^VALM1
VA Fileman	1	^DIR

Entry Points

Name	Comments	DBIA/ICR reference
TERM	; -- set up term characteristics
FTR	; -- footer to print
HDR	; -- prt/display header ; Requires TIUFHDR, TIUFWD, TIUFPGE, TIUFIOFPG, TIUFAR, TITLE
CAPTION(RMSUFFIX)	; -- set up caption line of header
XPAUSE(Y)	; Pause with ^ to exit; omits carriage return that scrolls top line off
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.
PRTLX
PAGE(BEG,LINES)	; -- calc page # ; Requires TIUFAR
TBAR(RMSUFFIX)	; -- print caption/top bar ; Needs TIUFWD,TIUFCAP,RMSUFFIX
CRT(DX,DY)	;
PRTL1	;
SAVE	; -- save to queue for PRTL ; TIU199: add VALM(, VALMCC to list:
EXTRACT(X)	; -- extract string ; Requires TIUFWD
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.

External References

Name	Field # of Occurrence
^%ZIS	PRTL+15
HOME^%ZIS	TERM+1
^%ZISC	PRTLX
ENDR^%ZISS	TERM+2
^%ZTLOAD	PRTL+19
^DIR	PRTL+12, PRTL+13, XPAUSE+2
LEFT^TIUFL1	COLUMNS+14
RIGHT^TIUFL1	COLUMNS+11
$$NOW^TIULO	HDR+9
$$MIXED^TIULS	HDR+9
$$SETSTR^VALM1	CAPTION+4
CLEAR^VALM1	PRTL+16
FULL^VALM1	PRTL+6

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
Routine Call	%ZIS Line Location: TERM+1
Routine Call	DIR Line Location: PRTL+12 PRTL+13 XPAUSE+2
Routine Call	%ZIS Line Location: PRTL+15

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("RM"	PRTL+16, PRTLX

Name	Line Occurrences
$$CAPTION	PRTL+5
$$EXTRACT	COLUMNS+8
$$PAGE	PRTL1+6
COLUMNS	PRTL1+10
CRT	TBAR+3
FTR	COLUMNS+9
HDR	COLUMNS+7
PRTL1	PRTL+17
PRTLX	PRTL+9, PRTL+15, PRTL+19
SAVE	PRTL+19
TBAR	COLUMNS+7
TERM	PRTLX
XPAUSE	FTR+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	PRTL+15*
BEG	PAGE~, PAGE+2*, PAGE+3
COL	CAPTION+1~, CAPTION+3*
DA	PRTL+1~, XPAUSE+1~
DIR	PRTL+1~, XPAUSE+1~
DIR("?"	PRTL+7, PRTL+8
DIR("A"	PRTL+11*
DIR("B"	PRTL+11*
DIR(0	PRTL+11, XPAUSE+2
DIROUT	PRTL+1~
DIRUT	PRTL+1~, PRTL+9, PRTL+10!
DTOUT	PRTL+1~, PRTLX+2
DX	CRT~, CRT+1, HDR+2~, HDR+5, HDR+8
DY	CRT~, CRT+1, HDR+2~, HDR+5, HDR+8
FIRST	PRTL1+1~, PRTL1+9*, PRTL1+10, COLUMNS~, COLUMNS+8
FLD	CAPTION+1~, CAPTION+3*, CAPTION+4
I	HDR+2~
IO	PRTL+16, PRTL1+7
IO("Q"	PRTL+16, PRTL+17
IO(0	PRTL+16
IOF	HDR+4
IOM	PRTL1+2
ION	PRTL+18
IOSL	PRTL1+2
IOST	CRT+1, HDR+5, HDR+8, FTR+3
IOSTBM	PRTLX~
>> IOXY	CRT+1, HDR+5, HDR+8
LAST	PRTL1+1~, PRTL1+9*, PRTL1+10, COLUMNS~, COLUMNS+8
LINENO	COLUMNS+3~, COLUMNS+8*
LINES	PAGE~, PAGE+3
NOPGES	PRTL1+1~, PRTL1+6*, PRTL1+8
NOSCRNS	PRTL1+1~, PRTL1+4, PRTL1+5, PRTL1+6, PRTL1+10, COLUMNS~, COLUMNS+6, COLUMNS+11, COLUMNS+14
PAUSEANS	FTR+1~, FTR+3
>> POP	PRTL+15
RMSUFFIX	CAPTION~, CAPTION+2, TBAR~, TBAR+4, PRTL+1~, PRTL+4*, PRTL+5, PRTL1+10, COLUMNS~, COLUMNS+7
TEXT	COLUMNS+3~, COLUMNS+8*
TITLE	HDR+2~, HDR+6*, HDR+7
>> TIUF("RM"	CAPTION+2, TBAR+4
TIUFANS	PRTL+1~, PRTL+10, PRTL+12, PRTL+13, PRTL+14, PRTL1+4
TIUFAR	PRTL+1~, PRTL+3*, COLUMNS+8, PAGE+2, SAVE+3
TIUFCAP	TBAR+4, TBAR+5, PRTL+1~, PRTL+5
TIUFESC	PRTL1+1~, PRTL1+3, PRTL1+8, COLUMNS+5, COLUMNS+6, COLUMNS+8, COLUMNS+10, FTR+2, FTR+3
TIUFHDR	PRTL1+1~, PRTL1+3*, HDR+10
TIUFI	COLUMNS+3~, COLUMNS+6*
TIUFJ	PRTL1+1~, PRTL1+8*, PRTL1+9
TIUFLNS	PRTL1+1~, PRTL1+2*, PRTL1+6, PRTL1+9
>> TIUFNOD0	HDR+6
TIUFOFPG	PRTL1+1~, PRTL1+6*, HDR+9
TIUFPAGE	COLUMNS~
TIUFPGE	PRTL1+1~, PRTL1+2, PRTL1+10, COLUMNS+12, HDR+9
>> TIUFSTMP	TBAR+6, PRTL+3, PRTL+4, PRTL+10, PRTL+11, PRTL+12, PRTL+13, PRTL1+5
>> TIUFTMPL	PRTL+4
TIUFWD	TBAR+5, PRTL1+1~, PRTL1+2*, EXTRACT+2, HDR+9
>> TIUFWHO	PRTL+2
U	CAPTION+4, HDR+6
>> VALM("FIXED"	TBAR+5, EXTRACT+2
>> VALM("TITLE"	HDR+6
>> VALMBCK	PRTLX, PRTLX+2
>> VALMCC	PRTL+6
>> VALMCNT	PRTL1+6, COLUMNS+8
>> VALMDDF(	CAPTION+3
>> VALMHDR(1	PRTL1+3
>> VALMLFT	TBAR+5, PRTL+12, PRTL+13, EXTRACT+2
WHO	PRTL+1~, PRTL+2*, PRTL+4
X	CAPTION+1~, CAPTION+2, CAPTION+4, CAPTION+5, TBAR+2~, TBAR+5, TBAR+6, PRTL+1~, PRTL+16, PRTLX* , TERM+2, EXTRACT~, EXTRACT+2, HDR+2~, XPAUSE+1~, SAVE+2, SAVE+3*
Y	PRTL+1~, PRTL+12, PRTL+13, XPAUSE~
>> ZTDESC	PRTL+18*
>> ZTIO	PRTL+18*
>> ZTQUEUED	PRTLX+1
>> ZTREQ	PRTLX+1*
>> ZTRTN	PRTL+18*
>> ZTSAVE(	SAVE+2, SAVE+3

Customize PDF page

Package: Text Integration Utility

Routine: TIUFPR

Call Graph Total: 9