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 |