Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: XUSNPIED

Package: Kernel

Routine: XUSNPIED


Information

XUSNPIED ;FO-OAKLAND/JLI - DATA ENTRY FOR INITIAL NPI VALUES ;6/3/08 17:19

Source Information

Source file <XUSNPIED.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Kernel 8 $$GET^XUA4A72  $$NS^XUAF4  $$KSP^XUPARAM  $$PROD^XUPROD  $$CHKGLOB^XUSNPIDA  (CBOQUEUE,CLERXMPT,POSTINIT,SIGNON)^XUSNPIE1  ($$ALIGNRGT,$$GETDATA,PRINTOPT)^XUSNPIE2  EDITNPI^XUSNPIE3  
VA Fileman 3 ^DIC  (,FILE)^DIE  $$GET1^DIQ  
MailMan 1 ^XMD  

Caller Graph

Caller Graph Total: 12

Package Total Caller Graph
Kernel 11 XU8P420  XUS NPI CBO LIST  XUS NPI ENTER NPI FOR PROVIDER  XUS NPI EXEMPT PROVIDER  XUS NPI LOCAL REPORTS  XUS NPI PROVIDER SELF ENTRY  XUS NPI SIGNON CHECK  XUSNPIE1  
XUSNPIE2  XUSNPIE3  XUSNPIUT  
IHS VA Support Files 1 AVA NPI ENTER NPI FOR PROVIDER  

Entry Points

Name Comments DBIA/ICR reference
SIGNON ; run at user sign-on to display message if NPI value is needed.
HASNPI(IEN) ; returns whether current status is D (Done)
POSTINIT ; runs post init
NEEDSNPI(IEN) ; returns whether current status is N
CLEREDIT ; Input editing of NPI value for clerical staff - ask provider
CLERXMPT ;
EDITNPI(IEN) ;
DOUSER(XUUSER,XUGLOB) ; check user for needing an NPI status value
CHKGLOB() ; returns global location of TAXONOMY values also rebuilds if they are missing
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***
GETDATA(OPTION,XUSSORT,XUSDIV) ; get data for reports for providers
NPISTATS(IEN) ; returns one letter status indicator
GETNPI(IEN) ; returns current NPI value
PRINTOPT ;
CBOLIST ; list ^ delimited output to CBO exchange mail group.
EXMPTNPI(IEN) ; returns whether current status is E (Exempt)
DATE10(DATE) ; returns date in mm/dd/yyyyy format
GETTAXON(IEN,DESCRREF) ; returns Taxonomy value (X12) and sets description in DESCRREF, otherwise -1
CHEKNPI(IEN) ; returns whether status is Needs, will check and update if not set
CBOQUEUE ; queues CBO List to run on first day of month
USEREDIT ; Entry point for provider to enter own data
CHKTAXON(IEN,TAXONOMY) ; checks whether taxonomy value (X12) is in list of billable otherwise 0-1
ALIGNRGT(TEXT,WIDTH) ; align text right in a specified width

External References

Name Field # of Occurrence
^DIC CLEREDIT+2
^DIE EDRLNPI+3
FILE^DIE DOUSER+9, CHEKNPI+3, CHEKNPI+4
$$GET1^DIQ DOUSER+3, DOUSER+6, DOUSER+7, CHEKNPI+2, NPISTATS+2, NPISTATS+4, GETNPI+1, GETTAXON+4
^XMD CBOLIST+25
$$GET^XUA4A72 GETTAXON+4
$$NS^XUAF4 CBOLIST+6
$$KSP^XUPARAM CBOLIST+6
$$PROD^XUPROD CBOLIST+3
$$CHKGLOB^XUSNPIDA CHKGLOB+1
CBOQUEUE^XUSNPIE1 CBOQUEUE+1
CLERXMPT^XUSNPIE1 CLERXMPT+1
POSTINIT^XUSNPIE1 POSTINIT+1
SIGNON^XUSNPIE1 SIGNON+1
$$ALIGNRGT^XUSNPIE2 ALIGNRGT+1
$$GETDATA^XUSNPIE2 GETDATA+1
PRINTOPT^XUSNPIE2 PRINTOPT+1
EDITNPI^XUSNPIE3 EDITNPI+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"Please see your local NPI facilitator to add the NPI",!
  • Line Location: USEREDIT+1
Routine Call
  • DIC
  • Line Location:
    • CLEREDIT+2
Routine Call
  • DIE
  • Line Location:
    • EDRLNPI+3
Routine Call
  • DIE
  • Line Location:
    • DOUSER+9
    • CHEKNPI+3
    • CHEKNPI+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J CBOLIST+11
