DBIA3181-E ICR (3185)

Name

Value

NUMBER

3185

IA #

3185

DATE CREATED

2000/09/06

CUSTODIAL PACKAGE

VBECS

CUSTODIAL ISC

Chicago

USAGE

Controlled Subscription

TYPE

Routine

ROUTINE

VBECA1

NAME

DBIA3181-E

ORIGINAL NUMBER

3181

GENERAL DESCRIPTION

The entry point AGAB^VBECA1 is provided by the Blood
Bank package to return data from the RBC ANTIGENS ABSENT (other) sub-file
(#63.016)) including the fields RBC ANTIGENS ABSENT (#.01) and RBC ANTIGENS
ABSENT COMMENT (#.02) for the DFN value provided in the call. The API will
create a .ARR array for every absent antigen record found by the function.

STATUS

Retired

DURATION

Till Otherwise Agreed

VBECA1

COMPONENT/ENTRY POINT

COMPONENT DESCRIPTION

VARIABLES

AGAB

INPUT DEFINITION:

DFN = internal entry number from the PATIENT file (#2) (Passed as a
parameter).  You must precede the internal entry number with the accent grave
character ( ` ).

.ARR = The name of an array that will store the value of any absent antigens
found by the function.  Must be passed by reference.


OUTPUT DEFINITION:

The function builds an array for all absent antigen records it finds in Blood
Bank data structures. The name of the array used to store the retrieved data
should be passed as a parameter in the call to the function.

If no absent antigen records are found, the array will be returned empty.

For each absent antigen record found, the array will contain the name of the
absent antigen in the first data piece of the array and any absent antigen
comments in the second data piece. The populated array will be returned with
the following structure:

ARR("AGAB",n) = Absent Antigen ^ Absent Antigen comment

Where "n" is a sequential index number.

VARIABLES

TYPE

VARIABLES DESCRIPTION

DFN

Input

This is the internal entry number from the PATIENT
file (#2) (Passed as a parameter).  You must precede the internal entry number
with the accent grave character ( ` ).

.ARR

Both

The function builds an array for all absent antigen
records it finds in Blood Bank data structures. The name of the array used to
store the retrieved data should be passed as a parameter in the call to the
function.

If no absent antigen records are found, the array will be returned empty.  For
each absent antigen record found, the array will contain the name of the
absent antigen in the first data piece of the array and any absent antigen
comments in the second data piece. The populated array will be returned with
the following structure: ARR("AGAB",n) = Absent Antigen ^ Absent Antigen
comment Where "n" is a sequential index number.

SUBSCRIBING PACKAGE

SUBSCRIBING PACKAGE	ISC
LAB SERVICE	Dallas