formfunc.c

sco unix 前台界面开发程序,采用UNIX中的词法分析器和语法分析器

#include "public.h"
#include "protime.h"
#include "screen.h"
#include "mymenu.h"
#include "myform.h"
#include "global.h"

extern int SendHost();

//显示错误信息
void PrintErr(WINDOW *win, int code)
{
	FILE *fp;
	char buf[80], tmp[80];
	if((fp = fopen("../etc/error.txt", "r")) == NULL) {
		PrintMsg(win, "打开文件[../etc/error.txt]错误", 'E');
		return;
	}
	memset(buf, 0, 80);
	while((fscanf(fp, "%[^\n]\n", buf) != EOF)) {
		memset(tmp, 0, sizeof(tmp));
		GetString(tmp, buf, 1, '|');
		if(code == atoi(tmp)) {
			memset(tmp, 0, sizeof(tmp));
			GetString(tmp, buf, 2, '|');
			PrintMsg(win, tmp, 'E');
			fclose(fp);
			return;
		}
	}
	fclose(fp);
	memset(tmp, 0, 80);
	sprintf(tmp, "未定义错误代码[%04d]", code);
	PrintMsg(win, tmp, 'E');
}

//检查日期
//0-成功 !0-失败
int ChkDate(FORM_NODE *p)
{
	char *x=ReadField(p, 1);
	if(IsDate(atoi(Trim(x)))) return(0);
	else {
		PrintMsg(FormWin(p), "日期错误",'E');
		return(-1);
	}
}

/*
检查柜员是否存在
 发送：9001 + oprcode
 返回：9001 + 结果
 0-存在 !0-失败
 */
int ChkUser(FORM_NODE *p)
{
	int ret = 0;
	char str[5];
	WINDOW *win = FormWin(p);
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9001%s", ReadField(p, 1));
	if(ret = SendHost()) {
		PrintErr(win, ret);
		return(ret);
	}
	memset(str, 0, 5);
	memcpy(str, &PACK[4], 4);
	ret = atoi(str);
	if(ret) PrintErr(win, ret);
	return(ret);
}

/*
取柜员信息
 发送：9003 + oprcode
 返回：9003 + 结果
	oprcode     char(4) not null,
	oprname     char(12) not null,
	oprtype     char(1) not null,
	passwd      char(6) not null,
	orgcode     char(4) not null,
	stat        char(1) not null
 */
 
int GetUser(FORM_NODE *p)
{
	int ret = 0;
	char str[5], stat;
	WINDOW *win = FormWin(p);
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9003%s", ReadField(p, 2));
	if(ret = SendHost()) {
		 PrintErr(win, ret);
		 return(ret);
	}
	memset(str, 0, 5);
	memcpy(str, &PACK[4], 4);
	ret = atoi(str);
	if(ret) PrintErr(win, ret);
	/*else if((stat= PACK[35]) == '1') { 
		PrintErr(win, 1004);
		return(1);
	}*/
	memset(ORGCODE, 0, 5);
	memcpy(ORGCODE, &PACK[31], 4);
	return(ret);
}

//检查密码
int ChkPass(FORM_NODE *p)
{
	char tmp[80];
	WINDOW *win = FormWin(p);
	char passwd[7];
	memset(passwd, 0, 7);
	memcpy(passwd, &PACK[25], 6);
	if(strcmp(Trim(passwd), Trim(ReadField(p, 3)))) {
		PrintErr(win, 1005);
		return(1);
	}
	return(0);
}
	
	
/*
检查所号是否存在
 发送：9002 + oprcode
 返回：9002 + 结果 + 所名
 0-存在 !0-失败
 */
int ChkOrg(FORM_NODE *p)
{
	int ret = 0;
	char str[5], orgname[21];
	WINDOW *win = FormWin(p);
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9002%s", ReadField(p, 5));
	if(ret = SendHost())
		PrintErr(win, ret);
	else {
	   memset(str, 0, 5);
	   memcpy(str, &PACK[4], 4);
	   ret = atoi(str);
	   if(ret) PrintErr(win, ret);
	   else {
			memset(orgname, 0, 21);
			memcpy(orgname, &PACK[8], 20);
			WriteField(p, 50, Trim(orgname));
	  }
	}
	return(ret);
}
	
int DelUser01(FORM_NODE *p)
{
	int ret = 0;
	char str[5], stat, oprname[13];
	WINDOW *win = FormWin(p);
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9003%s", ReadField(p, 1));
	if(ret = SendHost()) {
		PrintErr(win, ret);
		return(ret);
	}
	memset(str, 0, 5);
	memcpy(str, &PACK[4], 4);
	ret = atoi(str);
	if(ret) {
		PrintErr(win, ret);
		return(ret);
	}
	memset(oprname, 0, 13);
	memcpy(oprname, &PACK[12], 12);
	WriteField(p, 2, oprname);
	return(ret);
}

int HVPTOutName(FORM_NODE *p)
{
	int ret = 0;
	char str[5], accname[61];
	WINDOW *win = FormWin(p); 
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9006%s", ReadField(p, 4));
	if(ret = SendHost()) {
		 PrintErr(win, ret);
		 return(ret);
	}
	memset(str, 0, 5);
	memcpy(str, &PACK[4], 4);
	ret = atoi(str);
	if(ret) {
		return(0);
	}
	memset(accname, 0, sizeof(accname));
	memcpy(accname, &PACK[8], 60);
	WriteField(p, 3, accname);
	return(ret);
}

