Routine: TIURHX

Information

TIURHX ;SLC/JER - Display reassignment history ;21-MAR-2001 16:47:04

Source file <TIURHX.m>

Package	Total	Call Graph
Text Integration Utility	6	GETTIU^TIULD (FIXLSTNW,RESTORE)^TIULM $$CANDO^TIULP ($$CENTER,$$DATE,$$NAME)^TIULS GET^TIUSRV $$READ^TIUU
Registration	4	EN^VALM ($$SETSTR,CLEAR)^VALM1 RESTORE^VALM10 EN^VALM2

Name	Comments	DBIA/ICR reference
MAIN	; Control branching
EN	; Option entry
DISPLAY	; Display Reassignment History of Selected Documents
SETREC(LINE)	; Calls $$SETSTR^VALM1 for each line of ^TMP("TIUAUDIT",$J,
HDR	; Build Header

Name	Field # of Occurrence
GETTIU^TIULD	HDR+3
FIXLSTNW^TIULM	DISPLAY+16
RESTORE^TIULM	DISPLAY+14
$$CANDO^TIULP	DISPLAY+10, MAIN+1
$$CENTER^TIULS	HDR+4
$$DATE^TIULS	SETREC+7, SETREC+8, SETREC+10
$$NAME^TIULS	SETREC+3
GET^TIUSRV	MAIN+6
$$READ^TIUU	DISPLAY+13, MAIN+5
EN^VALM	EN+2
$$SETSTR^VALM1	SETREC+3, SETREC+4, SETREC+5, SETREC+7, SETREC+8, SETREC+10
CLEAR^VALM1	DISPLAY+7
RESTORE^VALM10	DISPLAY+17
EN^VALM2	DISPLAY+2

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Reviewing #",+TIUDATA Line Location: DISPLAY+8
Function Call: WRITE	Prompt: !!,$C(7),$P(TIUVIEW,U,2),! Line Location: DISPLAY+12
Function Call: WRITE	Prompt: !!,$C(7),$P(TIUVIEW,U,2),! Line Location: MAIN+3
Routine Call	VALM Line Location: EN+2

Name	Line Occurrences (* Changed, ! Killed)
^TMP("TIURHX"	EN+1!
^TMP("TIURIDX"	DISPLAY+6

Name	Line Occurrences
$$SETREC	HDR+5
EN	DISPLAY+15

Name	Field # of Occurrence
DIROUT	DISPLAY+1~
LINE	SETREC~, SETREC+2
TIU	EN+1~, HDR+3
TIU("DOCTYP"	HDR+4, SETREC+6, SETREC+9
TIU("EDT"	SETREC+7, SETREC+10
TIU("LDT"	SETREC+8
TIU("PNM"	SETREC+3
TIU("SSN"	SETREC+4
TIU("WARD"	SETREC+5
TIUD	DISPLAY+1~
TIUDA	DISPLAY+1~, DISPLAY+9*, DISPLAY+10, MAIN+1, MAIN+6, HDR+3
TIUDATA	DISPLAY+1~, DISPLAY+6*, DISPLAY+8, DISPLAY+9
TIUDTYP	HDR+1~
TIUI	DISPLAY+1~, DISPLAY+3, DISPLAY+4, DISPLAY+6, DISPLAY+14, DISPLAY+17
TIUQUIT	DISPLAY+1~, DISPLAY+4, DISPLAY+16
TIUVIEW	DISPLAY+5~, DISPLAY+10, DISPLAY+11, DISPLAY+12, MAIN+1~, MAIN+2, MAIN+3
U	DISPLAY+9, DISPLAY+12, MAIN+3, HDR+4, SETREC+5
>> VALMBCK	DISPLAY+18*
>> VALMHDR(1	HDR+4*
>> VALMHDR(2	HDR+5*
>> VALMQUIT	MAIN+4*
VALMY	DISPLAY+2, DISPLAY+18!
VALMY(	DISPLAY+4
>> XQORNOD(0	DISPLAY+2
Y	DISPLAY+1~, SETREC+1~, SETREC+3, SETREC+4, SETREC+5, SETREC+7, SETREC+8, SETREC+10, SETREC+11