PSOLLL9 ;BIR/JLC -Prints allergy warning label ;01/24/03
Source file <PSOLLL9.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| START | ; | |
| PRINT(T) | ; | |
| END | ; | |
| STORE | ;ALLERGY LABEL PRINT NODE - SHOULD ALWAYS BE ON THE ORIGINAL | 
| Name | Field # of Occurrence | 
|---|---|
| NOW^%DTC | START+4, STORE+1 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD("DD" | START+3, START+4 | 
| ^PSRX - [#52] | START+3, START+7, START+9, STORE+1, STORE+4* | 
| Name | Line Occurrences | 
|---|---|
| START+5, START+6, START+8, START+9, START+11, START+12, START+13, START+14, START+15, START+16 , START+17, START+18, START+19, START+20, START+21, START+22, START+23, START+24 | |
| START | START+26 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | START+9 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> % | START+4, STORE+1 | 
| AAA | PSOLLL9+4~, STORE+1* | 
| >> APSPREIS | STORE+4 | 
| BBBB | PSOLLL9+4~, START+9* | 
| >> COPIES | PSOLLL9+5, START+3*, START+26, START+27* | 
| >> DATE | START+4 | 
| DATE1 | PSOLLL9+4~, START+4*, START+15 | 
| >> DAYS | START+21 | 
| >> DRUG | START+18 | 
| EXPDT | PSOLLL9+4~, START+3*, START+22 | 
| HARDCOPY | PSOLLL9+4~, PSOLLL9+5*, START+27! | 
| ICOUNT | PSOLLL9+4~, START+14* | 
| IOF | START+25 | 
| ISD | PSOLLL9+4~, START+3*, START+22 | 
| >> MW | START+20 | 
| NOW | PSOLLL9+4~, START+4*, START+5, STORE+1*, STORE+4 | 
| >> PATST | START+24 | 
| >> PDUZ | STORE+4 | 
| >> PHYS | START+17 | 
| >> PNM | START+16 | 
| >> PS2 | START+5 | 
| PSAA | PSOLLL9+4~, STORE+1*, STORE+4* | 
| PSAQUIT | PSOLLL9+4~ | 
| PSBQUIT | PSOLLL9+4~ | 
| >> PSCAP | START+21 | 
| >> PSCLN | START+24 | 
| PSCQUIT | PSOLLL9+4~ | 
| >> PSOFLAST | START+23 | 
| >> PSOFONT | START+2 | 
| PSOING | PSOLLL9+4~ | 
| >> PSOIO( | START+2 | 
| >> PSOIO("AWI" | START+1 | 
| >> PSOIO("ET" | PRINT+3 | 
| >> PSOIO("ST" | PRINT+1 | 
| >> PSOY | START+8*, START+10*, START+11*, START+12*, START+13* | 
| >> PSOYI | START+8, START+10, START+11, START+12, START+13 | 
| >> QTY | START+17 | 
| >> RX | START+3, START+5, START+7, START+9, START+13, STORE+1, STORE+4 | 
| >> RXF | START+15 | 
| >> RXN | START+6, START+15 | 
| >> RXRP( | START+5, START+13, STORE+4 | 
| >> RXY | START+5, START+15 | 
| >> SGY( | START+14 | 
| SSG | PSOLLL9+4~ | 
| >> SSNP | START+16 | 
| T | START+5*, START+6*, START+8*, START+9*, START+11*, START+12*, START+13*, START+14*, START+15*, START+16* , START+17*, START+18*, START+19*, START+20*, START+21*, START+22*, START+23*, START+24*, PRINT~, PRINT+2 | 
| TB1 | PSOLLL9+4~ | 
| TB2 | PSOLLL9+4~ | 
| >> TECH | START+11 | 
| >> VRPH | START+5 | 
| >> Y | START+3*, START+4* |