XUS MVI NEW PERSON GET

TITLEVALUE
NAMEXUS MVI NEW PERSON GET
DESCRIPTIONThis restricted RPC is used exclusively by the Master Veteran Index (MVI)
to retrieve data (by DUZ, SECID, NPI or SSN) from the VistA NEW PERSON
file (#200).
TAGGET
ROUTINEXUMVINPU
INPUT PARAMETERSSEQUENCE NUMBER1
INPUT PARAMETERDUZ
DESCRIPTIONFile IEN in the NEW PERSON file (#200)
PARAMETER TYPELITERAL
REQUIREDNO
MAXIMUM DATA LENGTH40
INPUT PARAMETERSSEQUENCE NUMBER2
INPUT PARAMETERSECID
DESCRIPTIONSECID field (#205.1) in the NEW PERSON file (#200)
PARAMETER TYPELITERAL
REQUIREDNO
MAXIMUM DATA LENGTH40
INPUT PARAMETERSSEQUENCE NUMBER3
INPUT PARAMETERNPI
DESCRIPTIONNPI (National Provider Identifier) field (#41.99) in the NEW PERSON file
(#200).
PARAMETER TYPELITERAL
REQUIREDNO
MAXIMUM DATA LENGTH10
INPUT PARAMETERSSEQUENCE NUMBER4
INPUT PARAMETERSSN
DESCRIPTIONSSN (Social Security Number) field (#9) in the NEW PERSON file (#200).
PARAMETER TYPELITERAL
REQUIREDNO
MAXIMUM DATA LENGTH9
RETURN VALUE TYPEGLOBAL ARRAY
RETURN PARAMETER DESCRIPTION Success:
XURET = ^TMP("XUMVINPU",$J)
@XURET@(#) = FILE #;FIELD #<;SUBFIELD #><;FILE POINTER>^FIELD
NAME^^INTERNAL VALUE^EXTERNAL VALUE
<> Denotes optional values. If Counter populated, denotes multiple
value <1-n>

@XURET@(#)="200;IEN^DUZ^^^"
@XURET@(#)="200;.01^NAME^^^"
@XURET@(#)="200;4^SEX^^^"
@XURET@(#)="200;5^DOB^^^"
@XURET@(#)="200;8^TITLE^^^"
@XURET@(#)="200;7^DISUSER^^^"
@XURET@(#)="200;9.2^TERMINATION DATE^^^"
@XURET@(#)="200;9.4^Termination Reason^^^"
@XURET@(#)="200;15^PROHIBITED TIMES FOR SIGN-ON^^^"
@XURET@(#)="200;11.2^DATE VERIFY CODE LAST CHANGED^^^"
@XURET@(#)="200;.111^STREET ADDRESS 1^^^"
@XURET@(#)="200;.112^STREET ADDRESS 2^^^"
@XURET@(#)="200;.113^STREET ADDRESS 3^^^"
@XURET@(#)="200;.114^CITY^^^"
@XURET@(#)="200;.115^STATE^^^"
@XURET@(#)="200;.116^ZIP CODE^^^"
@XURET@(#)="200;.132^OFFICE PHONE^^^"
@XURET@(#)="200;.136^FAX NUMBER^^^"
@XURET@(#)="200;.151^EMAIL ADDRESS^^^"
@XURET@(#)="200;30^DATE ENTERED^^^"
@XURET@(#)="200;31^CREATOR^^^"
@XURET@(#)="200;41.98^NPI ENTRY STATUS^^^"
@XURET@(#)="200;41.99^NPI^^^"
@XURET@(#)="200;9^SSN^^^"
@XURET@(#)="200;42;.01^EFFECTIVE DATE/TIME^<1-n>^^"
@XURET@(#)="200;42;.02^STATUS^<#>^^"
@XURET@(#)="200;42;.03^NPI^<#>^^"
@XURET@(#)="200;101.13;.01^CPRS TAB^<1-n>^^"
@XURET@(#)="200;101.13;.02^EFFECTIVE DATE^<#>^^"
@XURET@(#)="200;101.13;.03^EXPIRATION DATE^<#>^^"
@XURET@(#)="200;202^LAST SIGN-ON DATE/TIME^^^"
@XURET@(#)="200;202.02^XUS Logon Attempt Count^^^"
@XURET@(#)="200;202.03^XUS Active User^^^"
@XURET@(#)="200;202.04^Entry Last Edit Date^^^"
@XURET@(#)="200;202.05^LOCKOUT USER UNTIL^^^"
@XURET@(#)="200;16;.01^DIVISION^<1-n>^^"
@XURET@(#)="200;10.1^NAME COMPONENTS^^^"
@XURET@(#)="20;1^FAMILY (LAST) NAME^^^"
@XURET@(#)="20;2^GIVEN (FIRST) NAME^^^"
@XURET@(#)="20;3^MIDDLE NAME^^^"
@XURET@(#)="20;4^PREFIX^^^"
@XURET@(#)="20;5^SUFFIX^^^"
@XURET@(#)="20;6^DEGREE^^^"
@XURET@(#)="200;29^SERVICE/SECTION^^^"
@XURET@(#)="200;201^PRIMARY MENU OPTION^^^"
@XURET@(#)="200;203;.01^SECONDARY MENU OPTIONS^<1-n>^^"
@XURET@(#)="200;51;.01^KEYS^<1-n>^^"
@XURET@(#)="200;205.1^SECID^^^"
@XURET@(#)="200;205.2^SUBJECT ORGANIZATION^^^"
@XURET@(#)="200;205.3^SUBJECT ORGANIZATION ID^^^"
@XURET@(#)="200;205.4^UNIQUE USER ID^^^"
@XURET@(#)="200;205.5^ADUPN^^^"
@XURET@(#)="200;501.1^NETWORK USERNAME^^^"
@XURET@(#)="200;8932.1;.01^PERSON CLASS^<1-n>^^"
@XURET@(#)="200;8932.1;2^EFFECTIVE DATE^<#>^^"
@XURET@(#)="200;8932.1;3^EXPIRATION DATE^<#>^^"
@XURET@(#)="200;53.1^AUTHORIZED TO WRITE MED ORDERS^^^"
@XURET@(#)="200;53.11^DETOX/MAINTENANCE ID NUMBER^^^"
@XURET@(#)="200;53.2^DEA#^^^"
@XURET@(#)="200;747.44^DEA EXPIRATION DATE^^^"
@XURET@(#)="200;53.4^INACTIVE DATE^^^"
@XURET@(#)="200;53.5^PROVIDER CLASS^^^"
@XURET@(#)="200;53.6^PROVIDER TYPE^^^"
@XURET@(#)="200;53.9^REMARKS^^^"
@XURET@(#)="200;53.91^NON-VA PRESCRIBER^^^"
@XURET@(#)="200;53.92^TAX ID^^^"
@XURET@(#)="200;55.1^SCHEDULE II NARCOTIC^^^"
@XURET@(#)="200;55.2^SCHEDULE II NON-NARCOTIC^^^"
@XURET@(#)="200;55.3^SCHEDULE III NARCOTIC^^^"
@XURET@(#)="200;55.4^SCHEDULE III NON-NARCOTIC^^^"
@XURET@(#)="200;55.5^SCHEDULE IV^^^"
@XURET@(#)="200;55.6^SCHEDULE V^^^"

**The following are ONLY returned if patch
**XU*8.0*688 has been installed.
**Subscript Counter (#) will denote the DEA Data that belongs to the
DEA NUMBER subscript
** New DEA Data will always follow the DEA NUMBER entry!
@XURET@(#)="200;9001^DETOX CALCULATED^^^"
@XURET@(#)="200;53.21;.01;8991.9^DEA NUMBER^<1-n>^^"
@XURET@(#)="200;53.21;.02^INDIVIDUAL DEA SUFFIX^<#>^^"
**Only returned if there is a DEA NUMBER (200.5321) value!!**
@XURET@(#)="8991.9;.02^BUSINESS ACTIVITY CODE^<#>^^"
@XURET@(#)="8991.9;.03^DETOX NUMBER^<#>^^"
@XURET@(#)="8991.9;.04^EXPIRATION DATE^<#>^^"
@XURET@(#)="8991.9;.06^USE FOR INPATIENT ORDERS?^<#>^^"
@XURET@(#)="8991.9;.07^TYPE^<#>^^"
@XURET@(#)="8991.9;1.1^NAME (PROVIDER OR INSTITUTION)^<#>^^"
@XURET@(#)="8991.9;1.2^STREET ADDRESS 1^<#>^^"
@XURET@(#)="8991.9;1.3^STREET ADDRESS 2^<#>^^"
@XURET@(#)="8991.9;1.4^STREET ADDRESS 3^<#>^^"
@XURET@(#)="8991.9;1.5^CITY^<#>^^"
@XURET@(#)="8991.9;1.6^STATE^<#>^^"
@XURET@(#)="8991.9;1.7^ZIP CODE^<#>^^"
@XURET@(#)="8991.9;2.1^SCHEDULE II NARCOTIC?^<#>^^"
@XURET@(#)="8991.9;2.2^SCHEDULE II NON-NARCOTIC?^<#>^^"
@XURET@(#)="8991.9;2.3^SCHEDULE III NARCOTIC?^<#>^^"
@XURET@(#)="8991.9;2.4^SCHEDULE III NON-NARCOTIC?^<#>^^"
@XURET@(#)="8991.9;2.5^SCHEDULE IV?^<#>^^"
@XURET@(#)="8991.9;2.6^SCHEDULE V?^<#>^^"
@XURET@(#)="8991.9;10.1^LAST UPDATED BY^<#>^^"
@XURET@(#)="8991.9;10.2^LAST UPDATED DATE/TIME^<#>^^"
@XURET@(#)="8991.9;10.3^LAST DOJ UPDATE DATE/TIME^<#>^^"

Fail:
XURET = ^TMP("XUMVINPU",$J)
@XURET@(1)="-1^Invalid User"
or
@XURET@(1)="-1^No Data for User: ######"
AVAILABILITYAGREEMENT
INACTIVE
CLIENT MANAGER
WORD WRAP ONTRUE
VERSION1
SUPPRESS RDV USER SETUP
APP PROXY ALLOWEDNo