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