DG933PO ;DAL/JCH - PATCH DG*5.3*933 POST INSTALL ;06/18/2017
Source file <DG933PO.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;MAIN ENTRY POINT
|
|
| HDIS(FIL,DOMPTR,DOMAIN) | ; Do dummy 'seeding'
|
|
| PSEED(FIL,DOMPTR,DOMAIN) | ||
| PSTDONE(MSG) | ; display FINISHED message
|
|
| DUMSEED(DGMFILE,DGDTAG) | ; New file <#nn.99> contains no data, can't be seeded unless there is at least one entry
; RACE MASTER (#10.99) file initial population data elements from DAT1099 line tag ; MASTER MARITAL STATUS (#11.99) file initial population data elements from DAT1199 line tag; ; MASTER RELIGION (#13.99) file initial population data elements from DAT1399 line tag; |
|
| INSREC(DGFILE,DGIEN,DGFDA) | ; Insert DGIEN into file DGFILE with data in DGFDA
|
|
| PSTHALT(MSG) | ; display error message
|
|
| SEEDGRAM | ||
| SEEDGMMS | ||
| SEEDGMR |
| Name | Field # of Occurrence |
|---|---|
| DD^%DT | PSEED+24 |
| FILE^DID | PSEED+10 |
| UPDATE^DIE | INSREC+3 |
| $$GETSTAT^HDISVF01 | PSEED+3, PSEED+28 |
| SETSTAT^HDISVF01 | PSEED+7 |
| $$GETIEN^HDISVF09 | EN+4 |
| $$SITE^VASITE | PSEED+13 |
| $$NOW^XLFDT | PSEED+24 |
| ^XMD | PSEED+32 |
| MES^XPDUTL | EN+6, PSTDONE+7, PSTHALT+6 |
| $$KSP^XUPARAM | EN+2 |
| $$PROD^XUPROD | PSEED+12 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGMMS(11.99 - [#11.99] | HDIS+8 |
| ^DGMR(13.99 - [#13.99] | HDIS+11 |
| ^DGRAM(10.99 - [#10.99] | HDIS+5 |
| ^XMB("NETNAME" | PSEED+21 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ASTATUS | PSEED+1~, PSEED+3*, PSEED+4 |
| B | HDIS+1~, PSEED+24* |
| C | HDIS+1~ |
| DA | EN+1~ |
| DEMFAC | EN+1~, EN+2* |
| DGDATA | DUMSEED+10~, DUMSEED+12*, DUMSEED+14, DUMSEED+15, DUMSEED+16 |
| DGDATLN | DUMSEED+10~, DUMSEED+12* |
| DGDERR | INSREC+2~, INSREC+4 |
| DGDTAG | DUMSEED~ |
| DGEFFDT | DUMSEED+13~ |
| DGFDA | DUMSEED+10~, DUMSEED+13~, DUMSEED+17, INSREC~, INSREC+5 |
| DGFDA( | DUMSEED+15*, DUMSEED+16* |
| DGFDAIEN | DUMSEED+13~ |
| DGFILE | INSREC~, INSREC+1 |
| DGIEN | INSREC~ |
| DGMFI | DUMSEED+10~, DUMSEED+13~, DUMSEED+14*, DUMSEED+17 |
| DGMFILE | DUMSEED~, DUMSEED+15, DUMSEED+16, DUMSEED+17 |
| DGRSLT | DUMSEED+10~, DUMSEED+17* |
| DGSITE | PSEED+1~, PSEED+13*, PSEED+14, PSEED+16, PSEED+20, PSEED+30 |
| DIE | EN+1~ |
| DIFROM | PSEED+32~! |
| DOMAIN | EN+1~, EN+3*, EN+4, EN+6, EN+8, HDIS~, HDIS+6, HDIS+9, HDIS+12, PSEED~ |
| DOMPTR | EN+1~, EN+4, EN+5, EN+8, HDIS~, HDIS+6, HDIS+9, HDIS+12, PSEED~ |
| DR | EN+1~ |
| DUZ | PSEED+17 |
| FIL | EN+1~, EN+8*, HDIS~, HDIS+4, HDIS+7, HDIS+10, PSEED~, PSEED+3, PSEED+4, PSEED+7 , PSEED+10, PSEED+14, PSEED+26, PSEED+28, PSEED+30, PSEED+33, PSTDONE+4 |
| FILNAM | PSEED+1~, PSEED+11*, PSEED+26, PSEED+30, PSTDONE+4 |
| FILNAM("NAME" | PSEED+11 |
| HDIMSG | HDIS+1~, PSTDONE+1~, PSTDONE+7, PSTHALT+6 |
| HDIMSG(1 | PSTDONE+2*, PSTHALT+1* |
| HDIMSG(2 | PSTDONE+3*, PSTHALT+2* |
| HDIMSG(3 | PSTDONE+4*, PSTHALT+3* |
| HDIMSG(4 | PSTDONE+5*, PSTHALT+4* |
| HDIMSG(5 | PSTDONE+6*, PSTHALT+5* |
| HDITEXT | PSEED+1~, PSEED+18! |
| HDITEXT(1 | PSEED+19* |
| HDITEXT(10 | PSEED+30* |
| HDITEXT(11 | PSEED+31* |
| HDITEXT(2 | PSEED+20*, PSEED+21* |
| HDITEXT(3 | PSEED+22* |
| HDITEXT(4 | PSEED+23*, PSEED+24* |
| HDITEXT(5 | PSEED+25* |
| HDITEXT(6 | PSEED+26* |
| HDITEXT(7 | PSEED+27* |
| HDITEXT(8 | PSEED+28* |
| HDITEXT(9 | PSEED+29* |
| MSG | PSEED+1~, PSEED+4*, PSEED+33*, PSTDONE~, PSTDONE+3, PSTHALT~, PSTHALT+2 |
| SUCCESS | EN+1~, EN+4*, EN+5 |
| TMP | EN+1~, HDIS+1~, PSEED+1~ |
| U | PSEED+3, PSEED+28 |
| X | EN+1~ |
| X1 | EN+1~ |
| X2 | EN+1~ |
| XMDUZ | PSEED+1~, PSEED+16* |
| XMSUB | PSEED+1~, PSEED+14* |
| XMTEXT | PSEED+1~, PSEED+32* |
| XMY | PSEED+1~ |
| XMY( | PSEED+17* |
| XMY("G.HDIS E | RT NOTIFICATION@DOMAIN.EXT" , PSEED+15* |
| XMZ | PSEED+1~, PSEED+33 |
| XPROD | PSEED+1~, PSEED+12*, PSEED+14, PSEED+22 |
| XUMF | DUMSEED+10~, DUMSEED+11* |
| Y | EN+1~, PSEED+24~* |
| ZTDESC | EN+1~ |
| ZTDTH | EN+1~ |
| ZTRTN | EN+1~ |
| Name | Field # of Occurrence |
|---|---|
| $T(@DGDTAG+DGDATLN | DUMSEED+12 |
