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 |