DGJPAR1 ;MAC/ALB - DEFICIENCIES PARAMETER SET UP FOR IRT ; MAY 13 1992@10:00
Source file <DGJPAR1.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Incomplete Records Tracking | 4 | DGJ ADD/EDIT DEFICIENCY DGJ ENTER/EDIT DEF. PARMS. DGJ IRT EDIT PARMS DGJTADD |
Kernel | 1 | ^ORD(101 |
Name | Comments | DBIA/ICR reference |
---|---|---|
START | ||
EVDT | ||
LOOP | ||
QUIT | ||
EDIT | ;EDIT OF DEFICIENCIES ON THE SCREEN
|
|
EDIT1 | ||
RSET | ||
REP | ||
ABB | ||
UTIL | ||
SETG1 | ||
RESET | ||
CATSET | ;CATEGORY HEADING
|
|
TMP | ||
SETSTR(S,V,X,L) | ; -- insert text(S) into variable(V)
; S := string ; V := destination ; X := @ col X ; L := # of chars |
|
LOWER(X) | ;
|
|
INCSP | ;To increase speed of list.
; -- format vars |- column -| |- width -| |
FileNo | Call Tags |
---|---|
^VAS(393.3 - [#393.3] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("DGJ" | EVDT!, LOOP, QUIT+1!, UTIL* |
^TMP("DGJDEF" | EVDT!, EVDT+3, QUIT+1!, RESET+7*, TMP* |
^TMP("DGJIDX" | EVDT!, QUIT+1!, EDIT+5, RSET, RESET+8*, TMP+1* |
^VAS(393.3 - [#393.3] | EVDT+2, LOOP, EDIT+5, EDIT1, EDIT1+1, EDIT1+2, SETG1, RESET+1, RESET+3, RESET+4 , RESET+5, RESET+6 |
^VAS(393.41 - [#393.41] | EVDT+2, RESET+6, CATSET+6 |
Name | Line Occurrences |
---|---|
$$LOWER | RESET+4, RESET+5, RESET+6 |
$$SETSTR | RESET, RESET+3, RESET+4, RESET+5, RESET+6, CATSET+4, CATSET+7, CATSET+8, CATSET+10 |
ABB | EDIT+5 |
CATSET | SETG1+2 |
EDIT1 | EDIT+5 |
EVDT | REP |
INCSP | EVDT+3, ABB |
LOOP | EVDT+3 |
REP | EDIT+3, EDIT+6 |
RESET | RSET |
RSET | EDIT+5 |
SETG1 | LOOP |
TMP | CATSET+4, CATSET+8, CATSET+10 |
UTIL | EVDT+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
C | LOWER+1~, LOWER+3* |
CC | EVDT+3*, QUIT!, ABB*, RESET+6, INCSP+5* |
CM | EVDT+3*, QUIT!, ABB* |
CW | EVDT+3*, QUIT!, ABB*, RESET+6, INCSP+5* |
DA | QUIT!, EDIT+5*, EDIT1, EDIT1+1, EDIT1+2 |
DC | EVDT+3*, QUIT!, ABB*, RESET+3, INCSP+2* |
DGJAT | QUIT!, EDIT+1~ |
DGJCAT | EVDT!, QUIT! |
DGJCAT( | SETG1+2, CATSET+2* |
DGJCNT | EVDT*, QUIT!, RSET~*, SETG1+3*, RESET+7, CATSET+1*, CATSET+2, CATSET+5*, CATSET+9*, TMP |
DGJCNT1 | EVDT*, QUIT!, RSET~*, SETG1+1*, RESET, RESET+7, RESET+8, TMP, TMP+1 |
DGJDFNO | QUIT!, EDIT+5* |
DGJFLAG | EVDT*, QUIT!, EDIT+5*, EDIT+6, EDIT1+2* |
DGJNAME | EVDT+1*, EVDT+2*, QUIT! |
DGJTCAT | QUIT!, SETG1*, SETG1+2, CATSET+2, CATSET+6 |
DGJTCDIS | EVDT+2*, LOOP*, QUIT!, UTIL |
DGJTEDT | QUIT!, EDIT+5* |
DGJTFG | EVDT*, QUIT! |
DGJTFLG | EVDT*, QUIT! |
>> DGJTREC | RESET+3, INCSP+2 |
DGJTSR1 | EVDT*, QUIT! |
DGJTUP | EVDT+1*, EVDT+2, QUIT!, EDIT1+1 |
DGJTX | QUIT! |
DGJVAL | QUIT!, CATSET+6*, CATSET+7, CATSET+8 |
DGJVAL1 | QUIT!, CATSET+7*, CATSET+8 |
DGJVALM | QUIT!, EDIT+1~, EDIT+3*, EDIT+5*, RSET |
DGJX1 | QUIT+1!, EDIT1*, EDIT1+2 |
DGJX2 | QUIT+1!, EDIT1+2* |
DGX | QUIT!, RESET+6* |
DIC | QUIT! |
DIE | QUIT!, EDIT1+1* |
DIR | QUIT! |
DR | QUIT!, EDIT1+1*, REP! |
DW | EVDT+3*, QUIT!, ABB*, RESET+3, INCSP+2* |
EC | EVDT+3*, QUIT!, ABB* |
EW | EVDT+3*, QUIT!, ABB* |
I | LOWER+1~, LOWER+3* |
IFN | EVDT+2*, LOOP*, QUIT!, EDIT+5*, UTIL, SETG1, RESET+1, RESET+3, RESET+4, RESET+5 , RESET+6, RESET+8, TMP+1 |
IOINHI | QUIT!, RESET+1 |
IOINORM | QUIT!, RESET+1 |
L | SETSTR~, SETSTR+6 |
PC | EVDT+3*, QUIT!, ABB*, RESET+4, INCSP+3* |
POP | QUIT! |
PW | EVDT+3*, QUIT!, ABB*, RESET+4, INCSP+3* |
RV | EVDT+3*, QUIT!, ABB* |
S | SETSTR~, SETSTR+6 |
SC | EVDT+3*, QUIT!, ABB*, RESET+5, INCSP+4* |
SN | EVDT+3*, QUIT!, ABB* |
SW | EVDT+3*, QUIT!, ABB*, RESET+5, INCSP+4* |
TC | EVDT+3*, QUIT!, ABB*, RESET+3 |
TW | EVDT+3*, QUIT!, ABB*, RESET+3 |
U | INCSP+2, INCSP+3, INCSP+4, INCSP+5 |
V | SETSTR~, SETSTR+6 |
>> VALMBCK | EDIT+2*, EDIT+4*, EDIT+7*, REP* |
>> VALMBG | REP* |
VALMCNT | EVDT*, RSET~*, SETG1+3*, RESET+1, RESET+7, RESET+8, CATSET+1*, CATSET+5*, CATSET+9*, TMP , TMP+1 |
>> VALMDDF("CATEGORY" | INCSP+5 |
>> VALMDDF("DEFICIENCY" | INCSP+2 |
>> VALMDDF("STAN | DARD DEF" , INCSP+4 |
>> VALMDDF("TRAC | K DEF" , INCSP+3 |
VALMEVL | START! |
>> VALMSG | EVDT+4* |
VALMY | EDIT+1~ |
VALMY( | EDIT+5 |
VALMY(0 | EDIT+3 |
X | EVDT+2*, QUIT!, RSET*, SETG1+3*, RESET*, RESET+3*, RESET+4*, RESET+5*, RESET+6*, RESET+7 , CATSET+3*, CATSET+4*, CATSET+5*, CATSET+7*, CATSET+8*, CATSET+9*, CATSET+10*, TMP, SETSTR~, SETSTR+6 , LOWER~, LOWER+2, INCSP+2*, INCSP+3*, INCSP+4*, INCSP+5* |
XQORS | START! |
Y | QUIT!, LOWER+1~, LOWER+2*, LOWER+3*, LOWER+4 |
Z | LOWER+1~ |