ORY429 ; ISP/TC - Post Install Routine for OR*3.0*429 ;04/04/17 12:28
Source file <ORY429.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DUPLIST(ORINVLST,ORLSTNM) | ; Check invalid list for any duplicate entries
|
|
| POST | ; Post-install subroutine
|
|
| PRNTERR(ORERR,ORACT,ORENTY,ORLSTNM) | ; Print out any errors during migration
|
|
| PRNTIERR(ORINVLST) | ; Print out list with inactive codes
|
|
| SETCLNLT | ; Migrate pre-existing clinic default list to ORQQPL SELECTION LIST param
|
|
| SETSYSPR | ; Set system & package level of ORQQPL SELECTION LIST param to VA National list
|
|
| SETUSRLT | ; Migrate pre-existing user default list to ORQQPL SELECTION LIST param
|
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | SETCLNLT+5, SETCLNLT+7, SETCLNLT+8, SETUSRLT+5, SETUSRLT+7 |
| $$VALLIST^GMPLBLD2 | SETCLNLT+9, SETUSRLT+9 |
| ADD^XPAR | SETUSRLT+12 |
| EN^XPAR | SETCLNLT+14, SETCLNLT+15, SETSYSPR+6, SETSYSPR+7 |
| $$PATCH^XPDUTL | POST+3 |
| MES^XPDUTL | POST+6, POST+11, POST+16, PRNTERR+8, PRNTIERR+7, PRNTIERR+9 |
| FileNo | Call Tags |
|---|---|
| ^GMPL(125 - [#125] | GET1^DIQ |
| ^VA(200 - [#200] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^GMPL(125 - [#125] | SETCLNLT+3, SETCLNLT+4, SETSYSPR+4 |
| ^VA(200 - [#200] | SETUSRLT+3, SETUSRLT+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ORACT | PRNTERR~, PRNTERR+4, SETCLNLT+1~, SETCLNLT+2*, SETCLNLT+19, SETSYSPR+1~, SETSYSPR+2*, SETSYSPR+8, SETSYSPR+9, SETUSRLT+1~ , SETUSRLT+2*, SETUSRLT+14 |
| ORCLIN | SETCLNLT+1~, SETCLNLT+2*, SETCLNLT+3*, SETCLNLT+4, SETCLNLT+7, SETCLNLT+13, SETCLNLT+16 |
| ORCLNMSG | POST+2~, POST+11 |
| ORCLNMSG(1 | POST+8* |
| ORCLNMSG(2 | POST+9* |
| ORCLNMSG(3 | POST+10* |
| ORCLNNM | SETCLNLT+1~, SETCLNLT+7*, SETCLNLT+14, SETCLNLT+15, SETCLNLT+18 |
| ORDLM | SETCLNLT+1~, SETCLNLT+8*, SETCLNLT+14, SETCLNLT+17 |
| ORDUP | DUPLIST+1~*, DUPLIST+3*, DUPLIST+4 |
| ORDUZ | SETUSRLT+1~, SETUSRLT+2*, SETUSRLT+4*, SETUSRLT+5, SETUSRLT+12 |
| ORENT | PRNTERR+1~, PRNTERR+2*, PRNTERR+4 |
| ORENTY | PRNTERR~, PRNTERR+2, PRNTERR+4, SETCLNLT+1~, SETCLNLT+18*, SETCLNLT+19, SETUSRLT+1~, SETUSRLT+13*, SETUSRLT+14 |
| ORERR | PRNTERR~, PRNTERR+6, SETCLNLT+1~, SETCLNLT+14, SETCLNLT+15, SETCLNLT+19!, SETUSRLT+1~, SETUSRLT+12, SETUSRLT+14! |
| ORFILE | PRNTERR+1~ |
| ORINVLST | DUPLIST~, PRNTIERR~, SETCLNLT+1~, SETCLNLT+10, SETCLNLT+20, SETUSRLT+1~, SETUSRLT+10, SETUSRLT+15 |
| ORINVLST( | DUPLIST+2, PRNTIERR+9, SETCLNLT+11*, SETUSRLT+11* |
| ORLIST | DUPLIST+1~*, DUPLIST+2*, DUPLIST+3 |
| ORLST | PRNTIERR+1~, PRNTIERR+8*, PRNTIERR+9*, SETCLNLT+1~, SETCLNLT+2*, SETCLNLT+4*, SETCLNLT+5, SETCLNLT+8, SETCLNLT+9, SETUSRLT+1~ , SETUSRLT+5*, SETUSRLT+6, SETUSRLT+7, SETUSRLT+9 |
| ORLSTNM | DUPLIST~, DUPLIST+3, PRNTERR~, PRNTERR+5, SETCLNLT+1~, SETCLNLT+5*, SETCLNLT+6, SETCLNLT+10, SETCLNLT+11, SETCLNLT+14 , SETCLNLT+15, SETCLNLT+19, SETSYSPR+1~, SETSYSPR+2*, SETSYSPR+4*, SETSYSPR+5, SETSYSPR+6, SETSYSPR+7, SETSYSPR+8, SETSYSPR+9 , SETUSRLT+1~, SETUSRLT+7*, SETUSRLT+8, SETUSRLT+10, SETUSRLT+11, SETUSRLT+12, SETUSRLT+14 |
| ORPENTY | SETSYSPR+1~, SETSYSPR+3*, SETSYSPR+9 |
| ORPKGERR | SETSYSPR+1~, SETSYSPR+7, SETSYSPR+9 |
| ORPRVCLN | SETCLNLT+1~, SETCLNLT+2*, SETCLNLT+13, SETCLNLT+16* |
| ORPRVDLM | SETCLNLT+1~, SETCLNLT+2*, SETCLNLT+14, SETCLNLT+17* |
| ORSENTY | SETSYSPR+1~, SETSYSPR+3*, SETSYSPR+8 |
| ORSYSERR | SETSYSPR+1~, SETSYSPR+6, SETSYSPR+8 |
| ORSYSMSG | POST+2~, POST+16 |
| ORSYSMSG(1 | POST+13* |
| ORSYSMSG(2 | POST+14* |
| ORSYSMSG(3 | POST+15* |
| ORTXT | PRNTERR+1~, PRNTERR+8, PRNTIERR+1~, PRNTIERR+7 |
| ORTXT(1 | PRNTERR+3*, PRNTIERR+2* |
| ORTXT(2 | PRNTERR+4*, PRNTIERR+3* |
| ORTXT(3 | PRNTERR+5*, PRNTIERR+4* |
| ORTXT(4 | PRNTERR+6*, PRNTIERR+5* |
| ORTXT(5 | PRNTERR+7*, PRNTIERR+6* |
| ORUSR | SETUSRLT+1~, SETUSRLT+2*, SETUSRLT+3*, SETUSRLT+4, SETUSRLT+13 |
| ORUSRMSG | POST+2~, POST+6 |
| ORUSRMSG(1 | POST+4* |
| ORUSRMSG(2 | POST+5* |
| U | PRNTERR+2, PRNTERR+4, PRNTERR+6 |