©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
DG53705I ;ALB/TMK - DG*5.3*705 Pre-Install Routine ; 05-APR-2006
Source file <DG53705I.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | (DELIX,DELIXN)^DDMOD PT^DDUCHK1 |
| Kernel | 1 | (BMES,MES)^XPDUTL |
| Registration | 1 | $$CKUPD^DG53705E |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Description: This entry point will be used as a driver for
; pre-installation updates. ; DBIA: 4542 for direct DD global access/kills and for one-time ; call to Fileman PT node cleanup (PT^DDUCHK1) |
|
| DELMISC | ; Delete various miscellaneous nodes:
; write access, help, executable help, audit, etc |
|
| DELID | ; Delete bad identifier nodes
|
|
| STEP | ||
| XREF | ; Xrefs that must be deleted
|
|
| DONE | ||
| DELPTR | ; Delete bad pointer nodes
|
|
| CLEAN | ; Erase TMP global used to screen DD update
|
|
| CHK2(FILE,FLD,XREFNM,XREFNO) | ; Returns ien of xref
|
|
| DELDESCR | ;Delete excess description nodes
|
|
| CHK1(FILE,FLD,XREFNM) | ; Check if xref exists
; Functon returns 1 if it exists, 0 if it doesn't |
|
| DELXREF | ; Delete cross references and indexes
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | DELIXN^DDMOD |
| 2.01 | DELIX^DDMOD |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | DELXREF+14!, CHK1+4, CHK2+3, CHK2+4 |
| ^DD(2 | DELMISC+3!, DELMISC+4!, DELMISC+5!, DELMISC+6!, DELMISC+9!, DELMISC+10!, DELID+3!, DELDESCR+3! |
| ^DD(2.01 | DELXREF+7 |
| ^DD(2.312 | DELMISC+7! |
| ^DIC(2 | DELMISC+8!, DELMISC+11!, DELMISC+12! |
| ^TMP("DG*5.3*705" | EN+7!, DONE+1*, CLEAN+1! |
| ^TMP("DIERR" | DELXREF+16! |
| Name | Line Occurrences |
|---|---|
| $$CHK1 | DELXREF+14 |
| $$CHK2 | DELXREF+15 |
| DELDESCR | EN+24 |
| DELID | EN+23 |
| DELMISC | EN+20 |
| DELPTR | EN+21 |
| DELXREF | EN+22 |
| DONE | EN+25 |
| STEP | DELMISC+13, DELPTR+4, DELID+4, DELDESCR+4, DELXREF+17 |
| Name | Field # of Occurrence |
|---|---|
| ^( | CHK1+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | EN+6~, EN+8*, EN+9 |
| >> DDUCFI | DELPTR+3* |
| >> DDUCFIX | DELPTR+3* |
| DGDEL | DELXREF+1~ |
| DGXREF | DELXREF+1~ |
| DGZ | DELXREF+1~, DELXREF+5*, DELXREF+13*, DELXREF+14, DELXREF+15 |
| DGZ( | DELXREF+9*, DELXREF+12, DELXREF+13 |
| DGZF | DELXREF+1~, DELXREF+11*, DELXREF+12*, DELXREF+13, DELXREF+14, DELXREF+15 |
| DGZFLD | DELXREF+1~, DELXREF+12*, DELXREF+13, DELXREF+14, DELXREF+15 |
| DGZN | DELXREF+1~, DELXREF+12*, DELXREF+13, DELXREF+14, DELXREF+15 |
| FILE | CHK1~, CHK1+4, CHK2~, CHK2+3, CHK2+4 |
| FLD | CHK1~, CHK1+4, CHK2~, CHK2+3, CHK2+4 |
| I | EN+10~, EN+11* |
| NUM | CHK2+1~, CHK2+3*, CHK2+4*, CHK2+5 |
| OK | CHK1+2~, CHK1+3*, CHK1+4*, CHK1+5 |
| U | DELXREF+7, DELXREF+9, CHK1+4, CHK2+3, CHK2+4 |
| X | DELXREF+1~, DELXREF+9* |
| XREFNM | CHK1~, CHK1+4, CHK2~, CHK2+3, CHK2+4 |
| XREFNO | CHK2~, CHK2+3 |
| Z | DELMISC+6*, DELPTR+1~, DELID+1~, DELID+3*, DELDESCR+1~, DELDESCR+3*, DELXREF+1~, DELXREF+7*, DELXREF+9*, DELXREF+15* , CHK1+2~, CHK1+3*, CHK1+4*, CHK2+1~, CHK2+2*, CHK2+4* |
| Z0 | DELPTR+1~ |
| ZMES | EN+10~, EN+17 |
| ZMES( | EN+11* |
| ZMES(3 | EN+12* |
| ZMES(4 | EN+13* |
| ZMES(5 | EN+14* |
| ZMES(6 | EN+15* |
| ZMES(7 | EN+16* |
| Name | Field # of Occurrence |
|---|---|
| $T(@(3) | DELXREF+9 |