XUSNPIE1 ;FO-OAKLAND/JLI - NATIONAL PROVIDER IDENTIFIER DATA CAPTURE ;3/31/2021
Source file <XUSNPIE1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SET(XUSIEN,XUSNPI) | ;
; set value for NPI related fields (#41.97-41.99) in file #200 |
|
| SET1(XUSIEN,XUSNPI) | ;
; set value for NPI field (#41.99) in file #4 |
|
| SIGNON | ; .ACT - run at user sign-on display message if NEEDS AN NPI
|
|
| SETQUEUE(OPT,VALUE) | ;
|
|
| POSTINIT | ;
|
|
| CBOQUEUE | ;
|
|
| SETDATE() | ;
|
|
| CHKOLD1(IEN) | ;
|
|
| CLERXMPT | ;
|
|
| CHKDGT(XUSNPI,XUSDA,XUSQI) | ; INPUT TRANSFORM
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
