PRSEUTL3 ;HISC/JH/MD-EMPLOYEE EDUCATION REPORT - UTILITY ;8/10/99
Source file <PRSEUTL3.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN1 | ; DEFAULT FROM CLASS ROOM HOURS WHILE ON DUTY
|
|
EN2(DUZ) | ; USER SERVICE SELECTION ROUTINE
|
|
EN3(PRDA) | ; USER SERVICE SELECTION ROUTINE WITH NEW PERSON FILE POINTER
|
|
SALCLS | ; SETS AL_CLS XREF FOR FIELD 2 IN FILE 452
|
|
DALCLS | ; KILLS AL_CLS XREF FOR FIELD 2 IN FILE 452
|
|
SALCLS1 | ; SETS AL_CLS XREF FOR FIELD 1 IN FILE 452
|
|
DALCLS1 | ; KILLS AL_CLS XREF FOR FIELD 1 IN FILE 452
|
|
EN4(DUZ) | ; PRSE-CORD SECURITY KEY CHECK
|
|
EN5(XXX) | ; ROUND VALUE IN VARIBLE XXX
|
|
EN6(DUZ) | ; PRSE SUP SECURITY KEY CHECK
|
|
EN7(X,VA200DA,DA) | ; DETERMINE THE SPONSORING SERVICE OF A CLASS
|
|
Q | ||
EN8(PRX) | ; LATEST DATE
|
|
EN9(DUZ) | ; PRSE TRAIN SECURITY KEY CHECK
|
|
EN10(SSN) | ; USER TITLE/OCCUPATION
|
|
EN11(X,D0) | ; CHECK CLASS FILE FOR DUPLICATE NAME IF FOUND RETURN 1
|
|
EN12(D0) | ; INPUT: D0 = File 200 IEN
; OUTPUT: 0 - No SSN found in file 200 ; 1 - SSN found in file 200 |
|
EN13(X) | ; INPUT 'X' = internal entry # for file 200
; OUTPUT = internal entry # for file 450 or null |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD(452.1 | EN11+9 |
^PRSE(452 - [#452] | SALCLS+2, SALCLS+3*, DALCLS+2, DALCLS+3, DALCLS+4, DALCLS+5*, DALCLS+6!, SALCLS1+2, SALCLS1+3*, DALCLS1+2 , DALCLS1+3, DALCLS1+4, DALCLS1+5*, DALCLS1+6! |
^PRSE(452.1 - [#452.1] | EN7+2, EN11+2, EN11+5 |
^PRSE(452.8 - [#452.8] | EN1+1, EN1+2*, EN8+1 |
^PRSP(454 - [#454] | EN2+4, EN2+5, EN3+4, EN3+5 |
^PRSP(454.1 - [#454.1] | EN2+5, EN2+6, EN7+3, EN11+11 |
^PRSPC - [#450] | EN2+3, EN2+4, EN3+4, EN10+2 |
^PRSPC("SSN" | EN2+3, EN3+3, EN10+1 |
^VA(200 - [#200] | EN2+2, EN3+3, EN12+4, EN13+2, EN13+3 |
^XUSEC("PRSE CORD" | EN4+1 |
^XUSEC("PRSE SUP" | EN6+1 |
^XUSEC("PRSE TRAIN" | EN9+1 |
Name | Field # of Occurrence |
---|---|
^(0 | EN10+2 |
^(1 | EN2+2, EN3+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
C | EN11+1~, EN11+9* |
CLASS | EN11+1~, EN11+5*, EN11+8, EN11+9, EN11+11 |
D0 | EN11~, EN11+3, EN12~, EN12+4 |
DA | EN1+1, EN1+2, SALCLS+2, SALCLS+3, DALCLS+2, DALCLS+3, DALCLS+4, DALCLS+6, SALCLS1+2, SALCLS1+3 , DALCLS1+2, DALCLS1+3, DALCLS1+4, DALCLS1+6, EN7~ |
DT | EN8+1 |
DUZ | EN2~, EN2+2, EN2+6, EN4~, EN4+1, EN6~, EN6+1, EN9~, EN9+1 |
IEN | EN11+1~, EN11+2*, EN11+3, EN11+5 |
PDA | EN2+1*, EN2+3*, EN2+4, EN2+7!, EN3+2*, EN3+3*, EN3+4, EN3+6! |
PRDA | EN3~, EN3+1, EN3+3 |
PRSDA | EN10+1*, EN10+2, EN10+3! |
PRSE | EN2+1*, EN2+2*, EN2+3, EN2+4*, EN2+5, EN2+7! |
PRSECLS | SALCLS+1~, SALCLS+2*, SALCLS+3, DALCLS+1~, DALCLS+2*, DALCLS+3, DALCLS+4, DALCLS+5, DALCLS+6 |
PRSECLS1 | SALCLS1+1~, SALCLS1+2*, SALCLS1+3, DALCLS1+1~, DALCLS1+2*, DALCLS1+3, DALCLS1+4, DALCLS1+5, DALCLS1+6 |
PRSEDATA | EN3+2~*, EN3+3*, EN3+4*, EN3+5, EN3+6! |
PRSEDT | DALCLS+1~, DALCLS+4*, DALCLS+5, EN8+1*, EN8+2 |
PRSEDT1 | DALCLS1+1~, DALCLS1+4*, DALCLS1+5 |
PRSEDUP | EN11+1~, EN11+3*, EN11+4, EN11+12 |
PRSEDUPL | EN11+1! |
PRSEDUPL(1 | EN11+6* |
PRSEDUPL(2 | EN11+7* |
PRSEDUPL(3 | EN11+8* |
PRSEDUPL(4 | EN11+10* |
PRSEDUPL(5 | EN11+11* |
>> PRSEIEN | EN7+2*, EN7+3 |
>> PRSEIEN(1 | EN7+2*, EN7+3 |
>> PRSELEN | EN1+2* |
>> PRSESER | EN2+1*, EN2+5*, EN2+6* |
>> PRSESER("TX" | EN2+5*, EN2+6* |
>> PRSESVC | EN7+3*, Q |
>> PRSW | EN1+1* |
PRX | EN8~, EN8+1 |
SSN | EN10~, EN10+1, EN12+3~, EN12+4*, EN12+5 |
U | EN1+1, EN1+2, EN2+2, EN2+3, EN2+4, EN2+5, EN2+6, EN3+3, EN3+4, EN3+5 , SALCLS+2, DALCLS+2, DALCLS+4, SALCLS1+2, DALCLS1+2, DALCLS1+4, EN7+2, EN10+2, EN11+8, EN11+9 , EN11+11, EN12+4, EN12+5 |
VA200DA | EN7~, EN7+2 |
X | SALCLS+3, DALCLS+3, DALCLS+4, DALCLS+5, DALCLS+6, SALCLS1+3, DALCLS1+3, DALCLS1+4, DALCLS1+5, DALCLS1+6 , EN7~, EN7+2, EN11~, EN11+2, EN13~, EN13+2, EN13+3 |
XXX | EN1+2*, EN3+2*, EN3+5*, EN3+7, EN5~, EN5+1*, EN5+2, EN8+1*, EN10+1*, EN10+2* , EN10+4 |
Y | EN8+1~*, EN10+1~, EN10+2*, EN11+1~, EN11+9*, EN11+10 |