int HVPTInName(FORM_NODE *p)
{
	int ret = 0;
	char str[5], accname[61];
	WINDOW *win = FormWin(p);
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9006%s", ReadField(p, 9));
	if(ret = SendHost()) {
		 PrintErr(win, ret);
		 return(ret);
	}
	memset(str, 0, 5);
	memcpy(str, &PACK[4], 4);
	ret = atoi(str);
	if(ret) {
		return(0);
	}
	memset(accname, 0, sizeof(accname));
	memcpy(accname, &PACK[8], 60);
	WriteField(p, 8, accname);
	return(ret);
}

int HVCSInName(FORM_NODE *p)
{
	int ret = 0;
	char str[5], accname[61];
	WINDOW *win = FormWin(p);
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9006%s", ReadField(p, 7));
	if(ret = SendHost()) {
		 PrintErr(win, ret);
		 return(ret);
	}
	memset(str, 0, 5);
	memcpy(str, &PACK[4], 4);
	ret = atoi(str);
	if(ret) {
		return(0);
	}
	memset(accname, 0, sizeof(accname));
	memcpy(accname, &PACK[8], 60);
	WriteField(p, 6, accname);
	return(ret);
}

int HVCDOutName(FORM_NODE *p)
{
	int ret = 0;
	char str[5], accname[61];
	WINDOW *win = FormWin(p);
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9006%s", ReadField(p, 4));
	if(ret = SendHost()) {
		 PrintErr(win, ret);
		 return(ret);
	}
	memset(str, 0, 5);
	memcpy(str, &PACK[4], 4);
	ret = atoi(str);
	if(ret) {
		return(0);
	}
	memset(accname, 0, sizeof(accname));
	memcpy(accname, &PACK[8], 60);
	WriteField(p, 3, accname);
	return(ret);
}

int OHVCOutName(FORM_NODE *p)
{
	int ret = 0;
	char str[5], accname[61];
	WINDOW *win = FormWin(p);
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9006%s", ReadField(p, 4));
	if(ret = SendHost()) {
		 PrintErr(win, ret);
		 return(ret);
	}
	memset(str, 0, 5);
	memcpy(str, &PACK[4], 4);
	ret = atoi(str);
	if(ret) {
		return(0);
	}
	memset(accname, 0, sizeof(accname));
	memcpy(accname, &PACK[8], 60);
	WriteField(p, 3, accname);
	return(ret);
}

int OHVCInName(FORM_NODE *p)
{
	int ret = 0;
	char str[5], accname[61];
	WINDOW *win = FormWin(p);
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9006%s", ReadField(p, 11));
	if(ret = SendHost()) {
		 PrintErr(win, ret);
		 return(ret);
	}
	memset(str, 0, 5);
	memcpy(str, &PACK[4], 4);
	ret = atoi(str);
	if(ret) {
		return(0);
	}
	memset(accname, 0, sizeof(accname));
	memcpy(accname, &PACK[8], 60);
	WriteField(p, 10, accname);
	return(ret);
}

int PBTOOutName(FORM_NODE *p)
{
	int ret = 0;
	char str[5], accname[61];
	WINDOW *win = FormWin(p);
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9006%s", ReadField(p, 4));
	if(ret = SendHost()) {
		 PrintErr(win, ret);
		 return(ret);
	}
	memset(str, 0, 5);
	memcpy(str, &PACK[4], 4);
	ret = atoi(str);
	if(ret) {
		return(0);
	}
	memset(accname, 0, sizeof(accname));
	memcpy(accname, &PACK[8], 60);
	WriteField(p, 3, accname);
	return(ret);
}

int PBTOInName(FORM_NODE *p)
{
	int ret = 0;
	char str[5], accname[61];
	WINDOW *win = FormWin(p);
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9006%s", ReadField(p, 9));
	if(ret = SendHost()) {
		 PrintErr(win, ret);
		 return(ret);
	}
	memset(str, 0, 5);
	memcpy(str, &PACK[4], 4);
	ret = atoi(str);
	if(ret) {
		return(0);
	}
	memset(accname, 0, sizeof(accname));
	memcpy(accname, &PACK[8], 60);
	WriteField(p, 8, accname);
	return(ret);
}

int PATOOutName(FORM_NODE *p)
{
	int ret = 0;
	char str[5], accname[61];
	WINDOW *win = FormWin(p);
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9006%s", ReadField(p, 4));
	if(ret = SendHost()) {
		 PrintErr(win, ret);
		 return(ret);
	}
	memset(str, 0, 5);
	memcpy(str, &PACK[4], 4);
	ret = atoi(str);
	if(ret) {
		return(0);
	}
	memset(accname, 0, sizeof(accname));
	memcpy(accname, &PACK[8], 60);
	WriteField(p, 3, accname);
	return(ret);
}

int PATOInName(FORM_NODE *p)
{
	int ret = 0;
	char str[5], accname[61];
	WINDOW *win = FormWin(p); 
	memset(PACK, 0, sizeof(PACK));
	sprintf(PACK, "9006%s", ReadField(p, 12));
	if(ret = SendHost()) {
		 PrintErr(win, ret);
		 return(ret);
	}
	memset(str, 0, 5);
	memcpy(str, &PACK[4], 4);
	ret = atoi(str);
	if(ret) {
		return(0);
	}
	memset(accname, 0, sizeof(accname));
	memcpy(accname, &PACK[8], 60);
	WriteField(p, 11, accname);
	return(ret);
}