TIUSRVT3 ; SLC/PKS Remove a user's non-shared Templates. ; [6/26/01 9:17am]
Source file <TIUSRVT3.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SELUSR | ; Call here for manual selection of TIUSR from NEW PERSON file.
|
|
KUSER | ; Get USER from Kernel - called by option: TIU TEMPLATE USER DELETE.
|
|
CLEAN(TIUSR,TIURARY) | ; Call here as an RPC: Dump templates for one user.
|
|
CTRL | ; Main control code for actual cleanup process.
|
|
DEL(TIUIEN) | ; Pass root node of AROOT x-ref of <^TIU(8927,> file.
|
|
BLD(TIUIEN,TIUARY) | ; Recursively build an array of templates.
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|