Routine: XUSNPIED

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

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

Package

Total

Caller Graph

Kernel

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

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

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

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

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

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

Customize PDF page

Package: Kernel

Routine: XUSNPIED

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 12

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: