PSDAMIS2 ;BIR/JPW-Print NAOU AMIS Report by NAOU ; 1 Sept 94
Source file <PSDAMIS2.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| SET | ;sets data | |
| START | ;entry point for report | |
| CHK | ;checks for zero cost data & sends e-mail from ^PSDCOSM | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD("DD" | CHK+1 | 
| ^PSD(58.8 - [#58.8] | SET+4, SET+5 | 
| ^PSD(58.81 - [#58.81] | START+3, START+4, SET+1, SET+2, SET+7 | 
| ^PSDRUG - [#50] | SET+3, SET+8 | 
| ^TMP("PSDAMIS" | START+1!, SET+10* | 
| ^TMP("PSDAMISC" | START+1!, SET+16* | 
| ^TMP("PSDAMISCG" | START+1!, SET+18* | 
| ^TMP("PSDAMISCN" | START+1!, SET+17* | 
| ^TMP("PSDAMISCVG" | START+2!, SET+19* | 
| ^TMP("PSDAMISG" | START+1!, SET+14* | 
| ^TMP("PSDAMISQ" | START+1!, SET+13* | 
| ^TMP("PSDAMISS" | START+1!, SET+12* | 
| ^TMP("PSDAMIST" | START+1!, SET+11* | 
| ^TMP("PSDAMISVG" | START+2!, SET+15* | 
| ^TMP("PSDM" | START+2!, CHK+1!, SET+9* | 
| Name | Line Occurrences | 
|---|---|
| SET | START+4 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(0 | SET+3, SET+4, SET+5 | 
| ^(4 | SET+7 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> COST | SET+8*, SET+9, SET+10, SET+16, SET+17, SET+18, SET+19 | 
| >> JJ | START+3*, START+4, SET+10 | 
| >> JJ1 | START+3*, START+4 | 
| >> KK | START+4*, SET+1, SET+2, SET+7 | 
| >> LOC( | SET+2 | 
| >> NAOUN | SET+4*, SET+10, SET+11, SET+12, SET+13, SET+16, SET+17 | 
| >> NODE | SET+1*, SET+6 | 
| >> PSD | SET+1*, SET+2, SET+4 | 
| PSDCHO | CHK+1! | 
| PSDCHO(1 | CHK+1* | 
| >> PSDED | START+3 | 
| >> PSDPN | SET+6*, SET+10 | 
| >> PSDR | START+3*, START+4, SET+3, SET+8 | 
| >> PSDRN | SET+3*, SET+9, SET+10, SET+12, SET+13, SET+16 | 
| >> PSDS | SET+1*, SET+5 | 
| >> PSDSD | START+3 | 
| >> PSDSN | SET+5*, SET+15, SET+19 | 
| >> PSDT | CHK+1 | 
| >> PSDT(1 | CHK+1* | 
| >> QTY | SET+6*, SET+7*, SET+8, SET+10, SET+13 | 
| >> Y | CHK+1* |