SCAPMCA1 ;BP-CIOFO/KEITH - Get all assignment info. (cont.) ; 30 Jul 99 3:29 PM
Source file <SCAPMCA1.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 1 | ($$PRTPC,$$TMPT,$$TPPT)^SCAPMC |
| VA Fileman | 1 | ^%DTC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETTM | ;Get team information
|
|
| GETPOS | ;Get position information
|
|
| GAP(SCTAC,SCTINAC,SCADT,SCIDT) | ;Determine if a gap exists in pc assignments
|
|
| G1(SCADT,SCIDT) | ;Loop through position assignments
|
|
| SETF(SCPC,SUB,DATA) | ;Set "flat" array node
|
|
| DTRADJ(ADT,IDT,SCDT,SCDT2) | ;Adjust dates for provider information
|
|
| GETDAT | ;Get assignment data
|
|
| PPOS(SCSTR,SCPPOS) | ;Get preceptor position information
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SCPT(404.43 - [#404.43] | GETPOS+8 |
| ^SCTM(404.57 - [#404.57] | PPOS+6 |
| ^SD(403.46 - [#403.46] | PPOS+15 |
| ^TMP("SCRATCH1" | GETTM+2, GETTM+3, GETPOS+2, GETPOS+3 |
| ^TMP("SCRATCH2" | GETPOS+24, GETPOS+26, GETPOS+27, GETPOS+34, GETPOS+35 |
| ^USR(8930 - [#8930] | PPOS+17 |
| Name | Line Occurrences |
|---|---|
| $$PPOS | GETPOS+36 |
| DTRADJ | GETPOS+19 |
| G1 | GAP+2, G1+7 |
| SETF | GETPOS+12, GETPOS+30, GETPOS+38, GETPOS+40, GETPOS+48 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADT | DTRADJ~ |
| CT | SETF+4~, SETF+7* |
| DATA | SETF~, SETF+7 |
| >> DFN | GETTM+1, GETTM+6, GETPOS+1, GETPOS+11, GETPOS+18, GETPOS+29, GETPOS+37, GETPOS+39, GETPOS+45, GETPOS+46 , GETPOS+47, G1+2, G1+5, SETF+6, SETF+7 |
| GAP | GAP+1~, GAP+2*, GAP+3, G1+3*, G1+4* |
| IDT | DTRADJ~ |
| SCADT | GETPOS+13*, GETPOS+14*, GETPOS+18, GETPOS+19, GAP~, GAP+2, G1~, G1+2*, G1+3, G1+4 , G1+5, G1+7, DTRADJ+6 |
| >> SCARR | GETTM+6, GETPOS+11, GETPOS+18, GETPOS+29, GETPOS+37, GETPOS+39, GETPOS+45, GETPOS+46, GETPOS+47, G1+2 , G1+5, SETF+6, SETF+7 |
| SCDT | GETTM+1, GETPOS+1, GETPOS+19, DTRADJ~ |
| SCDT("BEGIN" | GETPOS+14, DTRADJ+6 |
| SCDT("END" | GETPOS+16, DTRADJ+7 |
| SCDT("INCL" | DTRADJ+8 |
| SCDT2 | GETPOS+19!, GETPOS+23, DTRADJ~, DTRADJ+8* |
| SCDT2("BEGIN" | DTRADJ+6* |
| SCDT2("END" | DTRADJ+7* |
| SCDT2("INCL" | DTRADJ+8* |
| SCI | GETTM+1*, GETTM+2*, GETTM+3, GETPOS+1*, GETPOS+2*, GETPOS+3, PPOS+5~, PPOS+20* |
| SCIDT | GETPOS+15*, GETPOS+16*, GETPOS+18, GETPOS+19, GAP~, GAP+2, G1~, G1+2, G1+3, G1+4 , G1+5*, G1+6, G1+7, DTRADJ+7 |
| >> SCII | GETPOS+23*, GETPOS+24*, GETPOS+26, GETPOS+27, GETPOS+34, GETPOS+35 |
| >> SCIII | GETPOS+25*, GETPOS+26*, GETPOS+27, GETPOS+33*, GETPOS+34*, GETPOS+35 |
| >> SCPAH | GETPOS+28*, GETPOS+29, GETPOS+38*, GETPOS+39 |
| SCPC | SETF~, SETF+5 |
| >> SCPCPOSF | GETPOS+9*, GETPOS+12, GETPOS+18, GETPOS+30, GETPOS+38, GETPOS+40 |
| >> SCPOS | GETPOS+4*, GETPOS+5, GETPOS+23 |
| >> SCPOSD | GETPOS+3*, GETPOS+4, GETPOS+11, GETPOS+12, GETPOS+13, GETPOS+15, PPOS+11, PPOS+18 |
| SCPPOS | GETPOS+36*, GETPOS+37, GETPOS+39, PPOS~, PPOS+6, PPOS+8 |
| SCPPOS0 | PPOS+5~, PPOS+6*, PPOS+7, PPOS+9, PPOS+10, PPOS+14, PPOS+16 |
| >> SCPPOSD | GETPOS+36*, GETPOS+37, GETPOS+38 |
| >> SCPRD | GETPOS+27*, GETPOS+28, GETPOS+29, GETPOS+30, GETPOS+35*, GETPOS+36, GETPOS+38, GETPOS+39, GETPOS+40 |
| >> SCPTA | GETTM+3*, GETTM+5, GETTM+6, GETPOS+9*, GETPOS+10, GETPOS+11, GETPOS+18, GETPOS+29, GETPOS+37, GETPOS+39 , GETPOS+45*, GETPOS+46*, GETPOS+47, G1+2, G1+5 |
| >> SCPTPA | GETPOS+4*, GETPOS+7, GETPOS+8, GETPOS+11, GETPOS+29, GETPOS+37, GETPOS+39 |
| >> SCPTPA0 | GETPOS+8*, GETPOS+9 |
| >> SCRATCH1 | GETTM+1, GETTM+8, GETPOS+1 |
| >> SCRATCH2 | GETPOS+22, GETPOS+23 |
| SCSTR | PPOS~, PPOS+12, PPOS+13 |
| >> SCSUB | GETPOS+25*, GETPOS+26, GETPOS+27, GETPOS+30 |
| SCTAC | GAP~ |
| SCTINAC | GAP~, G1+3, G1+6 |
| >> SCTM | GETTM+3*, GETTM+4, GETTM+6, GETPOS+4*, GETPOS+6, GETPOS+11, GETPOS+18, GETPOS+29, GETPOS+37, GETPOS+39 , GETPOS+45*, GETPOS+46, GETPOS+47, G1+2, G1+5 |
| >> SCTMD | GETTM+3*, GETTM+6, GETPOS+47*, GETPOS+48 |
| SCX | PPOS+5~, PPOS+20*, PPOS+21 |
| SCX( | PPOS+20 |
| SCX(1 | PPOS+8* |
| SCX(10 | PPOS+17* |
| SCX(11 | PPOS+18* |
| SCX(12 | PPOS+19* |
| SCX(2 | PPOS+9* |
| SCX(3 | PPOS+10* |
| SCX(4 | PPOS+11* |
| SCX(5 | PPOS+12* |
| SCX(6 | PPOS+13* |
| SCX(7 | PPOS+14*, PPOS+15 |
| SCX(8 | PPOS+15* |
| SCX(9 | PPOS+16*, PPOS+17 |
| SUB | SETF~, SETF+5*, SETF+6, SETF+7 |
| U | GETTM+3, GETPOS+4, GETPOS+9, GETPOS+13, GETPOS+15, GETPOS+28, GETPOS+36, GETPOS+38, GETPOS+48, PPOS+9 , PPOS+10, PPOS+11, PPOS+12, PPOS+13, PPOS+14, PPOS+15, PPOS+16, PPOS+17, PPOS+18, PPOS+20 |
| X | G1+1~, G1+4, SETF+4~, SETF+5* |
| X1 | G1+1~, G1+4* |
| X2 | G1+1~, G1+4* |