pos_oper.ec

在SCO UNIX制定界面程序 可根据文件配制菜单,而不必修改源程序,非常方便

#include <stdio.h>
#include <curses.h>

EXEC SQL INCLUDE sqlca;
EXEC SQL WHENEVER SQLERROR CALL error_handler;
EXEC SQL WHENEVER SQLWARNING CALL warning_handler;
EXEC SQL WHENEVER NOT FOUND CALL notfound_handler;

extern int misc_audit();
extern WINDOW *sql_win;

/*
 * 增加3个EDC操作员
 */
int insert_3_opers(char *str)
{
	$char terminal_id[9];
	char tmp[200];
	int ret;

	strcpy(terminal_id, str);

	EXEC SQL INSERT INTO edc_oper
	(terminal_id, oper_no, oper_pwd, oper_flag)
	VALUES (:terminal_id, '01', '0000', 'Y');
	ret = sqlca.sqlcode;

	if (ret == 0) {
		sprintf(tmp, "增加表 edc_oper : terminal_id[%s] oper_no[01]",
			terminal_id);
		ret = misc_audit(tmp, sql_win, 16, 3);
	}

	if (ret == 0) {
		EXEC SQL INSERT INTO edc_oper
		(terminal_id, oper_no, oper_pwd, oper_flag)
		VALUES (:terminal_id, '02', '0000', 'Y');
		ret = sqlca.sqlcode;
	}

	if (ret == 0) {
		sprintf(tmp, "增加表 edc_oper : terminal_id[%s] oper_no[02]",
			terminal_id);
		ret = misc_audit(tmp, sql_win, 16, 3);
	}

	if (ret == 0) {
		EXEC SQL INSERT INTO edc_oper
		(terminal_id, oper_no, oper_pwd, oper_flag)
		VALUES (:terminal_id, '03', '0000', 'Y');
		ret = sqlca.sqlcode;
	}

	if (ret == 0) {
		sprintf(tmp, "增加表 edc_oper : terminal_id[%s] oper_no[03]",
			terminal_id);
		ret = misc_audit(tmp, sql_win, 16, 3);
	}

	return(ret);
}

/*
 * 删除某EDC终端所有操作员
 */
int delete_opers(char *str)
{
	$char terminal_id[9];
	char tmp[200];
	int ret;

	strcpy(terminal_id, str);

	EXEC SQL DELETE FROM edc_oper
	WHERE terminal_id = :terminal_id;
	ret = sqlca.sqlcode;

	if (ret == 100) return(0);

	if (ret == 0) {
		sprintf(tmp, "删除表 edc_oper : terminal_id[%s]", terminal_id);
		ret = misc_audit(tmp, sql_win, 16, 3);
	}
	
	return(ret);
}

/*
 * 更改EDC操作员的EDC终端号
 */
int update_3_opers(char *str1, char *str2)
{
	$char old_id[9], new_id[9];
	char tmp[200];
	int ret;

	strcpy(old_id, str1);
	strcpy(new_id, str2);

	EXEC SQL UPDATE edc_oper
	SET terminal_id = :new_id
	WHERE terminal_id = :old_id;
	ret = sqlca.sqlcode;

	if (ret == 100) return(0);

	if (ret == 0) {
		sprintf(tmp, "修改表 edc_oper : terminal_id[%s][%s]",
			old_id, new_id);
		ret = misc_audit(tmp, sql_win, 16, 3);
	}
	
	return(ret);
}