^VA(200 - [#200] EDRLNPI+2, DOUSER+4
^XTV(8989.3 - [#8989.3] CBOLIST+5

Label References

Name Line Occurrences
$$CHEKNPI NPISTATS+3
$$CHKGLOB CHKTAXON+3
$$CHKTAXON CHEKNPI+4
$$GETDATA CBOLIST+10
$$GETTAXON CHKTAXON+2
$$NPISTATS USEREDIT+1, CBOLIST+16, NEEDSNPI+1, HASNPI+1, EXMPTNPI+1
EDITNPI CLEREDIT+2, USEREDIT+2

Naked Globals

Name Field # of Occurrence
^( DOUSER+4, CBOLIST+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADDRESS CBOLIST+1~, CBOLIST+7*, CBOLIST+24
CODE DOUSER+1~, DOUSER+6*
COUNT CBOLIST+1~, CBOLIST+11*, CBOLIST+12*, CBOLIST+17*, CBOLIST+20*
D0 DOUSER+1~, DOUSER+4*, DOUSER+5, DOUSER+6
DA EDRLNPI+3~*
DATE CBOLIST+1~, CBOLIST+4*, CBOLIST+17, CBOLIST+24, DATE10~, DATE10+1
DATEVAL CLEREDIT+1~
DESCRIP CLEREDIT+1~, CHKTAXON+1~, CHKTAXON+2
DESCRREF GETTAXON~, GETTAXON+2*, GETTAXON+4*, GETTAXON+5*
DIC CLEREDIT+1~, CLEREDIT+2*
DIC("A" CLEREDIT+2*
DIC(0 CLEREDIT+2*
DIE EDRLNPI+3~*
DOMAIN CBOLIST+1~, CBOLIST+5*
DONE CLEREDIT+1~
DR EDRLNPI+3~*
DT CBOLIST+4
DUZ USEREDIT+1, USEREDIT+2
EXPIRATN DOUSER+1~, DOUSER+5*
FDA CHEKNPI+1~, CHEKNPI+4!
FDA(200 CHEKNPI+3*, CHEKNPI+4*
GLOBLOC CBOLIST+1~, CBOLIST+10*, CBOLIST+13*, CBOLIST+14, CBOLIST+15
GLOBOUT CBOLIST+1~, CBOLIST+11*, CBOLIST+12, CBOLIST+17, CBOLIST+20, CBOLIST+23
I DOUSER+1~, DOUSER+7*, GETTAXON+1~
IEN CLEREDIT+1~, CLEREDIT+2*, EDITNPI~, EDITNPI+1, EDRLNPI~, EDRLNPI+2, EDRLNPI+3, CBOLIST+2~, CBOLIST+14*, CBOLIST+15
, CBOLIST+16, CHEKNPI~, CHEKNPI+2, CHEKNPI+3, CHEKNPI+4, NEEDSNPI~, NEEDSNPI+1, HASNPI~, HASNPI+1, EXMPTNPI~
, EXMPTNPI+1, NPISTATS~, NPISTATS+2, NPISTATS+3, NPISTATS+4, GETNPI~, GETNPI+1, GETTAXON~, GETTAXON+4, CHKTAXON~
, CHKTAXON+2
IENS CLEREDIT+1~
NPI CBOLIST+2~, CBOLIST+15*, CBOLIST+17
NPIFLD DOUSER+1~, DOUSER+2*, DOUSER+7
NPISTATS DOUSER+1~, DOUSER+2*, DOUSER+3, DOUSER+8
NPISUBFL DOUSER+1~, DOUSER+2*, DOUSER+7
NPIVAL DOUSER+7~*
NPIVAL1 CLEREDIT+1~
NPIVAL2 CLEREDIT+1~
OPTION CBOLIST+2~, CBOLIST+9*, CBOLIST+10, GETDATA~, GETDATA+1
PCLASS DOUSER+1~, DOUSER+4*
POINTER GETTAXON+1~, GETTAXON+4*
PROVNAME CLEREDIT+1~, CBOLIST+2~, CBOLIST+14*, CBOLIST+15, CBOLIST+17
PVAL DOUSER+1~, DOUSER+6*
STATION CBOLIST+2~, CBOLIST+6*, CBOLIST+7, CBOLIST+8*, CBOLIST+17, CBOLIST+24
STATNAME CBOLIST+1~
STATUS CBOLIST+2~, CBOLIST+16*, CBOLIST+17
TAXDESCR CBOLIST+2~, CBOLIST+15*, CBOLIST+17
TAXON GETTAXON+1~, GETTAXON+2*, GETTAXON+4*, GETTAXON+5*, GETTAXON+6
TAXONOMY CBOLIST+2~, CBOLIST+15*, CBOLIST+17, CHKTAXON~, CHKTAXON+2*, CHKTAXON+4
TEXT ALIGNRGT~, ALIGNRGT+1
U EDRLNPI+2, DOUSER+5, DOUSER+6, CBOLIST+5, CBOLIST+7, CBOLIST+8, CBOLIST+15, CBOLIST+17
VAL NPISTATS+1~, NPISTATS+2*, NPISTATS+3*
VALUE CHEKNPI+1~, CHEKNPI+2*, CHEKNPI+3*, CHEKNPI+4*, CHEKNPI+5
WIDTH ALIGNRGT~, ALIGNRGT+1
XMDUZ CBOLIST+22~, CBOLIST+23*
XMSUB CBOLIST+22~, CBOLIST+24*
XMTEXT CBOLIST+22~, CBOLIST+23*
XMY CBOLIST+22~
XMY("VHACONPINPF@VA.GOV" CBOLIST+23*
XUDONE DOUSER+1~, DOUSER+4*, DOUSER+6*
XUFDA DOUSER+8~
XUFDA(200 DOUSER+8*
XUGLOB DOUSER~, DOUSER+6
XUSDIV GETDATA~, GETDATA+1
XUSGLOB CHKTAXON+1~, CHKTAXON+3*, CHKTAXON+4
XUSSORT GETDATA~, GETDATA+1
XUUSER DOUSER~, DOUSER+3, DOUSER+4, DOUSER+7, DOUSER+8
XUVALUE DOUSER+1~, DOUSER+7*, DOUSER+8
XX CLEREDIT+1~
Y CLEREDIT+1~, CLEREDIT+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All