Populate NEW PERSON phone(s) into a local array ICR (5021)

Name

Value

NUMBER

5021

IA #

5021

DATE CREATED

2007/08/01

CUSTODIAL PACKAGE

IMAGING

USAGE

Private

TYPE

Routine

ROUTINE

MAG7UFO

NAME

Populate NEW PERSON phone(s) into a local array

GENERAL DESCRIPTION

This function return the following NEW PERSON (#200)
file fields into a local array: PHONE (HOME) (#.131), OFFICE PHONE (#.132),
PHONE #3 (#.133), PHONE #4 (#.134), COMMERCIAL PHONE (#.135), FAX NUMBER
(#.136), VOICE PAGER (#.137), and DIGITAL PAGER (#.138).

STATUS

Active

KEYWORDS

new person phone number api

DURATION

Till Otherwise Agreed

MAG7UFO

COMPONENT/ENTRY POINT

VARIABLES

NPFON

VARIABLES

TYPE

VARIABLES DESCRIPTION

XFLD

Input

The name of the array into which to populate phone
data.

XIEN

Input

The Internal Entry Number (IEN) of the NEW PERSON
file record.

@XFLD

Output

This is the local array, defined by the variable
XFLD, that is defined to carry phone contact information for an specific
individual in the NEW PERSON file.

SUBSCRIBING PACKAGE

RADIOLOGY/NUCLEAR MEDICINE