TIUFL ; SLC/MAM - Library of Modules and Functions: SETUP, RMSG, CENTER(X,N) ;02/16/06
Source file <TIUFL.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 2 | ^DIC FIELD^DID |
Kernel | 1 | ENDR^%ZISS |
List Manager | 1 | MSG^VALM10 |
Text Integration Utility | 1 | PAUSE^TIUFXHLX |
Name | Comments | DBIA/ICR reference |
---|---|---|
CENTER(X,N) | ; Center X in space of N Characters. Adapted from TIULS.
; Truncates X to N chars if X>N. NOTE: LM truncates header at scroll lock if header longer than VALMWD-1. |
|
SETUP | ; Sets ^TMP("TIUF",$J) array before entering Document Definition Utility, etc.
; Array is used in routines and in protocols, including protocol |
|
ARRNO | ; ^TMP("TIUF",$J) subscripts ARRNO_H/A/C/J/T/D/O.
; e.g. ^TMP("TIUF",$J,"ARRNOH")= 1 since LM Template H uses Array |
|
CLINDOC | ; subscript "CLINDOC".
; e.g. ^TMP("TIUF",$J,"CLINDOC")=38 |
|
CLPAC | ; Subscript "CLPAC" NOTE: may not find it so subscript may not exist
|
|
RM | ; Subscripts "RMAC", "RMAM", "RMHC", "RMHM",
|
|
NMWIDTH | ; Subscript NMWIDTH for entry name in Temps HACJ.
|
|
HIDDEN | ; Subscript HIDDEN for IFN of protocol TIUF HIDDEN ACTIONS
|
|
STOP | ; Subscript STOP for IFN of protocol TIUF QUIT1
|
|
NEWHELP | ; Subscript NEWHELP for IFN of protocol TIUFC ACTION MENU
|
|
INHERIT | ; Subscript INHERIT for IFN of protocol TIUFD ACTION MENU MGR
|
|
RIGHT | ; Subscript RIGHT for IFN of protocol TIUF RIGHT.
|
|
LEFT | ; Subscript LEFT for IFN of protocol TIUF LEFT.
|
|
CREATE | ; Subscript CREATE for IFN of protocol TIUFC ACTION MENU.
|
|
TYPE | ; Subscripts TYPECL, TYPEDC, TYPETL, etc.
|
|
STAT | ; subscripts "STATI" (I for Inactive), "STATT" (T for Test),
|
|
SORT | ; subscripts "SORT", "SORTCM" (CM for CHANGE SORT MENU),
; e.g. ^TMP("TIUF",$J,"SORT")=3766, =IFN of protocol TIUF SORT ; e.g. ^TMP("TIUF",$J,"SORTCM")=3819, =IFN of protocol TIUF CHANGE SORT MENU ; e.g. ^TMP("TIUF",$J,"SORTT")=3635, =IFN of protocol TIUF SORT BY TYPE |
|
MSG | ||
FLDNAM | ; Single Subscripts are Field Numbers: e.g. ^TMP("TIUF",$J,4,"LABEL")="Upload Look-Up Method".
|
|
FLDTYPE | ; Sets ^ piece after FLDNAME = BASICS, TECH, UPLOAD or UPHEAD, i.e. which part of the display the field is in.
|
|
SETUX | ||
RMSG | ; redisplays standard TIUF msg. Sets VALMSG=stnd msg. Called by items of LM Protocol Menus, items of TIUF HIDDEN ACTIONS.
; Requires TIUFSTMP if currently in subtemplate; ; Requires TIUF messages as set in TIUFL. |
|
VMSG() | ; Function returns standard VALMSG for a Template.
|
|
VMSG1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("TIUF" | ARRNO+3*, CLINDOC+4*, CLPAC+3*, NMWIDTH+1*, HIDDEN+3*, STOP+3*, NEWHELP+3*, INHERIT+3*, RIGHT+3*, LEFT+3* , CREATE+3*, TYPE+1*, TYPE+2*, TYPE+3*, TYPE+4*, TYPE+5*, TYPE+6*, STAT+10*, SORT+5*, SORT+7* , SORT+10*, MSG*, MSG+1*, MSG+2*, FLDNAM+2*, FLDNAM+3*, FLDTYPE+1*, FLDTYPE+2*, FLDTYPE+3*, FLDTYPE+4* , VMSG+2, VMSG+4, VMSG+5, VMSG+6, VMSG+7, VMSG+9, VMSG+10, VMSG+11, VMSG+12, VMSG+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ANSCTR | CENTER+2~, CENTER+4*, CENTER+5 |
DA | SETUP+8~, SORT+4! |
DIC | SETUP+8~, CLINDOC+2*, CLPAC+1*, HIDDEN+1*, STOP+1*, NEWHELP+1*, INHERIT+1*, RIGHT+1*, LEFT+1*, CREATE+1* , STAT+7*, SORT+4!* |
DIC(0 | CLINDOC+2*, CLPAC+1*, STAT+7*, SORT+4* |
MSG | RMSG+3~, RMSG+5 |
N | CENTER~, CENTER+3, CENTER+4 |
SP | CENTER+2~, CENTER+3*, CENTER+4 |
>> TIUF("RMAC" | RM+4* |
>> TIUF("RMAM" | RM+5* |
>> TIUF("RMCM" | RM+8* |
>> TIUF("RMD" | RM+12* |
>> TIUF("RMHC" | RM+6* |
>> TIUF("RMHM" | RM+7* |
>> TIUF("RMJC" | RM+9* |
>> TIUF("RMJM" | RM+10* |
>> TIUF("RMT" | RM+11* |
>> TIUF("RMXC" | RM+12* |
>> TIUF("RMXM" | RM+12* |
>> TIUFCBEG | VMSG+2 |
TIUFI | SETUP+8~, ARRNO+3*, STAT+8*, STAT+9, STAT+10, SORT+8*, SORT+9, SORT+10, FLDNAM+4*, FLDNAM+8* , FLDNAM+9*, FLDTYPE+1*, FLDTYPE+2*, FLDTYPE+3*, FLDTYPE+4* |
>> TIUFPRIV | SETUP+9* |
>> TIUFSTMP | VMSG+3, VMSG+8, VMSG+13 |
>> TIUFTMPL | VMSG+3 |
>> TIUFWHO | NMWIDTH+1 |
U | STAT+10, SORT+9, SORT+10, FLDTYPE+1, FLDTYPE+2, FLDTYPE+3, FLDTYPE+4 |
>> VALMLFT | VMSG+6, VMSG+11 |
>> VALMQUIT | SETUX* |
>> VALMSG | RMSG+4* |
VMSG | VMSG+1~, VMSG+2*, VMSG+4*, VMSG+5*, VMSG+6*, VMSG+7*, VMSG+9*, VMSG+10*, VMSG+11*, VMSG+12* , VMSG+13*, VMSG1 |
X | CENTER~, CENTER+3, CENTER+4, SETUP+8~, SETUP+10*, CLINDOC+2*, CLPAC+2*, HIDDEN+2*, STOP+2*, NEWHELP+2* , INHERIT+2*, RIGHT+2*, LEFT+2*, CREATE+2*, STAT+9*, SORT+4*, SORT+6*, SORT+9* |
>> XQORNOD | VMSG+4, VMSG+5, VMSG+9, VMSG+10 |
Y | SETUP+8~, CLINDOC+3, CLINDOC+4, CLPAC+3, HIDDEN+2, HIDDEN+3, STOP+2, STOP+3, NEWHELP+2, NEWHELP+3 , INHERIT+2, INHERIT+3, RIGHT+2, RIGHT+3, LEFT+2, LEFT+3, CREATE+2, CREATE+3, STAT+8, STAT+9 , STAT+10, SORT+4, SORT+5, SORT+6, SORT+7, SORT+8, SORT+9, SORT+10, SETUX |