DGPTAPP ;MTC/ALB - PTF Purge Utilities; 10-14-92
Source file <DGPTAPP.m>
Package | Total | Call Graph |
---|---|---|
Registration | 3 | PURGE^DGPTAPP1 TMPINT^DGPTLMU2 SEL^VALM2 |
VA Fileman | 2 | ^DIE ^DIR |
Name | Comments | DBIA/ICR reference |
---|---|---|
PURQ | ||
ADDPURQ | ||
PUREX | ;-- exit point from protocol 'DGPT A/P PURGE'
|
|
ADDPUR(TEMP) | ;-- This function will add PURGE date, user and status
|
|
WARNING() | ; This function will display a warning to the user before the
; purge of the data will occur. A '1' will be returned if the purge ; should continue. ; OUTPUT : 1 - DO NOT CONTINUE ; 0 - OK |
|
PUR | ;-- entry point from protocol 'DGPT A/P PURGE'
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DGP(45.62 - [#45.62] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGP(45.62 - [#45.62] | PUR+7, PUR+9, ADDPUR+4 |
^TMP("ARCPTF" | PUR+5 |
Name | Line Occurrences |
---|---|
$$WARNING | PUR+12 |
ADDPUR | PUR+15 |
ADDPURQ | ADDPUR+4 |
PURQ | PUR+4, PUR+7, PUR+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | ADDPUR+7*, ADDPUR+9! |
DGTMP | PUR+1~, PUR+5*, PUR+7, PUR+9, PUR+13, PUR+15 |
DIE | ADDPUR+7*, ADDPUR+9! |
DIR | WARNING+6! |
DIR("A" | WARNING+6* |
DIR("B" | WARNING+6* |
DIR(0 | WARNING+6* |
DR | ADDPUR+7*, ADDPUR+9! |
TEMP | ADDPUR~, ADDPUR+4, ADDPUR+7 |
U | PUR+7, PUR+9 |
>> VALMBCK | PUREX+2* |
>> VALMY | PUR+4 |
>> VALMY(0 | PUR+5 |
>> Y | WARNING+7 |