Print Page as PDF
DGPMDDCF CALLS ICR (1246)

DGPMDDCF CALLS    ICR (1246)

Name Value
NUMBER 1246
IA # 1246
DATE CREATED 1995/07/20
CUSTODIAL PACKAGE REGISTRATION
CUSTODIAL ISC Albany
USAGE Supported
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE DGPMDDCF
NAME DGPMDDCF CALLS
GENERAL DESCRIPTION
This agreement allows other packages to call the
following tags in the routine DGPMDDCF:  WIN, RIN, BOS, AUTH, and OPER.  These
calls return info on whether wards and beds are in service and the number of
beds in service, authorized, and operating for a given ward.
STATUS Active
DURATION Till Otherwise Agreed
ID DGPMDDCF
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION VARIABLES
WIN
Requires D0 to be passed as the IEN of the WARD
LOCATION (file #42) which you'd like to know is active or not.  DGPMOS can be
passed as a date to compute whether the ward is in service (it assumes DT if
not defined).  Returns a 1 if ward is inactive as of date or 0 if it's active.
-1 returned if D0 not defined or date not valid.
VARIABLES TYPE VARIABLES DESCRIPTION
D0 Input
IEN of WARD LOCATION file.
DGPMOS Input
Date to determine if ward is out of service as of.
X Output
1 if ward out of service, 0 if in service, or -1 if
input variables not defined properly.
RIN
Requires D0 to be passed as the IEN of the ROOM-BED
(file #405.4) which you'd like to know is active or not.  DGPMOS can be passed
as a date to compute whether the bed is in service (it assumes DT if not
defined).  Returns a 1 if bed is inactive as of date or 0 if it's active.  -1
returned if D0 not defined or date not valid.
VARIABLES TYPE VARIABLES DESCRIPTION
D0 Input
IEN of ROOM-BED file
DGPMOS Input
Date for which you'd like to know if room-bed is in
service.  Optional: assumes DT if left undefined.
X Output
Returned as 1 if bed is out of service, 0 if it's in
service, or -1 if the input variables are not defined properly.
BOS
Computes number of beds out of service for a given
ward.  D0 defines the WARD LOCATION IEN and DGPMOS can be passed as the date
on which to make the computation (assumes DT if undefined).
VARIABLES TYPE VARIABLES DESCRIPTION
D0 Input
IEN of WARD LOCATION file
DGPMOS Input
Date for which to return calculation.  Assumes DT if
undefined.
X Output
Number of beds out of service on ward as of date in
question.
AUTH
Returns number of authorized beds for WARD LOCATION
defined by D0 as of date defined in DGPMOS (assumes DT if not defined).
VARIABLES TYPE VARIABLES DESCRIPTION
D0 Input
IEN of WARD LOCATION file
DGPMOS Input
Optional variable defining date for which to return
calculation.  Assumes DT if left undefined.
X Output
Number of authorized beds for ward requested as of
date selected.
OPER
Computes the number of operating beds for a WARD
LOCATION defined in the variable D0 on a date defined by DGPMOS (assumes DT if
left undefined).
VARIABLES TYPE VARIABLES DESCRIPTION
D0 Input
IEN of WARD LOCATION file
DGPMOS Input
Optional variable to define date for which you'd like
number of operating beds returned.  Assumes DT if left undefined.
X Output
Number of operating beds for ward requested on date
input.