XUS MVI NEW PERSON GET (3817)    REMOTE PROCEDURE (8994)

Name Value
NAME XUS MVI NEW PERSON GET
TAG GET
ROUTINE XUMVINPU
RETURN VALUE TYPE GLOBAL ARRAY
AVAILABILITY AGREEMENT
WORD WRAP ON TRUE
VERSION 1
APP PROXY ALLOWED No
DESCRIPTION 
This 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).
INPUT PARAMETER
  • DUZ
    PARAMETER TYPE:   LITERAL
    MAXIMUM DATA LENGTH:   40
    REQUIRED:   NO
    SEQUENCE NUMBER:   1
    DESCRIPTION:   
    File IEN in the NEW PERSON file (#200)
  • SECID
    PARAMETER TYPE:   LITERAL
    MAXIMUM DATA LENGTH:   40
    REQUIRED:   NO
    SEQUENCE NUMBER:   2
    DESCRIPTION:   
    SECID field (#205.1) in the NEW PERSON file (#200)
  • NPI
    PARAMETER TYPE:   LITERAL
    MAXIMUM DATA LENGTH:   10
    REQUIRED:   NO
    SEQUENCE NUMBER:   3
    DESCRIPTION:   
    NPI (National Provider Identifier) field (#41.99) in the NEW PERSON file 
(#200).
  • SSN
    PARAMETER TYPE:   LITERAL
    MAXIMUM DATA LENGTH:   9
    REQUIRED:   NO
    SEQUENCE NUMBER:   4
    DESCRIPTION:   
    SSN (Social Security Number) field (#9) in the NEW PERSON file (#200).
RETURN PARAMETER DESCRIPTION 
 Success:
   @XURET@(#)="200;4^SEX^^^"
   @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@(#)="200;5^DOB^^^"
   @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: ######"
   @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 = ^TMP("XUMVINPU",$J)
   @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@(#) = FILE #;FIELD #<;SUBFIELD #><;FILE POINTER>^FIELD 
   @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^^^"
NAME^<COUNTER #>^INTERNAL VALUE^EXTERNAL VALUE
   @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^^^"
     <> Denotes optional values. If Counter populated, denotes multiple 
   @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^^^"
        value <1-n>
   @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^^^"
   @XURET@(#)="200;IEN^DUZ^^^"
 
   **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@(#)="200;.01^NAME^^^"
   @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^<#>^^"