DG648PST ;BIR/CMC-PATCH DG*5.3*648 POST INSTALLATION ROUTINE ;2/11/05
Source file <DG648PST.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| LOOP(FIELD,FILE) | ; | |
| XR(DGFILE,DGFLD) | ;File index type cross references | |
| TEMPL | ||
| CHKSUM | ;fix missing leading zeros for ICN Checksums | |
| POST | ;Post init | |
| LOCK(IEN) | ; | 
| Name | Field # of Occurrence | 
|---|---|
| ^%ZTLOAD | POST+11 | 
| FIND^DIC | XR+10 | 
| ^DIE | CHKSUM+17 | 
| UPDATE^DIE | XR+39 | 
| WP^DIE | XR+51 | 
| EN^DIEZ | LOOP+15 | 
| $$ROUSIZE^DILF | LOOP+14 | 
| EN^DIPZ | LOOP+16 | 
| $$SITE^VASITE | CHKSUM+5, CHKSUM+25, CHKSUM+30, CHKSUM+35, CHKSUM+41 | 
| $$FMADD^XLFDT | POST+9 | 
| $$NOW^XLFDT | POST+9 | 
| ^XMD | CHKSUM+27, CHKSUM+32, CHKSUM+37, CHKSUM+43 | 
| BMES^XPDUTL | TEMPL+1, TEMPL+8, LOOP+7, LOOP+9, LOOP+15, LOOP+16 | 
| MES^XPDUTL | POST+7, XR+12, XR+42, XR+43, XR+45, XR+49, TEMPL+11 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^DD("IX" - [#.11] | FIND^DIC, WP^DIE | 
| ^DPT - [#2] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DPT - [#2] | CHKSUM+7, CHKSUM+9, CHKSUM+18, LOCK+1 | 
| ^DPT("AICN" | CHKSUM+4, CHKSUM+6 | 
| ^XTMP("DG648" | CHKSUM+1!, CHKSUM+10*, CHKSUM+19*, CHKSUM+20*, CHKSUM+21*, CHKSUM+22*, CHKSUM+44! | 
| Name | Line Occurrences | 
|---|---|
| LOCK | CHKSUM+16 | 
| LOOP | TEMPL+4 | 
| TEMPL | POST+5 | 
| XR | POST+3 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | POST+12! | 
| ARR | CHKSUM+39~ | 
| ARR(1 | CHKSUM+40* | 
| CFIELD | TEMPL+12! | 
| CFIELD( | TEMPL+9, LOOP+11, LOOP+12* | 
| CHECK | CHKSUM+2~, CHKSUM+9*, CHKSUM+10, CHKSUM+11, CHKSUM+13*, CHKSUM+19, CHKSUM+20 | 
| CNT | CHKSUM+2~, CHKSUM+3*, CHKSUM+20*, CHKSUM+21, CHKSUM+23, CHKSUM+38, TEMPL~, TEMPL+3*, TEMPL+4* | 
| CNT2 | CHKSUM+2~, CHKSUM+3*, CHKSUM+10*, CHKSUM+21, CHKSUM+28, CHKSUM+38 | 
| CNT3 | CHKSUM+2~, CHKSUM+3*, CHKSUM+19*, CHKSUM+22, CHKSUM+33, CHKSUM+38 | 
| DA | CHKSUM+2~, CHKSUM+14!, CHKSUM+15*, CHKSUM+16, CHKSUM+18 | 
| DFN | CHKSUM+2~, CHKSUM+6*, CHKSUM+7, CHKSUM+9, CHKSUM+10, CHKSUM+15, CHKSUM+19, CHKSUM+20 | 
| DGERR | XR+2~ | 
| DGERR("DIERR" | XR+44, XR+45 | 
| DGFDA | XR+2~ | 
| DGFDA( | XR+15*, XR+16*, XR+17*, XR+18*, XR+19*, XR+20*, XR+21*, XR+22*, XR+23*, XR+24* , XR+25*, XR+27*, XR+28*, XR+29*, XR+30*, XR+31* | 
| DGFILE | POST+1~, XR~, XR+9, XR+15, XR+22, XR+24, XR+25, XR+29, XR+48 | 
| DGFLD | POST+1~, XR~, XR+7, XR+24, XR+25, XR+30, XR+48 | 
| DGFLD( | XR+48* | 
| DGI | XR+41~*, XR+44*, XR+45 | 
| DGIEN | XR+2~ | 
| DGIEN(1 | XR+51 | 
| DGMFLD | POST+1~ | 
| DGOUT | POST+1~, XR+2~ | 
| DGOUT("DILIST" | XR+11 | 
| DGVAL | XR+2~, XR+10 | 
| DGVAL(1 | XR+9* | 
| DGVAL(2 | XR+9* | 
| DGWP | XR+2~ | 
| DGWP(1 | XR+33* | 
| DGWP(2 | XR+34* | 
| DGWP(3 | XR+35* | 
| DGWP(4 | XR+36* | 
| DGWP(5 | XR+37* | 
| DGXR | XR+2~, XR+7*, XR+9, XR+12, XR+16, XR+42, XR+49 | 
| DIE | CHKSUM+2~, CHKSUM+14!, CHKSUM+17* | 
| DIERR | XR+2~, XR+40 | 
| DIFROM | CHKSUM+24~, CHKSUM+29~, CHKSUM+34~, CHKSUM+39~ | 
| DMAX | LOOP+1~, LOOP+14* | 
| DR | CHKSUM+2~, CHKSUM+14!, CHKSUM+17* | 
| DUZ | POST+10, CHKSUM+25, CHKSUM+30, CHKSUM+35, CHKSUM+41 | 
| FIELD | TEMPL~, TEMPL+3*, TEMPL+4*, LOOP~, LOOP+3, LOOP+5 | 
| FILE | TEMPL~, TEMPL+3*, TEMPL+4, LOOP~, LOOP+3, LOOP+5 | 
| GLOBAL | TEMPL~, LOOP+1~, LOOP+2*, LOOP+3, LOOP+5, LOOP+6, LOOP+8, LOOP+9, LOOP+10, LOOP+15 , LOOP+16 | 
| ICN | CHKSUM+2~, CHKSUM+3*, CHKSUM+4*, CHKSUM+5, CHKSUM+6, CHKSUM+7, CHKSUM+10, CHKSUM+19, CHKSUM+20 | 
| IEN | LOCK~, LOCK+1 | 
| LEN | CHKSUM+2~, CHKSUM+11*, CHKSUM+12, CHKSUM+13 | 
| NFIELD | TEMPL~, TEMPL+3*, TEMPL+4 | 
| TEMPL+11, TEMPL+12! | |
| PRINT( | TEMPL+9* | 
| TEMPLATN | LOOP+1~, LOOP+6*, LOOP+7, LOOP+9 | 
| TEMPLATP | LOOP+1~, LOOP+4*, LOOP+5*, LOOP+6, LOOP+8, LOOP+9, LOOP+10, LOOP+13 | 
| X | CHKSUM+2~, CHKSUM+14!, TEMPL+7*, TEMPL+9*, TEMPL+12!, LOOP+1~, LOOP+8*, LOOP+9, LOOP+10, LOOP+11 , LOOP+12 | 
| XMSUB | CHKSUM+24~, CHKSUM+25*, CHKSUM+29~, CHKSUM+30*, CHKSUM+34~, CHKSUM+35*, CHKSUM+39~, CHKSUM+41* | 
| XMTEXT | CHKSUM+24~, CHKSUM+26*, CHKSUM+29~, CHKSUM+31*, CHKSUM+34~, CHKSUM+36*, CHKSUM+39~, CHKSUM+42* | 
| XMY | CHKSUM+24~, CHKSUM+29~, CHKSUM+34~, CHKSUM+39~ | 
| XMY( | CHKSUM+25*, CHKSUM+30*, CHKSUM+35*, CHKSUM+41* | 
| XMY("CHESNEY.CHRISTINE_M@FORUM.VA.GOV" | CHKSUM+26*, CHKSUM+31*, CHKSUM+36*, CHKSUM+42* | 
| Y | CHKSUM+2~, CHKSUM+14!, CHKSUM+19, TEMPL+7*, TEMPL+9*, TEMPL+12!, LOOP+1~, LOOP+13* | 
| ZTDESC | POST+8*, POST+12! | 
| ZTDTH | POST+9*, POST+12! | 
| ZTIO | POST+9*, POST+12! | 
| ZTQUEUED | POST+12! | 
| ZTREQ | POST+12! | 
| ZTRTN | POST+8*, POST+12! | 
| ZTSAVE | POST+12! | 
| ZTSAVE("DUZ" | POST+10* | 
| ZTSK | POST+12! |