(* Release 3.10 *) (*-------------------------------------------------------------------------* * * * ISP.DEF - Modula-2 OS/2 API Isp... interface * * * * COPYRIGHT (C) 1989..1992 Clarion Software Corporation. * * Copyright (c) 1988 Microsoft Corporation * * All Rights Reserved * * * * This file is compatible with OS/2 version 1.2. * * * *--------------------------------------------------------------------------*) (*# call(o_a_size => off, o_a_copy=>off, result_optional=>on, reg_saved => (bx, cx, dx, si, di, es, ds, st1, st2), reg_param => (), seg_name => none, near_call => off, ds_eq_ss => off) *) (*# module(implementation=>off, init_code => off) *) (*# name(prefix => os2_lib) *) (*# data(near_ptr => off) *) DEFINITION MODULE Isp; FROM OS2DEF IMPORT BOOL; (* OS/2 Dialog Manager message constants and type definitions for user controls and user exits. *) (* Application-defined messages should be begin at DM_USER to avoid *) (* conflict with DM-defined messages. *) CONST DM_USER = 2000H; CM_MESSAGE_BASE = 2800H; (* DM messages common to User Controls and User Exits *) CM_FREE_CTL_RESOURCES = CM_MESSAGE_BASE+00H; CM_MEM_ALLOC = CM_MESSAGE_BASE+01H; CM_MEM_FREE = CM_MESSAGE_BASE+02H; CM_MEM_REALLOC = CM_MESSAGE_BASE+03H; CM_QUERY_CTL_HDL = CM_MESSAGE_BASE+04H; CM_QUERY_USER_INST_PTR = CM_MESSAGE_BASE+05H; CM_SET_USER_INST_PTR = CM_MESSAGE_BASE+06H; CM_UPDATE_CONTROL = CM_MESSAGE_BASE+07H; (* DM User Control Messages *) CM_INIT_USER_CONTROL = CM_MESSAGE_BASE+08H; CM_PANEL_ENTERED = CM_MESSAGE_BASE+09H; CM_END_DISPLAY = CM_MESSAGE_BASE+0AH; CM_GET_UC_PARM_AND_TEXT = CM_MESSAGE_BASE+0BH; CM_NO_FOCUS_USER_CONTROL = CM_MESSAGE_BASE+0CH; CM_YES_FOCUS_USER_CONTROL = CM_MESSAGE_BASE+0DH; CM_SET_MIN_MAX_SIZE = CM_MESSAGE_BASE+0EH; (* DM User Action Exit Messages *) CM_DO_ACTION = CM_MESSAGE_BASE+0FH; CM_INIT_USER_ACTION = CM_MESSAGE_BASE+010H; (* DM User Check Exit Messages *) CM_DO_CHECK = CM_MESSAGE_BASE+011H; CM_INIT_USER_CHECK = CM_MESSAGE_BASE+012H; (* DM User Command Action Exit Messages *) CM_DO_CMD_ACTION = CM_MESSAGE_BASE+013H; CM_INIT_USER_CMD_ACTION = CM_MESSAGE_BASE+014H; (* DM User Translate Exit Messages *) CM_DO_XLATE = CM_MESSAGE_BASE+015H; CM_INIT_USER_XLATE = CM_MESSAGE_BASE+016H; (* DM User Variable Exit Messages *) CM_INIT_USER_VARIABLE = CM_MESSAGE_BASE+017H; CM_QUERY_VARIABLE_VALUE = CM_MESSAGE_BASE+018H; CM_SET_VARIABLE_VALUE = CM_MESSAGE_BASE+019H; CCTL_INPUT = 1; CCTL_OUTPUT = 2; (* These constants are provided to make is easy for the writer of a *) (* user control or user exit to register their class. *) (* *) (* The style constants provided as class styles for the application's *) (* user control/exit window class. They should "or" in any of their *) (* own class styles. Currently these are null because DM doesn't *) (* require user controls/exits to have a particular window style, but *) (* these can be changed in the future if that requirement arises. *) (* *) (* The extra bytes constants should be used so that user controls/ *) (* exits have extra window words for the pointer to their instance *) (* data. Any extra bytes the application wants to use must be after *) (* the first 4 in the extra window words, as these are reserved by *) (* DM. Remember the UserInstancePtr in the user control/exit *) (* instance data can be used to point to application specific data. *) CCTL_UC_CLASS_STYLE = 00H; (* User control *) CCTL_UA_CLASS_STYLE = 00H; (* Action *) CCTL_UK_CLASS_STYLE = 00H; (* Check *) CCTL_UM_CLASS_STYLE = 00H; (* Command action *) CCTL_UX_CLASS_STYLE = 00H; (* Translate *) CCTL_UV_CLASS_STYLE = 00H; (* Variable access*) CCTL_UC_EXTRA_BYTES = 4; (* User control *) CCTL_UA_EXTRA_BYTES = 4; (* Action *) CCTL_UK_EXTRA_BYTES = 4; (* Check *) CCTL_UM_EXTRA_BYTES = 4; (* Command action *) CCTL_UX_EXTRA_BYTES = 4; (* Translate *) CCTL_UV_EXTRA_BYTES = 4; (* Variable access*) TYPE DefaultMessageParm = RECORD RetCode : LONGCARD; MsgParmSize: CARDINAL; END; FreeCtlResourcesParm = DefaultMessageParm; InitUserControlParm = DefaultMessageParm; InitUserVariableParm = DefaultMessageParm; NoFocusUserControlParm = DefaultMessageParm; YesFocusUserControlParm = DefaultMessageParm; PanelEnteredParm = DefaultMessageParm; QueryUserInstPtrParm = DefaultMessageParm; MemAllocParm = RECORD RetCode : LONGCARD; MsgParmSize: CARDINAL; ByteCount : CARDINAL; END; MemFreeParm = RECORD RetCode : LONGCARD; MsgParmSize: CARDINAL; MemPtr : FarADDRESS; END; MemReallocParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; NewByteCount: CARDINAL; SrcPtr : FarADDRESS; END; QueryCtlHdlParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; Name : FarADDRESS; END; SetUserInstPtrParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; UserInstPtr : FarADDRESS; END; UpdateControlParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; SetInitialState : BOOL; END; EndDisplayParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; DispReasonCode : LONGCARD; MsgOnInvalidField: BOOL; END; SetMinMaxSizeParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; MinWidth, MaxWidth, MinDepth, MaxDepth : CARDINAL; END; DoActionParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; ActionParmPtr: FarADDRESS; END; InitUserActionParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; ActionParmPtr: FarADDRESS; END; DoCheckParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; CheckValuePtr, CheckParm1Ptr, CheckParm2Ptr: FarADDRESS; END; InitUserCheckParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; CheckParm1Ptr, CheckParm2Ptr: FarADDRESS; END; DoCmdActionParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; CmdParmPtr, CmdActionParmPtr: FarADDRESS; END; InitUserCmdActionParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; CmdActionParmPtr: FarADDRESS; END; DoXlateParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; Direction : CARDINAL; XlBufLen : CARDINAL; XlBufPtr : FarADDRESS; XlParmPtr : FarADDRESS; Continue : BOOL; END; InitUserXlateParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; XlBufLen : CARDINAL; XlParmPtr : FarADDRESS; END; QueryVariableValueParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; VnamePtr : FarADDRESS; RetBufPtr : FarADDRESS; RetBufLen : CARDINAL; Subscript : CARDINAL; END; SetVariableValueParm = RECORD RetCode : LONGCARD; MsgParmSize : CARDINAL; VnamePtr : FarADDRESS; BufPtr : FarADDRESS; Subscript : CARDINAL; END; (* OS/2 Dialog Manager type definitions for the communication block and declarations for the functions used to call Dialog Manager Services *) (*# call(c_conv=>on, reg_param=>(), near_call=>off, reg_saved=>(di,si,ds,st1,st2)) *) CONST DMCOMMBLOCK_ERROR_INFO_COUNT = 6; TYPE DMERRORINFO = RECORD ReasonCode: LONGCARD; (* Dialog Manager Return Code *) OS2RetCode: LONGCARD; (* DOS Return Code *) END; DMCOMMBLOCK = RECORD ReturnCode: LONGCARD; (* Dialog Manager Return Code *) ReasonCode: LONGCARD; (* Dialog Manager Reason Code *) InstanceID: ARRAY[0..7] OF CHAR; (* Instance Identifier *) OS2RetCode: LONGCARD; (* DOS Return Code *) ErrorInfo : ARRAY [0..DMCOMMBLOCK_ERROR_INFO_COUNT-1] OF DMERRORINFO; (* Error Information Array *) Filler : ARRAY [0..59] OF CHAR; (* Used by DM -- don't modify *) END; PROCEDURE ISPCI (VAR c:DMCOMMBLOCK; p1:LONGINT; p2: FarADDRESS): INTEGER; PROCEDURE ISPCI2(VAR c:DMCOMMBLOCK; p1:LONGINT; p2,p3,p4: FarADDRESS): INTEGER; (* OS/2 Dialog Manager error constants for user applications. *) (* Dialog Manager Error Constants *) CONST DMERR_BASE_ERROR_CLASS = 100000; DMERR_INFORMATIONAL = 0; DMERR_LOW_WARNING = 400000; DMERR_HIGH_WARNING = 800000; DMERR_PROGRAMMER_ERROR = 1200000; DMERR_RESOURCE_FAILURE = 1600000; DMERR_SEVERE_ERROR = 2000000; (* ISPCI/ISPCI2 Error Constants *) DMERR_INVALID_HWND = 1200100; DMERR_UPPERCASE = 1200101; DMERR_UPPERCASE_BUFFER = 1200102; DMERR_UPPERCASE_VERB = 1200103; DMERR_UNEXPECTED_PAREN = 1200104; DMERR_BUF_TOO_LONG = 1200105; DMERR_INVALID_SERVICE_PARM = 1200106; DMERR_TOO_MANY_PARMS = 1200107; DMERR_SUBFIELD = 1200108; DMERR_INVALID_KEYWORD = 1200109; DMERR_SUBFIELD_MISSING = 1200110; DMERR_PARM_MISSING = 1200111; DMERR_POSITIONAL_MISSING = 1200112; DMERR_INVALID_PARM_LENGTH = 1200113; DMERR_LIST_FOUND = 1200114; DMERR_NAME_LIST = 1200115; DMERR_KEYWORD_CONFLICT = 1200116; DMERR_CMD_SERVICE = 1200117; DMERR_STRING_END = 1200118; DMERR_END_BUFFER_FOUND = 1200119; DMERR_SUBSCRIPT_INVALID = 1200120; DMERR_ISPCI2_CALL = 1200121; DMERR_GET_SUBSTITUTE_VAR = 1200122; DMERR_MORE_PARMS = 1200123; DMERR_ISPCI_CALL = 1200124; DMERR_BUFFER_EXCEEDS_MAX = 1200125; DMERR_SERVICE_NOT_FOUND = 1200126; DMERR_SERVICE_NAME_LENGTH = 1200127; DMERR_BUFFER_EMPTY = 1200128; DMERR_UNEXPECTED_LIST_FOUND = 1200129; DMERR_PARM_TOO_LONG = 1200130; DMERR_POSITIONAL_NOT_FOUND = 1200131; DMERR_NO_POSITIONAL_FOUND = 1200132; DMERR_NULL_PARM = 1200133; DMERR_END_BUFF_BEFORE_END_LIST = 1200134; DMERR_KEYWORD_NOT_IN_TABLE = 1200135; DMERR_INVALID_KEYWORD_LENGTH = 1200136; DMERR_INVALID_SUB_KEYWORD = 1200137; DMERR_SUBFIELD_NOT_NUMERIC = 1200138; DMERR_REQUIRED_SUBFIELD_MISSING = 1200139; DMERR_CONVERTING_NUMERIC_PARM = 1200140; DMERR_NUMERIC_PARM_RANGE = 1200141; DMERR_KEYWORD_TABLE_NOT_FOUND = 1600100; (* Dialog Manager Controls Error Constants *) DMERR_LOAD_APPL_CMD_TABLE = 505; CMERR_DEFAULT_KEY_TABLE_ENTRY = 400500; CMERR_MATCHING_COMMAND_INDEX = 400501; CMERR_NO_COMMAND_FOR_KEY = 400502; DMERR_COMMAND_STACK_EMPTY = 400503; CMERR_PS_INVALID_VALUE = 400504; CMERR_DUPLICATE_LF_MOD_ROWS = 400505; CMERR_OUT_OF_BOUNDS_POS = 800500; CMERR_QUERY_ZPANELID = 800501; CMERR_QUERY_ZFKA = 800502; CMERR_UA_DO_ACTION = 800505; CMERR_UM_DO_CMD_ACTION = 800506; CMERR_UX_DO_XLATE = 800507; CMERR_UK_DO_CHECK = 800508; CMERR_EXECUTING_SCROLL = 800509; CMERR_LMARGIN_EXCEEDS_RMARGIN = 800510; CMERR_FONT_NOT_AVAILABLE = 800511; CMERR_OVERFLOW_LF_MOD_ROWS = 800523; CMERR_USER_DATA_FAILED_XLAT = 800524; CMERR_VAR_DATA_TOO_BIG = 800525; CMERR_SETTING_POOL_VARIABLE_8 = 800526; CMERR_GETTING_POOL_VARIABLE_8 = 800527; CMERR_INVALID_CMDACT_TYPE = 1200502; CMERR_DOING_EXT_CMDACT = 1200505; CMERR_DOING_INT_CMDACT = 1200508; CMERR_INIT_USER_ACTION = 1200520; CMERR_INIT_USER_CHECK = 1200521; CMERR_INIT_USER_CONTROL = 1200522; CMERR_INIT_USER_CMD_ACTION = 1200523; CMERR_INIT_USER_XLATE = 1200524; CMERR_USER_ACTION_NOT_REG = 1200525; CMERR_USER_CHECK_NOT_REG = 1200526; CMERR_USER_CONTROL_NOT_REG = 1200527; CMERR_USER_CMD_ACTION_NOT_REG = 1200528; CMERR_USER_VAR_ACCESS_NOT_REG = 1200529; CMERR_USER_XLATE_NOT_REG = 1200530; CMERR_FOCUS_DEST_WND_UNDEFINED = 1200532; CMERR_FLD_CANNOT_TAKE_FOCUS = 1200533; CMERR_ACCEPTING_FOCUS = 1200535; CMERR_LF_NUM_OF_ROWS_OUT_RANGE = 1200537; CMERR_TOP_ROW_OUT_OF_RANGE = 1200539; CMERR_LC_OUTPUT_ONLY_FIELD = 1200540; CMERR_LF_MOD_ROW_INVALID = 1200542; CMERR_SL_NUMROWS_OUT_OF_RANGE = 1200543; CMERR_SL_SELECTED_ROWS_RANGE = 1200544; CMERR_SL_TOP_ROW_OUT_OF_RANGE = 1200545; CMERR_LOAD_INFO_FONTS = 1200546; CMERR_TEXT_LONGER_THAN_WND_MAX = 1200547; CMERR_GET_COMMAND_AREA_TEXT = 1200549; CMERR_SETTING_POOL_VARIABLE_12 = 1200550; CMERR_INIT_USER_VARIABLE = 1200553; CMERR_GETTING_POOL_VARIABLE_12 = 1200554; CMERR_PS_NO_MATCH_ON_OUTPUT = 1200555; CMERR_VAR_LENGTH_EXCEEDS_BUFFER = 1200556; CMERR_INVALID_MSG_PARM_SIZE = 1200557; CMERR_ALLOC_AB_TEXT = 1600500; CMERR_GETTING_MEM_CMDACT_STRING = 1600501; CMERR_SYSTEM_CMD_TABLE_WNDHDL = 1600502; CMERR_SCROLLING_BACKWARD = 1600504; CMERR_SCROLLING_FORWARD = 1600505; CMERR_SCROLLING_LEFT = 1600506; CMERR_SCROLLING_RIGHT = 1600507; CMERR_SET_LF_EDIT_CTL_NAME = 1600508; CMERR_SHOW_PANEL = 1600509; CMERR_POPPING_CMD_STACK = 1600510; CMERR_SETTING_POP_CMDSTR = 1600511; CMERR_SETTING_ZVERB = 1600512; CMERR_SETTING_ZCMD = 1600513; CMERR_CANCELING_PANEL = 1600514; CMERR_SETTING_REMAIN_CMDS = 1600515; CMERR_EXECUTE_ENTER = 1600516; CMERR_ENTERING_PANEL = 1600517; CMERR_EXITING_PANEL = 1600518; CMERR_SETTING_ZPANELID = 1600519; CMERR_SETTING_ZFKA = 1600520; CMERR_CHANGING_FKA_FORM = 1600521; CMERR_SHOW_PANELID = 1600522; CMERR_PASSTHRU = 1600523; CMERR_SETVERB = 1600524; CMERR_PUSH_CMD_STRING = 1600525; CMERR_SETTING_CMD_TEXT = 1600526; CMERR_REFRESHING_AVAILVAR = 1600527; CMERR_REFRESHING_SKIPVAR = 1600528; CMERR_KEYTBL_ENTRY_UNKNOWN = 1600531; CMERR_REFRESHING_CMDACT_STRING = 1600532; CMERR_PASSING_EXTERNAL_CMD = 1600533; CMERR_PASSING_INTERNAL_CMD = 1600534; CMERR_PASSING_KEY_TABLE_ENTRY = 1600535; CMERR_EXECUTING_ALIAS = 1600536; CMERR_EXTERNAL_CMD = 1600537; CMERR_CHILD_NOT_KNOWN = 1600538; CMERR_GETTING_MEM_ACTION_PARM1 = 1600539; CMERR_GETTING_MEM_ACTION_PARM2 = 1600540; CMERR_GETTING_MEM_VARIABLE_STR = 1600541; DMERR_ALLOC_COMMAND_POOL = 1600542; DMERR_GET_GBL_INSTANCE_MEM = 1600543; DMERR_GET_INSTANCE_MEM = 1600544; DMERR_GET_APPL_DATA_ENTRY_MEM = 1600545; DMERR_REMAIN_CMD_STRING_MEM = 1600546; DMERR_GET_CMD_STACK_NODE_MEM = 1600547; DMERR_GET_CMD_STACK_MEM = 1600548; CMERR_PASSING_EXT_CMD_STRING = 1600549; CMERR_SETTING_SET_VAR = 1600550; CMERR_NOTIFY_SETVAR_CHG = 1600551; CMERR_SETTING_TOGGLE_VAR = 1600552; CMERR_NOTIFY_TOGVAR_CHG = 1600553; CMERR_QUERY_CMD_TABLE_WNDHDL = 1600554; CMERR_LOADING_KEY_LIST = 1600555; CMERR_GETTING_KEY_LIST = 1600556; CMERR_CREATING_KEY_LIST = 1600557; CMERR_QUERY_DMKEY_TABLE_INFO = 1600558; CMERR_SETTING_ACTION_PARM1 = 1600560; CMERR_SETTING_ACTION_PARM2 = 1600561; CMERR_SETTING_VARIABLE = 1600562; DMERR_EXECUTE_TUTORIAL = 1600563; DMERR_LOAD_DEF_CMD_TABLE = 1600564; DMERR_CREATE_DEF_CMD_TABLE = 1600565; DMERR_LOAD_CMD_TABLE = 1600566; DMERR_CREATE_APPL_CMD_TABLE = 1600567; CMERR_RUN_CMD = 1600568; CMERR_DOING_PANEL_ACTION = 1600570; CMERR_EXECUTING_KEY_ACTION = 1600571; CMERR_LC_XLATE_VALUE = 1600572; CMERR_UPDATE_LC_DATA = 1600573; CMERR_QUERY_LC_ARRAY_VALUE = 1600574; CMERR_LF_VARIABLE_CHANGED = 1600575; CMERR_ALLOC_LC_DATA = 1600576; CMERR_ALLOC_MODIFIED_ROWS_FLAGS = 1600577; CMERR_CELL_EDIT_TEXT_LIMIT = 1600578; CMERR_REPOSITION_LF = 1600579; CMERR_QUERY_LF_MOD_ROWS = 1600580; CMERR_UPDATE_LF_MOD_ROWS = 1600581; CMERR_ALLOC_TRANSLATE_BUFFER = 1600582; CMERR_AB_ATTRIB_FAILED = 1600583; CMERR_SETTING_PANEL_VARIABLE = 1600585; CMERR_GETTING_PANEL_VARIABLE = 1600587; CMERR_GETTING_MEM_VAR_BUFFER = 1600588; CMERR_GETTING_CHANGED_VAR = 1600589; CMERR_SETTING_CHANGED_VAR = 1600590; CMERR_SET_INST_MIN_MAX_SIZE = 1600591; CMERR_GETTING_USER_CMDACT_PARM = 1600592; CMERR_USER_ACTION_PARM_ALLOC = 1600593; CMERR_USER_CMD_ACT_PARM_ALLOC = 1600594; CMERR_USER_CONTROL_PARM_ALLOC = 1600595; CMERR_PS_DISPLAY_DM_MESSAGE = 1600596; CMERR_PS_UPDATE_PANEL = 1600597; CMERR_COMMAND_TEXT = 1600598; CMERR_NO_KEY_TABLE = 1600599; CMERR_NO_FKA_CREATED = 1600600; CMERR_DIV_SET_MIN_MAX_SIZE = 1600601; CMERR_DIV_GPI_SET_ATTRS = 1600602; CMERR_DIV_GPI_SET_CUR_POS = 1600603; CMERR_DIV_GPI_LINE = 1600604; CMERR_BUTTON_ACCEPTING_FOCUS = 1600605; CMERR_AR_QRY_REGION_MIN_CX = 1600606; CMERR_NO_MEMORY = 1600607; CMERR_PAINT_INFO_TEXT = 1600608; CMERR_FONT_METRICS_QRY_PROBLEM = 1600609; CMERR_INFO_CHAR_ATTRS_PROBLEM = 1600610; CMERR_ALLOC_TEXT_ATTR_POS_LIST = 1600611; CMERR_ALLOC_TEXT_ATTR_POS_ARRAY = 1600612; CMERR_ALLOC_INFO_FORMAT_TABLE = 1600613; CMERR_ALLOC_INFO_ATTR_ARRAY = 1600614; CMERR_INVALID_TEXT_ATTRIBUTE = 1600615; CMERR_ALLOC_FONT_METRICS_BUF = 1600616; CMERR_ALLOC_MARGIN_ARRAY = 1600618; CMERR_MAX_FONTS_LOADED = 1600619; CMERR_INVALID_SYS_CMDACT = 1600620; CMERR_CMD_ACTION_UNSPECIFIED = 1600621; CMERR_DOING_USER_CMDACT = 1600622; CMERR_INVALID_ACTION_TYPE = 1600623; CMERR_SET_VAR_UNSPECIFIED = 1600624; CMERR_TOGGLE_VAR_UNSPECIFIED = 1600625; CMERR_MEM_SIZE_LIST = 1600626; CMERR_PROCESSING_BACKTAB = 1600628; CMERR_PROCESSING_TAB = 1600629; CMERR_PROCESSING_VK_TAB = 1600630; CMERR_RUN_CMD_UNSPECIFIED = 1600631; CMERR_NOTIFY_VAR_CHANGE = 1600632; CMERR_ACTION_BAR_UNDEFINED = 1600633; CMERR_LC_ROW_OUT_OF_RANGE = 1600634; CMERR_DF_DISPLAY_DM_MESSAGE = 1600635; CMERR_ALLOC_MEMORY = 1600636; CMERR_SET_TEXT_LIMIT = 1600637; CMERR_EF_ACCEPTING_FOCUS = 1600638; CMERR_UPDATE_SL_SELECTED_ROWS = 1600639; CMERR_QUERY_SC_ARRAY_VALUE = 1600640; CMERR_ALLOC_SL_XLATE_BUFFER = 1600641; CMERR_SC_XLATE_VALUE = 1600642; CMERR_INSERT_SL_ITEM = 1600643; CMERR_QUERY_SL_SELECTED_ROWS = 1600644; CMERR_ALLOC_FONT_DESCRIPTORS = 1600645; CMERR_MODIFIED_ROWS_INDEX_RANGE = 1600646; CMERR_ALLOC_SF_WORK_BUFFER = 1600676; CMERR_ALLOC_SF_CHECK_TEXT = 1600677; CMERR_SET_SF_BUTTON_TEXT = 1600678; CMERR_SF_CHANGE_CHECK_VALUE = 1600679; CMERR_GET_COUNTRY_INFO = 1600681; CMERR_CREATE_KEY_ACCELTABLE = 1600682; CMERR_SET_KEY_ACCELTABLE = 1600683; CMERR_KEY_LIST_UNSPECIFIED = 1600684; CMERR_DF_OUTPUT_REPOSITION = 1600687; CMERR_LOADING_CHGDEFS_PANEL = 1600688; CMERR_ADDING_CHGDEFS_POPUP = 1600689; CMERR_DISPLAYING_CHGDEFS = 1600690; CMERR_REMOVING_CHGDEFS_POPUP = 1600691; CMERR_DEFINING_CHGDEFS_VARS = 1600692; CMERR_GETTING_CHGDEFS_VARS = 1600693; CMERR_PUTTING_CHGDEFS_VARS = 1600694; CMERR_DELETING_CHGDEFS_VARS = 1600695; CMERR_DEFACT_IN_PROGRESS = 1600696; CMERR_QUERY_DEFAULT_ACTION = 1600697; CMERR_SET_TITLEBAR_TEXT = 1600698; CMERR_CT_DISPLAY_DM_MESSAGE = 1600699; CMERR_PS_MEM_ALLOC = 1600700; DMERR_CMD_TABLE_UNAVAILABLE = 1600701; CMERR_DOING_USER_ACTION = 1600702; DMERR_CLASS_REGISTRATION_FAILED = 2000506; CMERR_SETTING_POOL_VARIABLE_20 = 2000515; CMERR_GETTING_POOL_VARIABLE_20 = 2000516; (* Display Services Error Constants *) DMERR_PANEL_ENTERED = 1700; DMERR_PASSTHRU = 1701; DMERR_SETVERB = 1702; DMERR_PANEL_CANCELED = 401700; DMERR_PANEL_EXITED = 801700; DMERR_QUERY_ZHELP_WND_TITLE = 801701; DMERR_QUERY_ZPRIMARY_WND_TITLE = 801702; DMERR_SET_FKA_FORM = 801703; DMERR_SET_PANEL_ID_VISIBILITY = 801704; DMERR_FORCEXIT_INVOKED = 801705; DMERR_FORCEXIT_INVALID_WNDHDL = 1201700; DMERR_FORCEXIT_INVALID_SET = 1201701; DMERR_FORCEXIT_INVALID_DMCOMM = 1201702; DMERR_NO_PRIOR_DISPLAY = 1201703; DMERR_INVALID_ADDPOP = 1201704; DMERR_NO_POPUPS_EXIST = 1201705; DMERR_ADDPOP_BEFORE_PRIMARY_WND = 1201708; DMERR_ADDPOP_UNKNOWN_FIELD_NAME = 1201709; DMERR_ADDPOP_NO_PREV_DISPLAY = 1201710; DMERR_MSGLOC_UNKNOWN_FIELD_NAME = 1201711; DMERR_FORCEXIT_DISPLAY_FAILED = 1601700; DMERR_CREATE_PRIMARY_WND_ICON = 1601701; DMERR_GET_PRIMARY_WND_ICON = 1601702; DMERR_GET_PANEL_TEMPLATE = 1601703; DMERR_CREATE_PANEL = 1601704; DMERR_PANEL_ENTER_PROCESSING = 1601705; DMERR_CREATE_FRAME = 1601706; DMERR_UPDATE_PANEL = 1601707; DMERR_SET_PANEL_HELP_INFO = 1601708; DMERR_ALLOC_PANEL_MGR_INST_DATA = 1601709; DMERR_CREATE_FRAME_CONTROL = 1601710; DMERR_ALLOC_PANEL_MGR_POOL = 1601711; DMERR_ALLOC_PANEL_INST_DATA = 1601712; DMERR_GPI_QUERY_TEXT_WIDTH = 1601713; (* Help Interface Error Constants *) DMERR_EXT_HELP_PANEL_UNDEFINED = 1202100; DMERR_KEYS_HELP_UNDEFINED = 1202101; DMERR_UNABLE_TO_LOAD_FONTS = 1202138; DMERR_DMOPEN_LOAD_FONTS = 1202139; DMERR_SET_LIBDEF_HELP_LIBRARIES = 1602101; DMERR_SET_HELP_SHOW_PAN_IDS = 1602102; DMERR_DISPLAY_EXT_HELP_PANEL = 1602103; DMERR_DISPLAY_KEYS_HELP_PANEL = 1602104; DMERR_QUERY_ZKEYHELP_PROBLEM = 1602105; DMERR_EXECUTING_HELP_TUTORIAL = 1602106; DMERR_ALLOC_HIC_LOCAL_INST_DATA = 1602111; DMERR_ALLOC_HIC_GBL_INST_DATA = 1602112; DMERR_ALLOC_HIC_HELPTABLE = 1602113; DMERR_ALLOC_HIC_HELPSUBTABLE = 1602114; DMERR_CREATE_HELP_INSTANCE = 1602116; DMERR_ALLOC_EXT_HLP_NAME_BUFFER = 1602120; DMERR_ASSOC_PAN_WITH_HELP_INST = 1602121; DMERR_SET_HELP_ACTIVE_WINDOW = 1602122; DMERR_SET_HELP_LIB_NAMES = 1602123; DMERR_SET_HELP_WND_TITLE = 1602125; DMERR_DISPLAY_HELP_PANEL = 1602127; DMERR_QRY_ACTION_BAR_HELP = 1602128; DMERR_QRY_HELP_PANEL_NAME = 1602129; DMERR_PROCESS_HELP_DISPLAY = 1602130; DMERR_PROCESS_KEYS_HELP_ON_FKA = 1602131; DMERR_PROCESS_DEFAULT_EXT_HELP = 1602132; DMERR_ALLOC_NEW_HELP_LIB_NAMES = 1602135; DMERR_DISPLAY_HIC_ERROR_MESSAGE = 1602136; DMERR_QUERY_HELP_LIBRARIES = 1602137; DMERR_DISPLAY_HELP_FOR_HELP = 1602140; (* DMOPEN/DMCLOSE Error Constants *) DMERR_STARTING_TRACE = 1202903; DMERR_INVALID_UNIQUE_PARM = 1202901; DMERR_INVALID_DMCOMM_CLOSE = 1202902; DMERR_SEMAPHORE_COMPID = 1602900; DMERR_DMI_CLOSE_FAILED = 1602901; DMERR_CREATE_SPACE_START = 2002900; DMERR_CREATE_POOL_START = 2002901; DMERR_GET_HEADER_START = 2002902; DMERR_FAILED_STARTUP_DIMVALID = 2002903; DMERR_SHARE_SEGS_DIMVALID = 2002904; DMERR_GET_IID_DIMADD = 2002906; DMERR_INVALID_DMCOMM_DIMADD = 2002907; DMERR_INVALID_DMCOMM_DIMDEL = 2002908; DMERR_GET_PROC_DIMSH = 2002909; DMERR_GIVE_SEG_DIMSH = 2002910; DMERR_INVALID_DMCOMM = 2002911; DMERR_APPLID_UPPER_CASE = 2002912; DMERR_PM_INITIALIZE = 2002913; DMERR_CREATE_MSG_QUEUE = 2002914; DMERR_GET_SPACE_DATA_OPEN = 2002915; DMERR_DIM_ADD_FAILED = 2002916; DMERR_EXLST_ADD_OPEN = 2002917; DMERR_GET_SPACE_HAB_OPEN = 2002918; DMERR_GET_SPACE_IID_OPEN = 2002919; DMERR_DMI_OPEN_FAILED = 2002920; DMERR_NLS_ERROR_OPEN = 2002921; DMERR_PARM_MISSING_OPEN = 2002922; DMERR_INVALID_APPLID = 2002923; DMERR_INVALID_THREAD_ID = 2002924; DMERR_INVALID_INSTID = 2002925; DMERR_CANNOT_CREATE_INSTID = 2002926; DMERR_CANNOT_CREATE_OBJ_WND = 2002927; DMERR_EXLST_REMOVE_FAILED = 2002928; DMERR_DIM_DEL_FAILED = 2002929; DMERR_DM_CLASS_REGISTRATION = 2002930; (* Library Services Error Constants *) DMERR_APP_LIBDEF_FILE_NOT_FOUND = 3300; DMERR_LIBDEF_COMMAND_TOO_LONG = 1203300; DMERR_LIBRARY_EXISTS = 1203301; DMERR_HELP_EXISTS = 1203302; DMERR_KEYLIST_MEMBER_NOT_FOUND = 1203303; DMERR_ICON_MEMBER_NOT_FOUND = 1203304; DMERR_MESSAGE_MEMBER_NOT_FOUND = 1203305; DMERR_DM_PNL_MEMBER_NOT_FOUND = 1203306; DMERR_COMMAND_MEMBER_NOT_FOUND = 1203307; DMERR_INVALID_LIBDEF_IN_APP = 1203308; DMERR_UNMATCHED_QUOTATION_MARK = 1203309; DMERR_INVALID_LIBLIST = 1203310; DMERR_OPEN_APP_FILE = 1603300; DMERR_READ_APP_FILE = 1603301; DMERR_OPEN_KEYLIST_LIBRARY = 1603302; DMERR_OPEN_ICON_LIBRARY = 1603303; DMERR_OPEN_MESSAGE_LIBRARY = 1603304; DMERR_OPEN_DM_PNL_LIBRARY = 1603305; DMERR_OPEN_COMMAND_LIBRARY = 1603306; DMERR_GET_KEYLIST_LIBRARY_DIR = 1603307; DMERR_GET_ICON_LIBRARY_DIR = 1603308; DMERR_GET_MESSAGE_LIBRARY_DIR = 1603309; DMERR_GET_DM_PNL_LIBRARY_DIR = 1603310; DMERR_GET_COMMAND_LIBRARY_DIR = 1603311; DMERR_GET_KEYLIST_MEMBER = 1603312; DMERR_GET_ICON_MEMBER = 1603313; DMERR_GET_MESSAGE_MEMBER = 1603314; DMERR_GET_DM_PNL_MEMBER = 1603315; DMERR_GET_COMMAND_MEMBER = 1603316; DMERR_LIBRARY_CHANGED = 1603317; DMERR_ALLOC_LIBRARY_DMOPEN = 1603318; DMERR_ALLOC_FILE_READ_BUFFER = 1603319; DMERR_ALLOC_NEW_LIBLIST = 1603320; (* Message Services Error Constants *) DMERR_QUERY_MESSAGE_ID_VISIBLE = 403700; CMERR_MESSAGE_TRUNCATED = 803700; CMERR_MESSAGE_NOT_FOUND = 1203700; DMERR_DISPLAY_MESSAGE_PANEL = 1603700; DMERR_ADD_MESSAGE_POPUP = 1603701; DMERR_CREATE_MESSAGE_PANEL = 1603702; DMERR_ALLOC_MESSAGE_ID = 1603703; DMERR_LOAD_MESSAGE_PANEL_RSC = 1603704; DMERR_CREATE_TEXT_CONTROL = 1603705; DMERR_SHOW_CURRENT_PANEL = 1603706; DMERR_REMOVE_MESSAGE_PANEL = 1603707; DMERR_SET_MESSAGE_TEXT = 1603708; DMERR_SET_ZVAR_RETURN_CODE = 1603709; DMERR_ALLOC_INSTANCE_DATA = 1603710; DMERR_ALLOC_SESSION_INST_DATA = 1603711; DMERR_ALLOC_CRTCL_MESSAGE_TEXT = 1603712; DMERR_LOAD_MESSAGE_RESOURCE = 1603713; DMERR_CREATE_MSG_CONTROL = 1603714; DMERR_GET_MESSAGE_RESOURCE = 1603715; DMERR_GET_MESSAGE = 1603716; DMERR_ALLOC_MSG_TEXT_REQUEST = 1603717; CMERR_REFRESH_VARIABLE = 1603718; CMERR_TRANSLATE_MSG_VARIABLE = 1603719; DMERR_CREATE_SEVERE_PANEL = 1603720; DMERR_LOAD_SEVERE_MSG_DLGBOX = 1603721; DMERR_CREATE_ACCEL_TABLE = 1603722; DMERR_SET_ACCEL_TABLE = 1603723; CMERR_ALLOC_MSG_SUB_BUFFER = 1603724; CMERR_ALLOC_VAR_XLAT_BUFFER = 1603725; DMERR_UPDATE_MESSAGE_PANEL = 1603726; DMERR_SET_MSGBOX_TITLE = 1603727; DMERR_SET_BUTTON_TEXT = 1603728; (* Storage Manager Error Constants *) DMERR_STORAGE = 1604100; DMERR_ALLOCATING_SEGMENT = 1604101; DMERR_ALLOC_INTERNAL_CAT = 1604102; DMERR_ALLOC_STORAGE_REQUEST = 1604103; DMERR_ALL_SEGMENTS_NOT_FREED = 1604104; DMERR_COMBINED_BLOCKS_LST = 1604105; DMERR_DELETING_POOL = 1604106; DMERR_DELETING_SAT_STORAGE = 1604107; DMERR_EXPANDING_POOL = 1604108; DMERR_FREEING_CHAIN_LINK = 1604109; DMERR_FREEING_POOLS_BLOCK = 1604110; DMERR_FREEING_POOLS_LST = 1604111; DMERR_FREEING_SEGMENT = 1604112; DMERR_GETTING_LST_STORAGE = 1604113; DMERR_GETTING_STORAGE_BLOCK = 1604114; DMERR_INITIALIZING_SEGMENT = 1604115; DMERR_INVALID_STORAGE_LENGTH = 1604116; DMERR_OVERLAPPING_STORAGE = 1604117; DMERR_REQUEST_TOO_LARGE = 1604118; DMERR_SEGLINK_NOT_ALLOCATED = 1604119; DMERR_SEGMENT_NOT_IN_CHAIN = 1604120; DMERR_SHARING_ANCHOR_SEGMENT = 1604121; DMERR_SHARING_STORAGE_SEGMENT = 1604122; DMERR_STORAGE_NOT_IN_POOL = 1604123; DMERR_SUBFREEING_STORAGE = 1604124; DMERR_ADDING_AVAILABLE_LIST = 2004100; DMERR_ALLOCATING_FIRST_BLOCK = 2004101; DMERR_ALLOCATING_FIRST_CAT = 2004102; DMERR_ALLOCATING_FIRST_LST = 2004103; DMERR_ALLOC_INIT_SPACE = 2004104; DMERR_CREATING_DEFAULT_POOL = 2004105; DMERR_CREATING_INTERNAL_POOL = 2004106; DMERR_CREATING_SEGLINK_POOL = 2004107; DMERR_EXISTING_BLOCKS_LST = 2004108; (* Variable Services Error Constants *) DMERR_VAR_NOT_FOUND = 805300; DMERR_VDELETE_VAR_NOT_FOUND = 805301; DMERR_VCOPY_VAR_NOT_FOUND = 805302; DMERR_NOT_A_NUMBER = 805303; DMERR_INDEFINITE = 805304; DMERR_NEG_INFINITY = 805305; DMERR_POS_INFINITY = 805306; DMERR_FLOAT_NUM_TOO_LARGE = 805307; DMERR_DATA_TRUNC = 805308; DMERR_BINSTR_DATA_TRUNC = 805309; DMERR_FIXED_NUM_TOO_LARGE = 805310; DMERR_FIXEDU_NUM_TOO_LARGE = 805311; DMERR_FIXEDS_NUM_TOO_LARGE = 805312; DMERR_HEX_NUM_TOO_LARGE = 805313; DMERR_PACK_NUM_TOO_LARGE = 805314; DMERR_BIT_NUM_TOO_LARGE = 805315; DMERR_UNDERFLOW = 805316; DMERR_OVERFLOW = 805317; DMERR_FIXED_CONVERSION = 805318; DMERR_FIXEDS_CONVERSION = 805319; DMERR_FIXEDU_CONVERSION = 805320; DMERR_HEX_CONVERSION = 805321; DMERR_PACK_CONVERSION = 805322; DMERR_BIT_CONVERSION = 805323; DMERR_FLOAT_CONVERSION = 805324; DMERR_UNSIGNED_FIX_FORMAT = 805325; DMERR_NOT_A_PACK_NUMBER = 805326; DMERR_VCOPY_DATA_TRUNC = 805327; DMERR_INVALID_VAR_NAME = 1205300; DMERR_INVALID_VDEFINE_VAR_NAME = 1205301; DMERR_INVALID_VDELETE_VAR_NAME = 1205302; DMERR_INVALID_VCOPY_VAR_NAME = 1205303; DMERR_INVALID_VREPLACE_VAR_NAME = 1205304; DMERR_INVALID_DIMEN = 1205305; DMERR_INVALID_VDEFINE_COPY = 1205306; DMERR_INVALID_PACK_DIGITS = 1205307; DMERR_INVALID_FLOAT_DIGITS = 1205308; DMERR_PACK_NUM_LENGTH_TOO_SMALL = 1205309; DMERR_INVALID_SUB = 1205310; DMERR_VAR_SUB_NOT_DEFINED = 1205311; DMERR_VAR_SUB_INCORRECT_FORMAT = 1205312; DMERR_INVALID_SUB_VALUE = 1205313; DMERR_SUB_VAR_NOT_ADDED = 1205314; DMERR_SUB_OUT_OF_RANGE = 1205315; DMERR_VAR_NOT_ARRAY = 1205316; DMERR_INVALID_VREPLACE_LENGTH = 1205317; DMERR_INVALID_VCOPY_LENGTH = 1205318; DMERR_INVALID_VDEFINE_LENGTH = 1205319; DMERR_INVALID_PLACE_HOLDER = 1205320; DMERR_NAME_FORMAT_LIST = 1205321; (* NLS Error Constants *) DMERR_SPLT_DBCS_DATA_TRUNC = 805700; DMERR_SPLT_DBCS_CHAR = 805701; DMERR_NLS_GETCTRYINFO = 1605701; DMERR_NLS_CASEMAP = 1605702; (* REXX Interface Error Constants *) DMERR_DMCOMM_INVALID_NAME = 1206200; DMERR_NO_PM_SESSION = 1606200; DMERR_REXX_VARPOOL_ACCESS = 1606201; END Isp.