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)
|