RMPR213P ;HDSO/JSG - RMPR*3.0*213 Post-install routine; Mar 2, 2023@16:00
Source file <RMPR213P.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;
|
|
| START | ;
|
|
| ICD | ;
|
|
| RMPR | ;Correct records in the PROSTHETIC SUSPENSE file (#668).
|
|
| ;send MailMan message to installer and users with the RMPRMANAGER key.
|
||
| BACKOUT | ;This section is invoked from the programmer's prompt if patch back out is required.
|
|
| ICDBACK | ;
|
|
| MAILBACK | ;
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | EN+34 |
| $$FIND1^DIC | RMPR+10 |
| $$GET1^DIQ | RMPR+11, BACKOUT+10 |
| ^DIR | BACKOUT+5, MAILBACK+14 |
| $$ICDDX^ICDEX | RMPR+13 |
| $$FMADD^XLFDT | START+2, BACKOUT+8 |
| $$LJ^XLFSTR | EN+25, EN+26, EN+27, EN+35, EN+36, EN+37 |
| SENDMSG^XMXAPI | MAIL+9, MAILBACK+10 |
| BMES^XPDUTL | EN+25, EN+26, EN+27, EN+35, EN+36, EN+37 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | FIND1^DIC, GET1^DIQ |
| ^VA(200 - [#200] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^RMPR(668 - [#668] | RMPR+3, RMPR+4, RMPR+7, RMPR+17*, ICDBACK+5, ICDBACK+6* |
| ^XTMP("RMPR*3.0*213 BACK OUT" | BACKOUT+8*, BACKOUT+9*, BACKOUT+10*, BACKOUT+11*, ICDBACK+5*, ICDBACK+9*, ICDBACK+10*, ICDBACK+11*, ICDBACK+12*, ICDBACK+13* , ICDBACK+14*, ICDBACK+15*, ICDBACK+16*, ICDBACK+17*, MAILBACK+2*, MAILBACK+3* |
| ^XTMP("RMPR*3.0*213 POST INSTALL" | START+2*, ICD+1*, ICD+2*, ICD+3*, ICD+4*, RMPR+15*, RMPR+18*, RMPR+19*, RMPR+20*, RMPR+21* , RMPR+22*, RMPR+23*, RMPR+24*, RMPR+25*, RMPR+26*, RMPR+27*, ICDBACK+3, ICDBACK+4, ICDBACK+6 |
| ^XUSEC("RMPRMANAGER" | MAIL+5, MAILBACK+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIR | BACKOUT+1~, MAILBACK+1~ |
| DIR("A" | BACKOUT+2*, BACKOUT+3*, BACKOUT+4*, MAILBACK+11*, MAILBACK+12*, MAILBACK+13* |
| DIR("B" | BACKOUT+4* |
| DIR(0 | BACKOUT+4*, MAILBACK+14* |
| DT | START+2, RMPR+9, BACKOUT+8 |
| DUZ | EN+32, MAIL+2, BACKOUT+10, BACKOUT+14 |
| RM0ORIG | RMPR+1~, RMPR+7*, RMPR+8, RMPR+9 |
| RM8ORIG | RMPR+1~, RMPR+4*, RMPR+5, RMPR+15, RMPR+16*, RMPR+17 |
| RMCON | RMPR+1~, RMPR+8*, RMPR+10, RMPR+11 |
| RMICD | RMPR+1~, RMPR+11*, RMPR+12, RMPR+13 |
| RMICDP | RMPR+1~, RMPR+13*, RMPR+14, RMPR+16 |
| RMMAILSQ | START+4~, START+5*, RMPR+18, RMPR+19, RMPR+20, RMPR+21, RMPR+22, RMPR+23, RMPR+24, RMPR+25 , RMPR+26, RMPR+27, BACKOUT+13~, BACKOUT+14*, ICDBACK+9, ICDBACK+10, ICDBACK+11, ICDBACK+12, ICDBACK+13, ICDBACK+14 , ICDBACK+15, ICDBACK+16, ICDBACK+17, MAILBACK+2, MAILBACK+3 |
| RMNX | RMPR+1~, RMPR+2*, RMPR+3*, RMPR+4, RMPR+7, RMPR+15, RMPR+17 |
| RMPRDRXW | RMPR+1~, RMPR+9*, RMPR+13 |
| RMPRDUZ | EN+28~, EN+32*, MAIL+1~, MAIL+2*, MAIL+6, MAIL+9, BACKOUT+13~, BACKOUT+14*, ICDBACK+1~, MAILBACK+7 , MAILBACK+10 |
| RMPRMIN | MAIL+1~, MAIL+9, MAILBACK+1~, MAILBACK+10 |
| RMPRMIN("FROM" | MAIL+8*, MAILBACK+9* |
| RMPRMY | MAIL+1~, MAIL+9, MAILBACK+1~, MAILBACK+10 |
| RMPRMY( | MAIL+5*, MAIL+6*, MAILBACK+6*, MAILBACK+7* |
| RMPRMZ | MAILBACK+1~, MAILBACK+10, MAILBACK+11 |
| RMPRNC | START+4~, START+5*, RMPR+16*, RMPR+20, RMPR+27, ICDBACK+2*, ICDBACK+7*, ICDBACK+11 |
| RMPRNF | START+4~, START+5*, RMPR+6*, RMPR+19, ICDBACK+2*, ICDBACK+7*, ICDBACK+10 |
| RMPRREC | MAIL+1~, MAIL+4*, MAIL+5*, MAILBACK+1~, MAILBACK+5*, MAILBACK+6* |
| RMPRSTR | ICDBACK+1~, ICDBACK+2* |
| RMPRSUB | MAIL+1~, MAIL+7*, MAIL+9, MAILBACK+1~, MAILBACK+8*, MAILBACK+10 |
| RMPRTEXT | MAIL+1~, MAIL+3*, MAIL+9, MAILBACK+1~, MAILBACK+4*, MAILBACK+10 |
| RMPRX | ICDBACK+1~, ICDBACK+3*, ICDBACK+4*, ICDBACK+5, ICDBACK+6 |
| RMPRZ | BACKOUT+13~, ICDBACK+1~, ICDBACK+2*, ICDBACK+3*, ICDBACK+4, ICDBACK+5, ICDBACK+6 |
| RMSTR | RMPR+1~ |
| U | RMPR+9, RMPR+11 |
| Y | BACKOUT+1~, BACKOUT+6 |
| ZTDESC | EN+28~, EN+30* |
| ZTDTH | EN+28~, EN+31* |
| ZTIO | EN+28~, EN+31* |
| >> ZTQUEUED | START+7 |
| >> ZTREQ | START+7* |
| ZTRTN | EN+28~, EN+29* |
| ZTSAVE | EN+28~ |
| ZTSAVE("RMPRDUZ" | EN+33* |
| >> ZTSK | EN+36 |
