SCMCCV3 ;bp/cmf - 195 Test/177 File - 404.57 preceptors to 404.53 ; Sep 1999
Source file <SCMCCV3.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
W(SCX) | ;input = 1:177 KIDS post-init, 0:177 pre-patch
|
|
ENXPD | ||
GETPRTP(SCTP) | ||
25 | ;; Link Already Seeded, filer stopped.;;
|
|
20 | ;;: No Preceptor Assignments.;;
|
|
ACTTP(SCTP) | ||
Q(SCX) | ; run job in background
; input = line reference ; output = task #, report via mailman |
|
1 | ;;Move current preceptor assignments to Preceptor History file;;
|
|
5 | ;;--> Team: ;;
|
|
S(SCX) | ;input = line reference
|
|
SCY(SC1,SC2,SC3) | ;build msg array
; input SC1=line reference or text string ; SC2=name string ; SC3=line reference or text string |
|
ENPRE | ||
BLD(SCX) | ; input = text string
|
|
DTU() | ||
T | ;;
|
|
SCF() | ||
ENMAIN(SCX) | ;
; input = 21: sd*5.3*177 preceptor filer post init ; = 23: sd*5.3*195 preceptor tester option |
|
BLDI(SCX) | ; input = text string
|
|
10 | ;;: Preceptor must be PC if position is PC.;;
|
|
15 | ;;: must have Staff Assigned.;;
|
|
EN(SCF) | ;input = 1: Postinit(file)
; = 0: PrePatch(validate) |
|
LINK() | ||
AS(SC1,SC2,SC3) | ; test for existing entry on filing
; input SC1 := tm pos ien ; SC2 := tm pos name ; SC3 := line reference |
|
SCII | ||
LOOP |
FileNo | Call Tags |
---|---|
^SD(403.44 - [#403.44] | FIND1^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SCTM(404.51 - [#404.51] | LOOP+2, LOOP+5 |
^SCTM(404.53 - [#404.53] | AS+5 |
^SCTM(404.57 - [#404.57] | LOOP+7, LOOP+10, LOOP+13, LOOP+25 |
^TMP("SCMC" | EN+4!, MAIL+6!, BLD+1* |
Name | Line Occurrences |
---|---|
$$ACTTP | LOOP+18, LOOP+29 |
$$AS | LOOP+17, LOOP+31 |
$$DTU | EN+8, ENMAIN+6 |
$$GETPRTP | LOOP+24, LOOP+33 |
$$LINK | LOOP+35, LOOP+44, LOOP+45 |
$$Q | ENMAIN+8 |
$$S | EN+7, EN+9, EN+11, MAIL+3, SCY+10, SCY+14, SCY+15, ENMAIN+5, ENMAIN+7, Q+4 , Q+5 |
$$SCF | LOOP+21, LOOP+23, LOOP+24, LOOP+27, LOOP+28, LOOP+29, LOOP+30, LOOP+32, LOOP+33 |
BLD | EN+11, LOOP+48, SCY+15, BLDI+1 |
BLDI | EN+6, EN+7, EN+8, EN+9, EN+10, LOOP+48, SCY+9, SCY+10, SCY+14 |
EN | ENXPD, ENPRE |
EN+11 | |
SCII | LOOP+20, SCY+5, BLDI+2 |
SCY | LOOP+21, LOOP+23, LOOP+24, LOOP+27, LOOP+28, LOOP+29, LOOP+30, LOOP+32, LOOP+33, LOOP+35 , LOOP+44, LOOP+45, AS+5 |
W | ENMAIN+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DT | LOOP+39, GETPRTP |
DUZ | MAIL+2, DTU+1 |
SC1 | AS~, AS+5, SCY~, SCY+12, SCY+15 |
SC2 | AS~, AS+5, SCY~, SCY+15 |
SC3 | AS~, AS+5, SCY~, SCY+15 |
SCDTU | DTU~ |
SCDTU( | DTU+3 |
SCDTU200 | DTU~, DTU+1*, DTU+2, DTU+3 |
SCDTUX | DTU~, DTU+2*, DTU+3*, DTU+4 |
SCERR | LOOP+37!, LOOP+44 |
SCF | EN~, EN+7, EN+9, EN+11, LOOP+34, MAIL+3, SCF, AS+4 |
SCFDA | LOOP+37! |
SCFDA(1 | LOOP+38*, LOOP+39*, LOOP+40*, LOOP+41*, LOOP+42* |
SCI | EN+3~, EN+5*, BLD+1, SCII* |
SCREASON | EN+3~, EN+11, EN+12*, LOOP+41 |
SCTM | EN+3~, LOOP+5*, LOOP+6, LOOP+7, LOOP+10 |
SCTM(0 | LOOP+8*, SCY+7, SCY+8* |
>> SCTMNM | LOOP+1*, LOOP+2*, LOOP+5, SCY+10 |
SCTP | EN+3~, LOOP+9*, LOOP+10*, LOOP+13, LOOP+17, LOOP+18, LOOP+23, LOOP+24, LOOP+38, ACTTP~ , GETPRTP~ |
SCTP(0 | LOOP+16*, SCY+12, SCY+13* |
>> SCTP0 | LOOP+13*, LOOP+14, LOOP+15, LOOP+21, LOOP+22, LOOP+27, LOOP+28 |
>> SCTPFLAG | LOOP+19*, LOOP+35, SCF+1* |
>> SCTPNM | LOOP+15*, LOOP+17, LOOP+21, LOOP+23, LOOP+24, LINK, SCY+14 |
>> SCTPP | LOOP+22*, LOOP+23, LOOP+25, LOOP+29, LOOP+31, LOOP+33, LOOP+42 |
>> SCTPP0 | LOOP+25*, LOOP+26, LOOP+27, LOOP+28, LOOP+30, LOOP+32 |
>> SCTPPNM | LOOP+26*, LOOP+27, LOOP+28, LOOP+29, LOOP+30, LOOP+31, LOOP+32, LOOP+33, LINK |
SCX | BLDI~, BLDI+1, BLD~, BLD+1, W~, W+2, ENMAIN~, ENMAIN+5, ENMAIN+7, ENMAIN+8 , ENMAIN+11, Q~, Q+4, Q+5, S~ |
SCY | EN+3~, W+2, W+3, ENMAIN+3! |
SCY(1 | ENMAIN+4* |
SCY(2 | ENMAIN+5* |
SCY(3 | ENMAIN+6* |
SCY(4 | ENMAIN+7* |
SCY(5 | ENMAIN+8* |
SCY(6 | ENMAIN+10* |
SCZSTOP | EN+3~, LOOP*, LOOP+2, LOOP+3*, LOOP+4, LOOP+10, LOOP+11*, LOOP+12, LOOP+48 |
U | LOOP+14, LOOP+15, LOOP+21, LOOP+22, LOOP+26, LOOP+27, LOOP+28, LOOP+30, LOOP+32, DTU+3 |
XMDUZ | MAIL~, MAIL+1*, MAIL+2 |
XMSUB | MAIL~, MAIL+3* |
XMTEXT | MAIL~, MAIL+4* |
XMY | MAIL~ |
XMY( | MAIL+2* |
ZTDESC | Q+3~, Q+5* |
ZTDTH | Q+3~, Q+6* |
ZTIO | Q+3~, Q+7* |
ZTRTN | Q+3~, Q+4* |
ZTSAVE | Q+3~ |
ZTSK | ENMAIN+9!, Q+9 |
Name | Field # of Occurrence |
---|---|
$T(T+SCX | S+2 |