55 #if defined( HAVE_NL_TYPES_H )
56 # include <nl_types.h>
59 #if defined( HAVE_MESG_H )
72 #define MAJOR(code) {code, code##_msg},
73 #define MINOR(code) {code, code##_msg},
85 #define SECOND_PARAMETER 1
87 #define SECOND_PARAMETER 0
91 #define CATD_ERR ((nl_catd)-1)
104 #if defined( HAVE_NL_TYPES_H )
111 const char * message;
114 #if defined( HAVE_CATOPEN )
115 for (p = Message_table; p->
code != 0; p++)
127 sprintf(DataArea,
"Cannot open REXX message catalog %s. Not in NLSPATH or %s.",
132 message = catgets(catd, set_num, msgid, NULL);
135 #if defined(OPSYS_LINUX) && !defined(OPSYS_SUN)
139 sprintf(DataArea,
"Cannot open REXX message catalog %s. Not in NLSPATH or %s.",
145 message = catgets(catd, set_num, msgid, NULL);
148 strcpy(DataArea,
"Error message not found!");
152 strcpy(DataArea, message);
156 strcpy(DataArea,
"Error message not found!");
161 strcpy(DataArea, message);
170 sprintf(DataArea,
"Cannot get description for error %d",msgid);
190 for (p = Message_table; p->
code != 0; p++)
196 sprintf(DataArea,
"REX%4.4dE: ", msgid);
RexxString * new_string(const char *s, stringsizeB_t bl, sizeC_t cl=-1)
static RexxString * getMessageText(wholenumber_t code)
static RexxString * getMessageHeader(wholenumber_t code)
struct msgEntry ERROR_MESSAGE