XU8P724 ;BIR/DRI - Patch XU*8*724 Post-Init ;1/29/20 14:15
Source file <XU8P724.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
POST | ;
|
|
QUENPI | ;task off update of npi
|
|
UPDNPI | ;update npi
|
|
GENMSG | ;Send mail message on completion of Task
|
|
FIXKEYS(XUKEYCNT) | ;Fix the subrecords in the KEYS multiple in which the .01 is not DINUMd
|
|
PROCKEY(XUDUZ,XUSUBIEN,XUKEYCNT) | ;Process this KEY subentry
|
|
GETKEY(XUIENS,XUFLAGS,XUVALS) | ;Get internal values of KEY subentry
|
|
DELKEY(XUIENS) | ;Delete a KEY subentry
|
|
ADDKEY(XUIENS,XUVALS) | ;Add a KEY subentry
|
|
UPDADUPN | ;Update ADUPN (For values > 30 chars and NOT LowerCase)
|
Name | Field # of Occurrence |
---|---|
^%ZTLOAD | QUENPI+5 |
FILE^DIE | UPDADUPN+17 |
UPDATE^DIE | ADDKEY+12 |
^DIK | DELKEY+4 |
EN1^DIK | UPDADUPN+14 |
DA^DILF | DELKEY+2 |
$$GET1^DIQ | UPDADUPN+8 |
GETS^DIQ | GETKEY+2 |
$$SITE^VASITE | GENMSG+2 |
$$FMTE^XLFDT | GENMSG+11 |
$$LOW^XLFSTR | UPDADUPN+10, UPDADUPN+13 |
^XMD | GENMSG+28 |
BMES^XPDUTL | POST+1, POST+3, QUENPI+6 |
MES^XPDUTL | QUENPI+6, QUENPI+7 |
$$UPDU^XUMVINPA | UPDNPI+6 |
$$PROD^XUPROD | GENMSG+9 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(19.1 - [#19.1] | FIXKEYS+6 |
^VA(200 - [#200] | UPDNPI+3, UPDNPI+4, FIXKEYS+7, FIXKEYS+8, PROCKEY+2, UPDADUPN+4, UPDADUPN+6, UPDADUPN+11!, UPDADUPN+16, UPDADUPN+18 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
D0 | ADDKEY+1~ |
D1 | ADDKEY+1~ |
DA | DELKEY+1~, DELKEY+2, UPDADUPN+1~, UPDADUPN+14* |
DA(1 | DELKEY+3 |
DIERR | GETKEY+1~, ADDKEY+1~ |
DIFROM | GENMSG+1~ |
DIHELP | GETKEY+1~, ADDKEY+1~ |
DIK | DELKEY+1~, DELKEY+3*, UPDADUPN+1~, UPDADUPN+14* |
DIK(1 | UPDADUPN+14* |
DIMSG | GETKEY+1~, ADDKEY+1~ |
DT | GENMSG+11 |
DUZ | GENMSG+4 |
ERRMSG | UPDNPI+1~, UPDNPI+6* |
MSGTXT | GENMSG+1~ |
MSGTXT( | GENMSG+26*, GENMSG+27* |
MSGTXT(1 | GENMSG+11* |
MSGTXT(10 | GENMSG+20* |
MSGTXT(11 | GENMSG+21* |
MSGTXT(12 | GENMSG+23* |
MSGTXT(13 | GENMSG+24* |
MSGTXT(2 | GENMSG+12* |
MSGTXT(3 | GENMSG+13* |
MSGTXT(4 | GENMSG+14* |
MSGTXT(5 | GENMSG+15* |
MSGTXT(6 | GENMSG+16* |
MSGTXT(7 | GENMSG+17* |
MSGTXT(8 | GENMSG+18* |
MSGTXT(9 | GENMSG+19* |
X | GENMSG+1~, GENMSG+2*, DELKEY+1~ |
XMDUZ | GENMSG+1~, GENMSG+3* |
XMSUB | GENMSG+1~, GENMSG+9* |
XMTEXT | GENMSG+1~, GENMSG+10* |
XMY | GENMSG+1~ |
XMY( | GENMSG+4* |
XMY("CHRISTINE.CHESNEY@DOMAIN.EXT" | GENMSG+6* |
XMY("DAN.IHLENFELD@DOMAIN.EXT" | GENMSG+5* |
XMY("JOHN.WILLIAMS30EC0C@DOMAIN.EXT" | GENMSG+7* |
XMY("MICHAEL.OGI@DOMAIN.EXT" | GENMSG+8* |
XUADUPN | UPDADUPN+1~, UPDADUPN+2*, UPDADUPN+4*, UPDADUPN+6, UPDADUPN+10, UPDADUPN+11 |
XUARR | UPDNPI+1~, UPDNPI+6 |
XUARR("NPI" | UPDNPI+3*, UPDNPI+4 |
XUCNT | UPDNPI+1~, GENMSG+19, UPDADUPN+2*, UPDADUPN+7* |
XUDUZ | UPDNPI+1~, UPDNPI+4*, UPDNPI+6, GENMSG+1~, GENMSG+25*, GENMSG+26, FIXKEYS+2~, FIXKEYS+7*, FIXKEYS+8, PROCKEY~ , PROCKEY+2, PROCKEY+3, UPDADUPN+1~, UPDADUPN+6*, UPDADUPN+7, UPDADUPN+8, UPDADUPN+11, UPDADUPN+14, UPDADUPN+16, UPDADUPN+17 , UPDADUPN+18 |
XUERR | UPDNPI+1~, GENMSG+22 |
XUERR( | GENMSG+25, UPDADUPN+16* |
XUFDA | ADDKEY+1~, UPDADUPN+1~ |
XUFDA( | ADDKEY+6* |
XUFDA(200 | UPDADUPN+17* |
XUFLAGS | GETKEY~, GETKEY+2 |
XUFLD | ADDKEY+1~, ADDKEY+5*, ADDKEY+6 |
XUI | GENMSG+1~, GENMSG+25*, GENMSG+26*, GENMSG+27 |
XUIEN | ADDKEY+1~ |
XUIEN(1 | ADDKEY+9* |
XUIENS | PROCKEY+1~, PROCKEY+3*, PROCKEY+6, PROCKEY+9, PROCKEY+12, GETKEY~, GETKEY+2, DELKEY~, DELKEY+2, ADDKEY~ , ADDKEY+2, ADDKEY+5, ADDKEY+6, ADDKEY+9 |
XUIENSN | ADDKEY+1~, ADDKEY+2*, ADDKEY+6 |
XUKEY | FIXKEYS+2~, FIXKEYS+5*, FIXKEYS+6 |
XUKEYCNT | UPDNPI+1~, UPDNPI+8, GENMSG+17, FIXKEYS~, FIXKEYS+3*, FIXKEYS+8, PROCKEY~, PROCKEY+13* |
XUKEYIEN | FIXKEYS+2~, FIXKEYS+6*, FIXKEYS+7, FIXKEYS+8 |
XUMAX | UPDNPI+1~, GENMSG+21, UPDADUPN+2*, UPDADUPN+9* |
XUMVIERR | GETKEY+1~, ADDKEY+1~ |
XUNAME | GENMSG+1~, GENMSG+2*, GENMSG+11 |
XUNPITOT | UPDNPI+1~, UPDNPI+2*, UPDNPI+4*, GENMSG+13 |
XUNPIUPD | UPDNPI+1~, UPDNPI+2*, UPDNPI+5*, GENMSG+15 |
XUPD | UPDNPI+1~, GENMSG+20, UPDADUPN+2*, UPDADUPN+14*, UPDADUPN+19* |
XUPRDUZ | UPDADUPN+1~ |
XUPRDUZ( | UPDADUPN+7, UPDADUPN+8* |
XUSITE | GENMSG+1~, GENMSG+2*, GENMSG+9 |
XUSUBIEN | FIXKEYS+2~, FIXKEYS+8*, PROCKEY~, PROCKEY+2, PROCKEY+3 |
XUVAL | UPDADUPN+1~, UPDADUPN+8*, UPDADUPN+9, UPDADUPN+10, UPDADUPN+13, UPDADUPN+17 |
XUVALS | PROCKEY+1~, PROCKEY+6, PROCKEY+12, GETKEY~, ADDKEY~ |
XUVALS( | PROCKEY+6, ADDKEY+5, ADDKEY+6, ADDKEY+9 |
Y | DELKEY+1~ |
ZTDESC | QUENPI+1~, QUENPI+3* |
ZTDTH | QUENPI+1~, QUENPI+4* |
ZTIO | QUENPI+1~, QUENPI+4* |
ZTRTN | QUENPI+1~, QUENPI+2* |
ZTSAVE | QUENPI+1~ |
ZTSK | QUENPI+1~, QUENPI+6 |