SCREEN FOR ACTIVE PROVIDER ICR (5016)

Name

Value

NUMBER

5016

IA #

5016

DATE CREATED

2007/07/13

CUSTODIAL PACKAGE

REGISTRATION

USAGE

Controlled Subscription

TYPE

Routine

DBIC APPROVAL STATUS

APPROVED

ROUTINE

DGPMDD

NAME

SCREEN FOR ACTIVE PROVIDER

GENERAL DESCRIPTION

Screen for active provider in NEW PERSON (#200) file.

STATUS

Active

KEYWORDS

PROVIDER

DURATION

Till Otherwise Agreed

DGPMDD

COMPONENT/ENTRY POINT

COMPONENT DESCRIPTION

VARIABLES

$$SCREEN(Y,DA,DGDT)

This entry point screens a record of the NEW PERSON
(#200) file to determine if that record is a valid Provider selection.
The screening logic checks that the record:
1. Has the PROVIDER Security Key.
2. Is active on the system (no Termination Date) on a given
date.
3. Has an active Person Class on a given date.

This screening logic uses the DBIA #2349 - ACTIVE PROVIDER to call routine
$$ACTIVPRV^PXAPI for validating the Termination Date (#9.2) and Person Class
(#8932.1) fields of the New Person (#200) file.

VARIABLES	TYPE	VARIABLES DESCRIPTION
Y [Required]	Input	IEN of NEW PERSON (#200) file
DA [Optional]	Input	IEN of NEW PERSON (#200) file
DGDT [Optional]	Input	Date/Time (internal FM format) (Defaults to Kernel DT value if not passed)
$$SCREEN	Output	1 = success 0 = failure

SUBSCRIBING PACKAGE

DATE ACTIVATED

2007/07/13