PSSMRTUP ;BIR/RTR-Process Standard Medication Route File Updates ;03/02/09
Source file <PSSMRTUP.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| STCH | ;Status changes
|
|
| REMAP | ;Attempt to remap any unmapped local medication routes
|
|
| EN | ;
|
|
| INCT | ;Check Inactivation global
|
|
| SETPS | ||
| SETNW(PSSMRPQX,PSSMRPQZ) | ;
|
|
| STAT(PSSMRPEN) | ;Return status of entry, assuming .01 and File 51.23
|
|
| UN | ;Unlock Med Route
|
|
| OLDNM | ;
|
|
| SET | ;Set Data, leaving USER as null, so the installer is not recorded as the user
|
|
| ;
|
||
| FINAL | ;
|
|
| LOCALS | ;
|
|
| NWRT | ;New Medication Routes
|
| Name | Field # of Occurrence |
|---|---|
| NOW^%DTC | SETPS+4, SETNW+5 |
| UPDATE^DIE | SETPS+8, SETNW+9 |
| ATTN^PSSMRTUX | FINAL+18 |
| CHL^PSSMRTUX | FINAL+51 |
| INACZ^PSSMRTUX | EN+8 |
| ZERO^PSSMRTUX | FINAL+37 |
| $$UP^XLFSTR | REMAP+10 |
| ^XMD | MAIL+7 |
| $$GETSTAT^XTID | STAT+1 |
| $$SCREEN^XTID | STCH+14, STCH+26, REMAP+11, REMAP+12, REMAP+14, REMAP+15, REMAP+16, REMAP+18, REMAP+19, REMAP+20 , INCT+8 |
| $$RPLCMNT^XTIDTRM | STCH+9 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(51.2 - [#51.2] | REMAP+2, REMAP+3, REMAP+4, REMAP+6, REMAP+8, REMAP+9, REMAP+10, UN+2, SETPS+2, SETPS+3* , SETNW+4*, INCT+2, FINAL+13, FINAL+29, FINAL+49, FINAL+66, OLDNM+1 |
| ^PS(51.23 - [#51.23] | NWRT+5, STCH+15, STCH+16, STCH+18, STCH+19, STCH+27, STCH+28, REMAP+11, REMAP+12, REMAP+14 , REMAP+15, REMAP+17, REMAP+18, REMAP+19, REMAP+20, SET+1, SET+2, INCT+5, INCT+7, INCT+10 , OLDNM+1 |
| ^TMP("XUMF EVENT" | EN+1, NWRT+4, STCH+5, STCH+6 |
| ^TMP($J | EN+3!, EN+10!, MAIL+2, NWRT+2*, NWRT+3*, NWRT+7*, NWRT+8*, NWRT+9*, NWRT+10*, STCH+9* , STCH+10*, STCH+11*, STCH+13, STCH+14!, STCH+15*, STCH+16*, STCH+17, STCH+18*, STCH+19*, STCH+20* , STCH+21*, STCH+23*, STCH+24*, STCH+25, STCH+26!, STCH+27*, STCH+28*, STCH+29*, STCH+30*, REMAP+8 , SET+1*, SET+2*, INCT+3, INCT+6, INCT+12*, FINAL+4*, FINAL+5*, FINAL+6*, FINAL+7, FINAL+8 , FINAL+10, FINAL+13*, FINAL+14*, FINAL+15*, FINAL+16*, FINAL+17*, FINAL+19*, FINAL+20*, FINAL+21*, FINAL+23 , FINAL+24, FINAL+26, FINAL+29*, FINAL+30*, FINAL+31*, FINAL+32*, FINAL+33*, FINAL+39*, FINAL+40*, FINAL+41* , FINAL+42*, FINAL+43, FINAL+44, FINAL+46, FINAL+49*, FINAL+50*, FINAL+52*, FINAL+53*, FINAL+55*, FINAL+56* , FINAL+57*, FINAL+58*, FINAL+60, FINAL+61, FINAL+63, FINAL+66*, FINAL+67*, FINAL+68*, FINAL+69*, OLDNM+1* |
| Name | Line Occurrences |
|---|---|
| $$STAT | NWRT+6 |
| FINAL | REMAP+22 |
| INCT | REMAP+8 |
| LOCALS | EN+9 |
| EN+10 | |
| NWRT | EN+6 |
| OLDNM | SET+1, SET+2 |
| REMAP | LOCALS+5 |
| SET | REMAP+11, REMAP+13, REMAP+14, REMAP+15, REMAP+16, REMAP+18, REMAP+19, REMAP+20 |
| SETNW | INCT+11 |
| SETPS | SET+1 |
| STCH | EN+7 |
| UN | REMAP+8, REMAP+9, REMAP+11, REMAP+13, REMAP+14, REMAP+15, REMAP+16, REMAP+18, REMAP+19, REMAP+20 , REMAP+21 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | SETPS+1~, SETPS+4, SETNW+2~, SETNW+5 |
| %H | SETPS+1~, SETNW+2~ |
| %I | SETPS+1~, SETNW+2~ |
| DIFROM | MAIL+7~ |
| >> DILOCKTM | REMAP+6 |
| PSSHASHO | SETPS+1~, SETPS+2!*, SETPS+6 |
| PSSHASHP | SETPS+1~, SETPS+2! |
| PSSHASHP( | SETPS+4*, SETPS+5*, SETPS+6*, SETPS+7* |
| PSSHASHZ | SETPS+1~, SETPS+2! |
| PSSMRPBB | STCH+3~, STCH+6*, STCH+7, STCH+8, STCH+9 |
| PSSMRPCT | EN+4~, EN+5*, NWRT+2*, NWRT+3*, NWRT+7*, NWRT+8*, NWRT+9*, NWRT+10*, STCH+10*, STCH+11* , STCH+15*, STCH+16*, STCH+18*, STCH+19*, STCH+20*, STCH+21*, STCH+23*, STCH+24*, STCH+27*, STCH+28* , STCH+29*, STCH+30*, FINAL+4*, FINAL+5*, FINAL+6*, FINAL+13*, FINAL+14*, FINAL+15*, FINAL+16*, FINAL+17* , FINAL+19*, FINAL+20*, FINAL+21*, FINAL+29*, FINAL+30*, FINAL+31*, FINAL+32*, FINAL+33*, FINAL+39*, FINAL+40* , FINAL+41*, FINAL+42*, FINAL+49*, FINAL+50*, FINAL+52*, FINAL+53*, FINAL+55*, FINAL+56*, FINAL+57*, FINAL+58* , FINAL+66*, FINAL+67*, FINAL+68*, FINAL+69 |
| PSSMRPDD | STCH+3~, STCH+17*, STCH+18, STCH+19 |
| PSSMRPEE | STCH+3~, STCH+25*, STCH+26, STCH+27, STCH+28 |
| PSSMRPEN | STAT~, STAT+1 |
| PSSMRPFF | STCH+3~, STCH+4*, STCH+15*, STCH+20 |
| PSSMRPGG | STCH+3~, STCH+22*, STCH+27*, STCH+29 |
| PSSMRPJ6 | INCT+1~, INCT+2*, INCT+3, INCT+5, INCT+6, INCT+11 |
| PSSMRPJ7 | INCT+1~, INCT+6*, INCT+7 |
| PSSMRPJ8 | INCT+1~, INCT+7*, INCT+8*, INCT+10, INCT+11, INCT+12 |
| PSSMRPL | NWRT+1~, NWRT+4*, NWRT+5, NWRT+6 |
| PSSMRPL1 | NWRT+1~*, NWRT+6*, NWRT+9 |
| PSSMRPLL | STCH+3~, STCH+5*, STCH+6, STCH+9, STCH+12!, STCH+13*, STCH+14, STCH+15, STCH+16, STCH+17 |
| PSSMRPLN | NWRT+1~, NWRT+5*, NWRT+7, NWRT+8 |
| PSSMRPNW | INCT+1~, INCT+10*, INCT+12 |
| PSSMRPOL | INCT+1~, INCT+5*, INCT+12 |
| PSSMRPP1 | FINAL+2~, FINAL+7*, FINAL+8, FINAL+10, FINAL+13, FINAL+22*, FINAL+23*, FINAL+24, FINAL+26, FINAL+29 , FINAL+37!, FINAL+43*, FINAL+44, FINAL+46, FINAL+49, FINAL+59*, FINAL+60*, FINAL+61, FINAL+63, FINAL+66 |
| PSSMRPP2 | FINAL+2~, FINAL+10*, FINAL+11, FINAL+12, FINAL+26*, FINAL+27, FINAL+28, FINAL+37!, FINAL+46*, FINAL+47 , FINAL+48, FINAL+63*, FINAL+64, FINAL+65 |
| PSSMRPP3 | FINAL+2~, FINAL+11*, FINAL+14, FINAL+27*, FINAL+30, FINAL+37!, FINAL+47*, FINAL+50, FINAL+64*, FINAL+67 |
| PSSMRPP4 | FINAL+2~, FINAL+12*, FINAL+15, FINAL+28*, FINAL+31, FINAL+37!, FINAL+48*, FINAL+65*, FINAL+68 |
| PSSMRPP5 | FINAL+2~, FINAL+3*, FINAL+9*, FINAL+16, FINAL+18*, FINAL+25*, FINAL+32, FINAL+37!, FINAL+38*, FINAL+45* , FINAL+52, FINAL+54*, FINAL+62*, FINAL+69 |
| PSSMRPQA | SETNW+2~, SETNW+3! |
| PSSMRPQA( | SETNW+5*, SETNW+6*, SETNW+7*, SETNW+8* |
| PSSMRPQB | SETNW+2~, SETNW+3! |
| PSSMRPQX | SETNW~, SETNW+7 |
| PSSMRPQZ | SETNW~, SETNW+4, SETNW+8 |
| PSSMRPST | NWRT+1~, NWRT+6*, NWRT+7 |
| PSSMRPXX | STCH+3~, STCH+14* |
| PSSMRPZA | STCH+3~, STCH+9* |
| PSSMRPZB | STCH+3~, STCH+9* |
| PSSMRPZZ | STCH+3~, STCH+26* |
| PSSRTIEN | REMAP+1~, REMAP+3*, REMAP+4, REMAP+6, REMAP+8, REMAP+9, REMAP+10, UN+2, SET+1, SET+2 , SETPS+2, SETPS+3, SETPS+4, SETPS+5, SETPS+6, SETPS+7, SETNW+4, SETNW+5, SETNW+6, SETNW+7 , SETNW+8, INCT+2, INCT+12, OLDNM+1 |
| PSSRTIX | REMAP+1~, REMAP+2*, REMAP+3 |
| PSSRTLOC | REMAP+1~, REMAP+6*, UN+1, SET+1, SET+2, SETPS, INCT+11, INCT+12, OLDNM+1 |
| PSSRTLOP | REMAP+1~, REMAP+12* |
| PSSRTLOX | REMAP+1~, REMAP+12*, REMAP+13 |
| PSSRTNAM | REMAP+1~, REMAP+9!, REMAP+10*, REMAP+11, REMAP+12, REMAP+14, REMAP+15, REMAP+16, REMAP+18, REMAP+19 , REMAP+20 |
| PSSRTSHL | REMAP+1~, REMAP+12!*, REMAP+13 |
| PSSRTSTS | REMAP+1~, REMAP+9!, REMAP+11*, REMAP+12!*, REMAP+13*, REMAP+14!*, REMAP+15!*, REMAP+16!, REMAP+17*, REMAP+18!* , REMAP+19!*, REMAP+20!*, SET+1, SET+2, SETPS+3, SETPS+7 |
| X | SETPS+1~, SETNW+2~ |
| XMDUN | MAIL+1~ |
| XMDUZ | MAIL+1~, MAIL+4* |
| XMMG | MAIL+1~ |
| XMROU | MAIL+1~ |
| XMSTRIP | MAIL+1~ |
| XMSUB | MAIL+1~, MAIL+3* |
| XMTEXT | MAIL+1~, MAIL+5* |
| XMY | MAIL+1~ |
| XMY("G.PSS OR | DER CHECKS" , MAIL+6* |
| XMYBLOB | MAIL+1~ |
| XMZ | MAIL+1~ |