Print Page as PDF
DBIA3745 ICR (3745)

DBIA3745    ICR (3745)

Name Value
NUMBER 3745
IA # 3745
DATE CREATED 2002/09/03
CUSTODIAL PACKAGE REGISTRATION
CUSTODIAL ISC Albany
USAGE Private
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE VAFHLRO3
NAME DBIA3745
STATUS Active
DURATION Till Otherwise Agreed
ID VAFHLRO3
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION VARIABLES
PERSON
Procedure returns an array containing the pieces
needed to build an HL7 Role Person for a given user.

Notes
-----
* Existance and validity of input is assumed
* Initializtion (i.e. KILLing) of ARRAY() must be done by the
calling program
* ARRAY() will not be set if role can not be calculated

Sample Use
----------
S PTR200=xxxxx
S ARRAY=$NA(^TMP("ZJRP",$J))
S NULL=$C(34,34)
D PERSON^VAFHLRO3(PTR200,ARRAY,NULL)
VARIABLES TYPE VARIABLES DESCRIPTION
PTR200 Input

Pointer to entry in NEW PERSON file (#200)
ARRAY Both

Input: Array to store info in (full global reference)

Output: ARRAY will be set as follows
ARRAY(1,comp#) = Value
ARRAY(1,comp#,sub#) = Value
Comp 1: 2 Sub-components
Sub 1: DUZ
Sub 2: Facility number
Comp 2 - 7: Name in HL7 format
Comp 8: VA200 (literal)
ARRAY(2,comp#) = Value
Comp 1: Provider SSN
Comp 9: SSA (literal)
NULL Input

HL7 null designation
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE ISC SUBSCRIBING DETAILS
SCHEDULING Albany
Cover use of call by PCMM