XUSNPIED ;FO-OAKLAND/JLI - DATA ENTRY FOR INITIAL NPI VALUES ;6/3/08 17:19
Source file <XUSNPIED.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| SIGNON | ; run at user sign-on to display message if NPI value is needed.
 | 
|
| CLEREDIT | ; Input editing of NPI value for clerical staff - ask provider
 | 
|
| USEREDIT | ; Entry point for provider to enter own data
 | 
|
| EDITNPI(IEN) | ;
 | 
|
| EDRLNPI(IEN) | ; Edit AUTHORIZES RELEASE OF NPI field
 ; NOTE: *** This field is no longer being used, and should always be set to YES 05/13/08 tkw***  | 
|
| CLERXMPT | ;
 | 
|
| CHKGLOB() | ; returns global location of TAXONOMY values also rebuilds if they are missing
 | 
|
| DOUSER(XUUSER,XUGLOB) | ; check user for needing an NPI status value
 | 
|
| CBOLIST | ; list ^ delimited output to CBO exchange mail group.
 | 
|
| PRINTOPT | ;
 | 
|
| GETDATA(OPTION,XUSSORT,XUSDIV) | ; get data for reports for providers
 | 
|
| CHEKNPI(IEN) | ; returns whether status is Needs, will check and update if not set
 | 
|
| NEEDSNPI(IEN) | ; returns whether current status is N
 | 
|
| HASNPI(IEN) | ; returns whether current status is D (Done)
 | 
|
| EXMPTNPI(IEN) | ; returns whether current status is E (Exempt)
 | 
|
| NPISTATS(IEN) | ; returns one letter status indicator
 | 
|
| GETNPI(IEN) | ; returns current NPI value
 | 
|
| GETTAXON(IEN,DESCRREF) | ; returns Taxonomy value (X12) and sets description in DESCRREF, otherwise -1
 | 
|
| CHKTAXON(IEN,TAXONOMY) | ; checks whether taxonomy value (X12) is in list of billable otherwise 0-1
 | 
|
| DATE10(DATE) | ; returns date in mm/dd/yyyyy format
 | 
|
| POSTINIT | ; runs post init
 | 
|
| CBOQUEUE | ; queues CBO List to run on first day of month
 | 
|
| ALIGNRGT(TEXT,WIDTH) | ; align text right in a specified width
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  |