C C ************************** C C ** DEFINE THE PARAMETERS FOR OPENING THE USER DATABASE DUMP FILE C PARAMETER USRDB$_NUM_FIELDS = 38 ! NUMBER OF DB FIELDS PARAMETER SQL$_MAX_UPDATE = USRDB$_NUM_FIELDS / 2 C C ** DEFINE THE PARAMETERS FOR OPENING THE USER DATABASE DUMP FILE C PARAMETER USRDB$_DUMP_NEW = 0 ! CREATE NEW FILE PARAMETER USRDB$_DUMP_OLD = 1 ! READ OLD FILE C C ** DEFINE THE PARAMETERS FOR THE DUMP_UPDATE / GET_DUMP FUNCTION. C PARAMETER USRDB$_DUMP_UPDATE = 10 ! CREATE NEW FILE PARAMETER USRDB$_BUILD_RECORD = 11 ! READ OLD FILE C C ** DEFINE THE PARAMETERS FOR DEFINING SUCCESS/FAILURE OF OPERATION C ** WHEN CALLING A ROUTINE WHICH RETURNS A STATUS CODE. C PARAMETER USRDB$_SUCCESS = 0 PARAMETER USRDB$_FAILURE = 1 PARAMETER USRDB$_NORECORD = 2 C C ************************** C C ** DEFINE THE PARAMETERS FOR MATCHING USERDB DATA TO A SPECIFIC STRING. C PARAMETER USRDB$_MATCH_NA = 0 PARAMETER USRDB$_MATCH_EQ = 1 PARAMETER USRDB$_MATCH_GT = 2 PARAMETER USRDB$_MATCH_LT = 3 PARAMETER USRDB$_MATCH_GE = 4 PARAMETER USRDB$_MATCH_LE = 5 C C ************************** C C ** DEFINE THE PARAMETERS DEFINING THE INDEX KEY NUMBER WITHIN THE USERDB. C ** INDEX KEY NUMBER IS USED FOR EXTRACTING DATA IN A SPECIFIC SORTED ORDER. C PARAMETER USRDB$_KEY_USER_IDENT = 0 PARAMETER USRDB$_KEY_LAST_NAME = 1 PARAMETER USRDB$_KEY_PRIM_WORK = 2 PARAMETER USRDB$_KEY_CITY_NAME = 3 PARAMETER USRDB$_KEY_STATE = 4 PARAMETER USRDB$_KEY_COUNTRY = 5 PARAMETER USRDB$_KEY_INSTITUTION = 6 PARAMETER USRDB$_KEY_ZIP_CODE = 7 PARAMETER USRDB$_KEY_AREA_CODE = 8 PARAMETER USRDB$_KEY_NETWORK_ID = 9 PARAMETER USRDB$_KEY_PRIM_ACTIVITY= 10 PARAMETER USRDB$_KEY_SEC_ACTIVITY = 11 PARAMETER USRDB$_KEY_PRIN_EMPLOYER= 12 C C ************************** C C ** DEFINE THE PARAMETERS FOR SPECIFYING THE LENGTH OF EACH USERDB FIELD. C PARAMETER USRDB$_FLEN_USER_IDENT = 12 PARAMETER USRDB$_FLEN_LAST_NAME = 20 PARAMETER USRDB$_FLEN_PRIM_WORK = 4 PARAMETER USRDB$_FLEN_CITY_NAME = 40 PARAMETER USRDB$_FLEN_STATE = 3 PARAMETER USRDB$_FLEN_COUNTRY = 20 PARAMETER USRDB$_FLEN_INSTITUTION = 80 PARAMETER USRDB$_FLEN_ZIP_CODE = 10 PARAMETER USRDB$_FLEN_AREA_CODE = 3 PARAMETER USRDB$_FLEN_NETWORK_ID = 2 PARAMETER USRDB$_FLEN_FRST_NAME = 20 PARAMETER USRDB$_FLEN_MIDDLE_INIT = 1 PARAMETER USRDB$_FLEN_NAME_TITLE = 10 PARAMETER USRDB$_FLEN_MAIL_STOP = 40 PARAMETER USRDB$_FLEN_STREET_ADR_1 = 80 PARAMETER USRDB$_FLEN_STREET_ADR_2 = 80 PARAMETER USRDB$_FLEN_PHONE_NMBR = 20 PARAMETER USRDB$_FLEN_SHORT_INSTITUTE = 10 PARAMETER USRDB$_FLEN_NODE_ID = 12 PARAMETER USRDB$_FLEN_REMOTE_USER = 20 PARAMETER USRDB$_FLEN_DOMAIN_ID = 20 PARAMETER USRDB$_FLEN_FAX_INFO = 25 PARAMETER USRDB$_FLEN_OTHER_NET = 2 PARAMETER USRDB$_FLEN_OTHER_NODE = 12 PARAMETER USRDB$_FLEN_OTHER_USER = 20 PARAMETER USRDB$_FLEN_OTHER_DOMAIN = 20 PARAMETER USRDB$_FLEN_ACCESS_CONTROL = 2 PARAMETER USRDB$_FLEN_COMMENTS = 40 PARAMETER USRDB$_FLEN_LIFE_USAGE = 1 PARAMETER USRDB$_FLEN_NOTIFY = 1 PARAMETER USRDB$_FLEN_AUTO_INFO = 4 PARAMETER USRDB$_FLEN_SEC_WORK = 12 PARAMETER USRDB$_FLEN_PRIM_ACTIVITY = 4 PARAMETER USRDB$_FLEN_SEC_ACTIVITY = 4 PARAMETER USRDB$_FLEN_PRIN_EMPLOYER = 4 PARAMETER USRDB$_FLEN_LOCATION = 20 PARAMETER USRDB$_FLEN_DEPARTMENT = 60 PARAMETER USRDB$_FLEN_TIME_ZONE = 10 C C ************************** C C ** DEFINE THE PARAMETERS FOR LOCATING THE BEGINNING OF A SPECIFIC USERDB FIELD. C PARAMETER USRDB$_FID_USER_IDENT = 0 PARAMETER USRDB$_FID_LAST_NAME = USRDB$_FID_USER_IDENT + USRDB$_FLEN_USER_IDENT PARAMETER USRDB$_FID_PRIM_WORK = USRDB$_FID_LAST_NAME + USRDB$_FLEN_LAST_NAME PARAMETER USRDB$_FID_CITY_NAME = USRDB$_FID_PRIM_WORK + USRDB$_FLEN_PRIM_WORK PARAMETER USRDB$_FID_STATE = USRDB$_FID_CITY_NAME + USRDB$_FLEN_CITY_NAME PARAMETER USRDB$_FID_COUNTRY = USRDB$_FID_STATE + USRDB$_FLEN_STATE PARAMETER USRDB$_FID_INSTITUTION = USRDB$_FID_COUNTRY + USRDB$_FLEN_COUNTRY PARAMETER USRDB$_FID_ZIP_CODE = USRDB$_FID_INSTITUTION + USRDB$_FLEN_INSTITUTION PARAMETER USRDB$_FID_AREA_CODE = USRDB$_FID_ZIP_CODE + USRDB$_FLEN_ZIP_CODE PARAMETER USRDB$_FID_NETWORK_ID = USRDB$_FID_AREA_CODE + USRDB$_FLEN_AREA_CODE PARAMETER USRDB$_FID_FRST_NAME = USRDB$_FID_NETWORK_ID + USRDB$_FLEN_NETWORK_ID PARAMETER USRDB$_FID_MIDDLE_INIT = USRDB$_FID_FRST_NAME + USRDB$_FLEN_FRST_NAME PARAMETER USRDB$_FID_NAME_TITLE = USRDB$_FID_MIDDLE_INIT + USRDB$_FLEN_MIDDLE_INIT PARAMETER USRDB$_FID_MAIL_STOP = USRDB$_FID_NAME_TITLE + USRDB$_FLEN_NAME_TITLE PARAMETER USRDB$_FID_STREET_ADR_1 = USRDB$_FID_MAIL_STOP + USRDB$_FLEN_MAIL_STOP PARAMETER USRDB$_FID_STREET_ADR_2 = USRDB$_FID_STREET_ADR_1 + USRDB$_FLEN_STREET_ADR_1 PARAMETER USRDB$_FID_PHONE_NMBR = USRDB$_FID_STREET_ADR_2 + USRDB$_FLEN_STREET_ADR_2 PARAMETER USRDB$_FID_SHORT_INSTITUTE = USRDB$_FID_PHONE_NMBR + USRDB$_FLEN_PHONE_NMBR PARAMETER USRDB$_FID_NODE_ID = USRDB$_FID_SHORT_INSTITUTE + USRDB$_FLEN_SHORT_INSTITUTE PARAMETER USRDB$_FID_REMOTE_USER = USRDB$_FID_NODE_ID + USRDB$_FLEN_NODE_ID PARAMETER USRDB$_FID_DOMAIN_ID = USRDB$_FID_REMOTE_USER + USRDB$_FLEN_REMOTE_USER PARAMETER USRDB$_FID_FAX_INFO = USRDB$_FID_DOMAIN_ID + USRDB$_FLEN_DOMAIN_ID PARAMETER USRDB$_FID_OTHER_NET = USRDB$_FID_FAX_INFO + USRDB$_FLEN_FAX_INFO PARAMETER USRDB$_FID_OTHER_NODE = USRDB$_FID_OTHER_NET + USRDB$_FLEN_OTHER_NET PARAMETER USRDB$_FID_OTHER_USER = USRDB$_FID_OTHER_NODE + USRDB$_FLEN_OTHER_NODE PARAMETER USRDB$_FID_OTHER_DOMAIN = USRDB$_FID_OTHER_USER + USRDB$_FLEN_OTHER_USER PARAMETER USRDB$_FID_ACCESS_CONTROL = USRDB$_FID_OTHER_DOMAIN + USRDB$_FLEN_OTHER_DOMAIN PARAMETER USRDB$_FID_COMMENTS = USRDB$_FID_ACCESS_CONTROL + USRDB$_FLEN_ACCESS_CONTROL PARAMETER USRDB$_FID_LIFE_USAGE = USRDB$_FID_COMMENTS + USRDB$_FLEN_COMMENTS PARAMETER USRDB$_FID_NOTIFY = USRDB$_FID_LIFE_USAGE + USRDB$_FLEN_LIFE_USAGE PARAMETER USRDB$_FID_AUTO_INFO = USRDB$_FID_NOTIFY + USRDB$_FLEN_NOTIFY PARAMETER USRDB$_FID_SEC_WORK = USRDB$_FID_AUTO_INFO + USRDB$_FLEN_AUTO_INFO PARAMETER USRDB$_FID_PRIM_ACTIVITY = USRDB$_FID_SEC_WORK + USRDB$_FLEN_SEC_WORK PARAMETER USRDB$_FID_SEC_ACTIVITY = USRDB$_FID_PRIM_ACTIVITY + USRDB$_FLEN_PRIM_ACTIVITY PARAMETER USRDB$_FID_PRIN_EMPLOYER = USRDB$_FID_SEC_ACTIVITY + USRDB$_FLEN_SEC_ACTIVITY PARAMETER USRDB$_FID_LOCATION = USRDB$_FID_PRIN_EMPLOYER + USRDB$_FLEN_PRIN_EMPLOYER PARAMETER USRDB$_FID_DEPARTMENT = USRDB$_FID_LOCATION + USRDB$_FLEN_LOCATION PARAMETER USRDB$_FID_TIME_ZONE = USRDB$_FID_DEPARTMENT + USRDB$_FLEN_DEPARTMENT PARAMETER USRDB$_FID_EXTRA_SPACE = USRDB$_FID_TIME_ZONE + USRDB$_FLEN_TIME_ZONE C C ************************** C