| $$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
|
|