Sub-Field: 4.042

Parent File	Name	Number	Package
INSTITUTION(#4)	EFFECTIVE DATE/TIME	4.042	Kernel

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	EFFECTIVE DATE/TIME	0;1	DATE	INPUT TRANSFORM: `S %DT="ESTX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAR 01, 2006` HELP-PROMPT: `Enter the date/time of the last change to this NPI.` DESCRIPTION: `This field contains the date and time of the last change to the NPI field.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `4.042^B` `1)= S ^DIC(4,DA(1),"NPISTATUS","B",$E(X,1,30),DA)=""` `2)= K ^DIC(4,DA(1),"NPISTATUS","B",$E(X,1,30),DA)`
.02	STATUS	0;2	SET	**********************REQUIRED FIELD********************** '1' FOR ACTIVE; '0' FOR INACTIVE; LAST EDITED: `MAR 01, 2006` DESCRIPTION: `The Status of an NPI is either 'ACTIVE' or 'INACTIVE'. I 'ACTIVE' then the NPI will be accessible by end-users to document a particular provider. If 'INACTIVE', then the NPI will only be accessible by the application to` `display legacy data.` `UNEDITABLE`
.03	NPI	0;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:'($$CHKDGT^XUSNPIE1(X,DA(1),"Organization_ID")) X` `MAXIMUM LENGTH: 30` LAST EDITED: `JUL 12, 2018` HELP-PROMPT: `Answer must be 10 characters in length and not being used.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `4.042^C` `1)= S ^DIC(4,DA(1),"NPISTATUS","C",$E(X,1,30),DA)=""` `2)= K ^DIC(4,DA(1),"NPISTATUS","C",$E(X,1,30),DA)` CROSS-REFERENCE: `4.042^AC^MUMPS` `1)= D SET1^XUSNPIE1(DA(1),X)` `2)= Q` `3)= Special Trigger` `his Special x-ref sets the NPI field (#41.99).` FIELD INDEX: `NPI42 (#677) REGULAR IR LOOKUP & SORTING WHOLE FILE (#4)` `Short Descr: NPI42 X-REF` `Set Logic: S ^DIC(4,"NPI42",$E(X,1,10),DA(1),DA)=""` `Kill Logic: K ^DIC(4,"NPI42",$E(X,1,10),DA(1),DA)` `Whole Kill: K ^DIC(4,"NPI42")` `X(1): NPI (4.042,.03) (Subscr 1) (Len 10) (forwards)`

.01

EFFECTIVE DATE/TIME

0;1

DATE

INPUT TRANSFORM: S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: MAR 01, 2006
HELP-PROMPT: Enter the date/time of the last change to this NPI.
DESCRIPTION:
This field contains the date and time of the last change to the NPI field.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 4.042^B
1)= S ^DIC(4,DA(1),"NPISTATUS","B",$E(X,1,30),DA)=""
2)= K ^DIC(4,DA(1),"NPISTATUS","B",$E(X,1,30),DA)

.02

STATUS

0;2

SET

************************REQUIRED FIELD************************

'1' FOR ACTIVE;
'0' FOR INACTIVE;

LAST EDITED: MAR 01, 2006
DESCRIPTION: The Status of an NPI is either 'ACTIVE' or 'INACTIVE'. I 'ACTIVE' then the NPI will be accessible by end-users to document a particular provider. If 'INACTIVE', then the NPI will only be accessible by the application to
display legacy data.
UNEDITABLE

.03

NPI

0;3

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:'($$CHKDGT^XUSNPIE1(X,DA(1),"Organization_ID")) X
MAXIMUM LENGTH: 30
LAST EDITED: JUL 12, 2018
HELP-PROMPT: Answer must be 10 characters in length and not being used.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 4.042^C
1)= S ^DIC(4,DA(1),"NPISTATUS","C",$E(X,1,30),DA)=""
2)= K ^DIC(4,DA(1),"NPISTATUS","C",$E(X,1,30),DA)
CROSS-REFERENCE: 4.042^AC^MUMPS
1)= D SET1^XUSNPIE1(DA(1),X)
2)= Q
3)= Special Trigger
his Special x-ref sets the NPI field (#41.99).
FIELD INDEX: NPI42 (#677) REGULAR IR LOOKUP & SORTING WHOLE FILE (#4)
Short Descr: NPI42 X-REF
Set Logic: S ^DIC(4,"NPI42",$E(X,1,10),DA(1),DA)=""
Kill Logic: K ^DIC(4,"NPI42",$E(X,1,10),DA(1),DA)
Whole Kill: K ^DIC(4,"NPI42")
X(1): NPI (4.042,.03) (Subscr 1) (Len 10) (forwards)

Customize PDF page

Package: Kernel

INSTITUTION(#4)-->4.042

Sub-Field: 4.042

Information

Details