©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
DG53P624 ;ALB/CMF - PATCH DG*5.3*624 INSTALL UTILITIES ; 09/30/04 8:14am
Source file <DG53P624.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRE | ;Main entry point for Pre-init items.
|
|
| PROGCHK(XPDABORT) | ;checks for necessary programmer variables
|
|
| DQMESS | ;
|
|
| CLEAN | ;Clean up text "YES" and "NO" values in 408.22/.06 and 408.22/.1
|
|
| MAPRS | ; set maximum annual pension rate parameters
|
|
| SETPARM(DGPARM,DGINST,DGVALU) | ;set PACKAGE entity parameters
|
|
| STATE | ;Correct STATE field in 408.13/1.6 with text instead of pointers
|
|
| ENV | ;Main entry point for Environment check point.
|
|
| POST | ;Main entry point for Post-init items.
|
|
| BULLETIN | ;
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | BULLETIN+8 |
| EN^DIK | CLEAN+21, CLEAN+43 |
| $$FMADD^XLFDT | DQMESS+29, DQMESS+31 |
| $$NOW^XLFDT | DQMESS+29, DQMESS+31 |
| ^XMD | DQMESS+28 |
| EN^XPAR | SETPARM+14 |
| BMES^XPDUTL | MAPRS+1, PROGCHK+3, BULLETIN+9, BULLETIN+10, BULLETIN+13, BULLETIN+16, BULLETIN+18 |
| MES^XPDUTL | MAPRS+2, MAPRS+34, MAPRS+35, SETPARM+16, SETPARM+18, PROGCHK+4, PROGCHK+5, PROGCHK+6, BULLETIN+14, BULLETIN+15 , BULLETIN+17, BULLETIN+19, BULLETIN+20 |
| FileNo | Call Tags |
|---|---|
| ^DGMT(408.22 - [#408.22] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGMT(408.22 - [#408.22] | CLEAN+8, CLEAN+9, CLEAN+11*, CLEAN+12, CLEAN+30, CLEAN+31, CLEAN+33*, CLEAN+34 |
| ^DGPR(408.13 - [#408.13] | STATE+8, STATE+9, STATE+10, STATE+13*, STATE+15 |
| ^DIC(5 - [#5] | STATE+12 |
| ^DPT - [#2] | CLEAN+12, CLEAN+34 |
| ^XTMP("DG" | BULLETIN+12, DQMESS+3!, DQMESS+4*, DQMESS+5*, DQMESS+6*, DQMESS+7*, DQMESS+8*, DQMESS+16, DQMESS+17*, DQMESS+18* , DQMESS+19*, DQMESS+30*, DQMESS+32*, DQMESS+33!, STATE+3*, STATE+5*, STATE+15*, STATE+17*, STATE+19*, CLEAN+3* , CLEAN+5*, CLEAN+12*, CLEAN+14*, CLEAN+16*, CLEAN+25*, CLEAN+27*, CLEAN+34*, CLEAN+36*, CLEAN+38* |
| Name | Line Occurrences |
|---|---|
| BULLETIN | POST+2 |
| CLEAN | DQMESS+13 |
| MAPRS | POST+1 |
| PROGCHK | ENV+3 |
| SETPARM | MAPRS+5, MAPRS+6, MAPRS+7, MAPRS+8, MAPRS+9, MAPRS+10, MAPRS+13, MAPRS+14, MAPRS+15, MAPRS+16 , MAPRS+17, MAPRS+18, MAPRS+20, MAPRS+21, MAPRS+22, MAPRS+23, MAPRS+24, MAPRS+25, MAPRS+27, MAPRS+28 , MAPRS+29, MAPRS+30, MAPRS+31, MAPRS+32 |
| STATE | DQMESS+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CTS | CLEAN+1~, CLEAN+31*, CLEAN+32, CLEAN+33, CLEAN+36 |
| DA | STATE+1~, STATE+8*, STATE+9, STATE+10, STATE+13, STATE+15, CLEAN+1~, CLEAN+8*, CLEAN+9, CLEAN+11 , CLEAN+12, CLEAN+30*, CLEAN+31, CLEAN+33, CLEAN+34 |
| DGERR | SETPARM+12~, SETPARM+14, SETPARM+15 |
| DGINST | SETPARM~, SETPARM+14, SETPARM+16, SETPARM+18 |
| DGMMLNE | DQMESS+1~, DQMESS+9*, DQMESS+29*, DQMESS+30, DQMESS+31*, DQMESS+32, STATE+3, STATE+4*, STATE+5, STATE+6* , STATE+15, STATE+16*, STATE+17, STATE+18*, STATE+19, STATE+20*, CLEAN+3, CLEAN+4*, CLEAN+5, CLEAN+6* , CLEAN+12, CLEAN+13*, CLEAN+14, CLEAN+15*, CLEAN+16, CLEAN+17*, CLEAN+25, CLEAN+26*, CLEAN+27, CLEAN+28* , CLEAN+34, CLEAN+35*, CLEAN+36, CLEAN+37*, CLEAN+38, CLEAN+39* |
| DGPARM | SETPARM~, SETPARM+14, SETPARM+16, SETPARM+18 |
| DGVALU | SETPARM~, SETPARM+14, SETPARM+16, SETPARM+18 |
| DIK | CLEAN+19*, CLEAN+22!, CLEAN+41*, CLEAN+44! |
| DIK(1 | CLEAN+20*, CLEAN+42* |
| DT | PROGCHK+2 |
| DUZ | PROGCHK+2, DQMESS+25 |
| DUZ(0 | PROGCHK+2 |
| >> JVAL | DQMESS+3, DQMESS+4, DQMESS+5, DQMESS+6, DQMESS+7, DQMESS+8, DQMESS+16, DQMESS+17, DQMESS+18, DQMESS+19 , DQMESS+30, DQMESS+32, DQMESS+33, STATE+3, STATE+5, STATE+15, STATE+17, STATE+19, CLEAN+3, CLEAN+5 , CLEAN+12, CLEAN+14, CLEAN+16, CLEAN+25, CLEAN+27, CLEAN+34, CLEAN+36, CLEAN+38 |
| LWP | CLEAN+1~, CLEAN+9*, CLEAN+10, CLEAN+11, CLEAN+14 |
| PTR | STATE+1~, STATE+12*, STATE+13, STATE+17 |
| STATE | STATE+1~, STATE+10*, STATE+11, STATE+12, STATE+17 |
| U | PROGCHK+2, DQMESS+29 |
| >> XMDUZ | DQMESS+23* |
| >> XMMG | DQMESS+29, DQMESS+33 |
| >> XMSUB | DQMESS+22* |
| >> XMTEXT | DQMESS+24* |
| >> XMY( | DQMESS+25*, DQMESS+26* |
| >> XMY("G.EAS_1_57@FORUM.VA.GOV" | DQMESS+27* |
| >> XMZ | DQMESS+29 |
| XPDABORT | ENV+2*, ENV+3, ENV+4!, PROGCHK~, PROGCHK+7* |
| ZTDESC | BULLETIN+1~, BULLETIN+4* |
| ZTDTH | BULLETIN+1~, BULLETIN+2* |
| ZTIO | BULLETIN+1~, BULLETIN+3* |
| ZTRTN | BULLETIN+1~, BULLETIN+5* |
| ZTSAVE | BULLETIN+1~ |
| ZTSAVE("DUZ" | BULLETIN+6* |
| ZTSAVE("JVAL" | BULLETIN+7* |
| >> ZTSK | BULLETIN+9, BULLETIN+10 |