PSS1P201 ;BP/CMF - PATCH PSS*1*201 Pre/Post-Init Rtn ;09/13/2016
Source file <PSS1P201.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ENV | ;environment check
|
|
PRODCHK(XPDABORT) | ;checks for test/production account
|
|
PROGCHK(XPDABORT) | ;checks for necessary programmer variables
|
|
POST | ;;
|
|
APSP | ;;
|
|
KILLAPSP(IEN) | ;; remove duplicates
|
|
DOSEUNIT | ;; change file 51.24 entry 40 .01 value, so KIDS can update the correct entry
|
Name | Field # of Occurrence |
---|---|
$$FIND1^DIC | DOSEUNIT+2, DOSEUNIT+3, DOSEUNIT+6 |
FIND^DIC | APSP+3, APSP+16 |
^DIE | DOSEUNIT+5 |
UPDATE^DIE | APSP+6, APSP+19 |
^DIK | KILLAPSP+2 |
BMES^XPDUTL | PRODCHK+3, PROGCHK+3, APSP+2, DOSEUNIT+6 |
MES^XPDUTL | PRODCHK+4, PRODCHK+5, PRODCHK+6, PROGCHK+4, PROGCHK+5, PROGCHK+6, APSP+7, APSP+20 |
$$PROD^XUPROD | PRODCHK+2 |
FileNo | Call Tags |
---|---|
^PS(51.24 - [#51.24] | FIND1^DIC |
^APSPQA(32.3 - [#9009032.3] | Classic Fileman Calls, FIND^DIC |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | KILLAPSP+1~, KILLAPSP+2*, DOSEUNIT+1~, DOSEUNIT+3*, DOSEUNIT+4 |
DIE | DOSEUNIT+1~, DOSEUNIT+5* |
DIK | KILLAPSP+1~, KILLAPSP+2* |
DR | DOSEUNIT+1~, DOSEUNIT+5* |
DT | PROGCHK+2 |
DUZ | PROGCHK+2 |
DUZ(0 | PROGCHK+2 |
FDA | APSP+1~, APSP+15!, APSP+28! |
FDA(1 | APSP+5*, APSP+18* |
FDERROR | APSP+1~, APSP+7, APSP+15!, APSP+20, APSP+28! |
I | APSP+1~, APSP+10*, APSP+11*, APSP+12, APSP+15!, APSP+23*, APSP+24*, APSP+25, APSP+28! |
IEN | APSP+1~, APSP+12*, APSP+13, APSP+15!, APSP+25*, APSP+26, APSP+28!, KILLAPSP~, KILLAPSP+2 |
LIST | APSP+1~, APSP+15!, APSP+28! |
LIST("DILIST" | APSP+4, APSP+9, APSP+11, APSP+12, APSP+17, APSP+22, APSP+24, APSP+25 |
LISTERR | APSP+1~, APSP+15!, APSP+28! |
U | PROGCHK+2, APSP+4, APSP+9, APSP+17, APSP+22 |
XPDABORT | ENV+1*, ENV+3, ENV+4!, PRODCHK~, PRODCHK+7*, PROGCHK~, PROGCHK+7* |
XUMF | DOSEUNIT+1~, DOSEUNIT+5* |