server.c

tuxede下面的编程

#include <stdio.h>
#include <ctype.h>
#include <time.h>
#include "atmi.h"



void WITHDRAWAL(TPSVCINFO *rqst)
{
	
	char *s;
	int amt = 0;
	
	
	s=(char*)tpalloc("STRING",NULL,1024);
	if(s == NULL)
	{
		userlog("tpalloc() failure:%s",tpstrerror(tperrno));		
		tpreturn(TPFAIL,0,0,0L,0);
	}
	amt = atol(rqst->data);
	if (amt>300)
	{
		strcpy(s,"you can only withdraw 300 dollar");	
		if(tppost("BANK_TLR_WITHDRAWAL",(char *)s,0L,TPNOTRAN|TPSIGRSTRT)<0)
		{
			if (tperrno!=TPENOENT)
				userlog("tppost(BANK_TLR_WITHDRAWAL) failed:%s",tpstrerror(tperrno));	
		}
		else
			userlog("tppost() success\n");
		tpreturn(TPSUCCESS,0,(char *)s,0L,0);
	}
	sprintf(s,"you success withdraw:%ld dallar",amt);
	tpreturn(TPSUCCESS,0,s,0L,0);
}