PSS211PO ;DAL/JCH - PATCH PSS*1.0*211 POST INSTALL ;09/13/2017
Source file <PSS211PO.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(PSMFILE,PSDTAG) | ; New file <#nn.99> contains no data, can't be seeded unless there is at least one entry
; MASTER DOSAGE FORM (#50.60699) file initial population data elements from DAT99 line tag |
|
INSREC(PSFILE,PSIEN,PSFDA) | ; Insert PSIEN into file PSFILE with data in PSFDA
|
|
PSTHALT(MSG) | ; display error message
|
|
SEEDOSF |
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) |
---|---|
^PSMDF(50.60699 - [#50.60699] | 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* |
DIE | EN+1~ |
DIFROM | PSEED+32~! |
DOMAIN | EN+1~, EN+3*, EN+4, EN+6, EN+8, HDIS~, HDIS+6, PSEED~ |
DOMPTR | EN+1~, EN+4, EN+5, EN+8, HDIS~, HDIS+6, PSEED~ |
DR | EN+1~ |
DUZ | PSEED+17 |
FIL | EN+1~, EN+8*, HDIS~, HDIS+4, 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 |
PSDATA | DUMSEED+9~, DUMSEED+11*, DUMSEED+13, DUMSEED+14, DUMSEED+15, DUMSEED+16 |
PSDATLN | DUMSEED+9~, DUMSEED+11* |
PSDERR | INSREC+2~, INSREC+4 |
PSDTAG | DUMSEED~ |
PSEFFDT | DUMSEED+12~ |
PSFDA | DUMSEED+9~, DUMSEED+12~, DUMSEED+17, INSREC~, INSREC+5 |
PSFDA( | DUMSEED+14*, DUMSEED+15*, DUMSEED+16* |
PSFDAIEN | DUMSEED+12~ |
PSFILE | INSREC~, INSREC+1 |
PSIEN | INSREC~ |
PSMFI | DUMSEED+9~, DUMSEED+12~, DUMSEED+13*, DUMSEED+17 |
PSMFILE | DUMSEED~, DUMSEED+14, DUMSEED+15, DUMSEED+16, DUMSEED+17 |
PSRSLT | DUMSEED+9~, DUMSEED+17* |
PSSITE | PSEED+1~, PSEED+13*, PSEED+14, PSEED+16, PSEED+20, PSEED+30 |
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+9~, DUMSEED+10* |
Y | EN+1~, PSEED+24~* |
ZTDESC | EN+1~ |
ZTDTH | EN+1~ |
ZTRTN | EN+1~ |
Name | Field # of Occurrence |
---|---|
$T(@PSDTAG+PSDATLN | DUMSEED+11 |