TIUAUDIT ;SLC/JER - Display audit trail ;4/4/01
Source file <TIUAUDIT.m>
Package | Total | Call Graph |
---|---|---|
Text Integration Utility | 5 | GETTIU^TIULD $$CANDO^TIULP ($$CENTER,$$DATE,$$NAME)^TIULS GET^TIUSRV $$READ^TIUU |
Registration | 3 | EN^VALM $$SETSTR^VALM1 CLEAN^VALM10 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Option entry
|
|
CLEAN | ; Die, filthy spawn!!!
|
|
MAIN | ; Control branching
|
|
SETREC(LINE) | ; Calls $$SETSTR^VALM1 for each line of ^TMP("TIUAUDIT",$J,
|
|
HDR | ; Build Header
|
Name | Field # of Occurrence |
---|---|
GETTIU^TIULD | HDR+3 |
$$CANDO^TIULP | MAIN+1 |
$$CENTER^TIULS | HDR+4 |
$$DATE^TIULS | SETREC+10, SETREC+11, SETREC+13 |
$$NAME^TIULS | SETREC+3 |
GET^TIUSRV | MAIN+5 |
$$READ^TIUU | MAIN+4 |
EN^VALM | EN+2 |
$$SETSTR^VALM1 | SETREC+3, SETREC+6, SETREC+8, SETREC+10, SETREC+11, SETREC+13 |
CLEAN^VALM10 | CLEAN+1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("TIUAUDIT" | EN+1!, EN+3! |
Name | Line Occurrences |
---|---|
$$SETREC | HDR+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | HDR+1~ |
LINE | SETREC~, SETREC+2 |
TIU | EN+1~, HDR+3, CLEAN+1! |
TIU("DOCTYP" | HDR+4, SETREC+9, SETREC+12 |
TIU("EDT" | SETREC+10, SETREC+13 |
TIU("HRCN" | SETREC+6 |
TIU("LDT" | SETREC+11 |
TIU("PNM" | SETREC+3 |
TIU("WARD" | SETREC+8 |
>> TIUDA | MAIN+1, MAIN+5, HDR+3 |
TIUDTYP | HDR+1~ |
TIUPRM0 | CLEAN+1! |
TIUPRM1 | CLEAN+1! |
TIUVIEW | MAIN+1~*, MAIN+2, MAIN+3 |
U | MAIN+3, HDR+4, SETREC+8 |
VALMHDR | CLEAN+1! |
VALMHDR(1 | HDR+4* |
VALMHDR(2 | HDR+5* |
Y | SETREC+1~, SETREC+3*, SETREC+6*, SETREC+8*, SETREC+10*, SETREC+11*, SETREC+13*, SETREC+14 |