📄 cif_co.c
字号:
strcpy( co_acc_reg->cid, co_info->cid) ; strcpy( co_acc_reg->aid, bs->debi_aid) ; strcpy( co_acc_reg->account, bs->debi_acct) ; /*if ( strlen( bs->notes1) == 0 ) */ strcpy( co_acc_reg->name, bs->debi_acct) ; /*else strcpy( co_acc_reg->name, bs->abstract) ;*/ co_acc_reg->curr = bs->debi_curr ; strcpy( co_acc_reg->bank_no, bs->debi_bank) ; co_acc_reg->acct_type = bs->debi_acct_type ; strcpy( co_acc_reg->auth_flg, "100") ; strcpy( co_acc_reg->pay_flg, "0") ; strcpy( co_acc_reg->pay_passwd, "0") ; co_acc_reg->trans_lamt = 0.00 ; co_acc_reg->trans_lsum = 0.00 ; co_acc_reg->limit_num = 0 ; co_acc_reg->status = STATUS_ACTIVE ; strcpy( co_acc_reg->reg_teller, bs->teller) ; strcpy( co_acc_reg->reg_brch, bs->term_no); pub_get_year_second( co_acc_reg->reg_date) ; strcpy( co_acc_reg->modi_teller, bs->teller) ; strcpy( co_acc_reg->modi_brch, bs->term_no) ; pub_get_year_second( co_acc_reg->modi_date) ; return( SUCCESS) ;}/* ------------------------------------------------------------------------功 能: 查询全部单位帐户信息 交易码: 8212--------------------------------------------------------------------------- */int c8212( TRADE_HEAD *tr_h, BIG_STRC *bs){ CO_INFO co_info ; int ret ; memset( (char *)&co_info, '\0', sizeof( co_info)) ; /* 查询客户是否存在,并取得客户号证件和客户姓名*/ ret = DB_search_co_info( bs->cid, bs->pz_num, &co_info) ; if ( ret != SUCCESS ) { if ( ret != 100 ) { bms_trace("CASE[%d] c8212 search_co_info[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; } else bs->result = 8004 ; /* 客户档案信息不存在*/ return( FAILURE) ; } strcpy( bs->cid, co_info.cid) ; /* 客户号*/ strcpy( bs->pz_num, co_info.regist_id) ;/* 注册号码*/ if ( co_info.status == STATUS_DISA ) { bs->result = 8010 ; /* 该客户已注销*/ return( FAILURE) ; } if ( (ret=DB_query_co_acc_reg( bs->cid)) != SUCCESS) { if ( ret != FAILURE ) { bms_trace("CASE[%d] c8212 query_co_acc_reg[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; } else bs->result = 8014 ; /* 无帐号信息*/ strcpy(bs->errinfo,"21342314"); return( FAILURE) ; } return( SUCCESS) ;}/* ------------------------------------------------------------------------功 能: 单位帐号删除 交易码: 8213--------------------------------------------------------------------------- */int c8213( TRADE_HEAD *tr_h, BIG_STRC *bs){ CO_INFO co_info ; CO_ACC_REG co_acc_reg ; int ret ; memset( (char *)&co_info, '\0', sizeof( co_info)) ; memset( (char *)&co_acc_reg, '\0', sizeof( co_acc_reg)) ; /* 查询客户是否存在,并取得客户号证件和客户姓名*/ ret = DB_search_co_info( bs->cid, bs->pz_num, &co_info) ; if ( ret != SUCCESS ) { if ( ret != 100 ) { bms_trace("CASE[%d] c8213 search_co_info[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; } else bs->result = 8004 ; /* 客户档案信息不存在*/ return( FAILURE) ; } strcpy( bs->cid, co_info.cid) ; /* 客户号*/ strcpy( bs->pz_num, co_info.regist_id) ;/* 注册号码*/ if ( co_info.status == STATUS_DISA ) { bs->result = 8010 ; /* 该客户已注销*/ return( FAILURE) ; } strcpy( co_acc_reg.cid, bs->cid) ; strcpy( co_acc_reg.aid, bs->debi_aid) ; strcpy( co_acc_reg.modi_teller, bs->teller) ; strcpy( co_acc_reg.modi_brch, bs->term_no) ; pub_get_year_second( co_acc_reg.modi_date) ; if ( (ret=DB_search_co_acc_reg_on_aid( &co_acc_reg)) != SUCCESS ) { if ( ret < FAILURE ) { bms_trace("CASE[%d] c8213 search_co_acc_reg_on_aid[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; } else bs->result = 8015 ; /* 帐户序号不存在*/ return( FAILURE) ; } if ( (ret=DB_del_co_acc_reg( &co_acc_reg)) != SUCCESS ) { bms_trace("CASE[%d] c8213 del_co_acc_reg[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; return( FAILURE) ; } return( SUCCESS) ;}/* ------------------------------------------------------------------------功 能: 查询单个对公帐号信息 交易码: 8214--------------------------------------------------------------------------- */int c8214( TRADE_HEAD *tr_h, BIG_STRC *bs){ CO_INFO co_info ; CO_ACC_REG co_acc_reg ; int ret ; memset( (char *)&co_info, '\0', sizeof( co_info)) ; /* 查询客户是否存在,并取得客户号证件和客户姓名*/ ret = DB_search_co_info( bs->cid, bs->pz_num, &co_info) ; if ( ret != SUCCESS ) { if ( ret != 100 ) { bms_trace("CASE[%d] c8212 search_co_info[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; } else bs->result = 8004 ; /* 客户档案信息不存在*/ return( FAILURE) ; } strcpy( bs->cid, co_info.cid) ; /* 客户号*/ strcpy( bs->pz_num, co_info.regist_id) ;/* 注册号码*/ if ( co_info.status == STATUS_DISA ) { bs->result = 8010 ; /* 该客户已注销*/ return( FAILURE) ; } memset( (char *)&co_acc_reg, '\0', sizeof( co_acc_reg)) ; strcpy( co_acc_reg.cid, bs->cid) ; strcpy( co_acc_reg.aid, bs->debi_aid) ; if ( (ret=DB_search_co_acc_reg_on_aid( &co_acc_reg)) != SUCCESS ) { if ( ret < FAILURE ) { bms_trace("CASE[%d] c8214 search_co_acc_reg_on_aid[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; } else bs->result = 8015 ; /* 帐户序号不存在*/ return( FAILURE) ; } WriteCoAccRegInfo( &co_acc_reg, bs) ; return( SUCCESS) ;}int WriteCoAccRegInfo( CO_ACC_REG *co_acc_reg, BIG_STRC *bs){ strcpy( bs->debi_bank, co_acc_reg->bank_no) ; strcpy( bs->notes1, co_acc_reg->name) ; bs->debi_acct_type = co_acc_reg->acct_type ; strcpy( bs->debi_acct, co_acc_reg->account) ; bs->debi_curr = co_acc_reg->curr ; bs->bill_flg = co_acc_reg->status ; strcpy( bs->notes2, co_acc_reg->reg_teller) ; strcpy( bs->notes3, co_acc_reg->reg_date) ; strcpy( bs->notes4, co_acc_reg->modi_teller) ; strcpy( bs->notes5, co_acc_reg->modi_date) ; return( SUCCESS) ;}/* ------------------------------------------------------------------------功 能: 对公代表登记 交易码: 8231--------------------------------------------------------------------------- */int c8231( TRADE_HEAD *tr_h, BIG_STRC *bs){ CO_INFO co_info ; BROKER_INFO broker_info ; int ret ; memset( (char *)&co_info, '\0', sizeof( co_info)) ; /* 查询客户是否存在,并取得客户号证件和客户姓名*/ ret = DB_search_co_info( bs->cid, bs->pz_num, &co_info) ; if ( ret != SUCCESS ) { if ( ret != 100 ) { bms_trace("CASE[%d] c8231 search_co_info[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; } else bs->result = 8004 ; /* 客户档案信息不存在*/ return( FAILURE) ; } strcpy( bs->cid, co_info.cid) ; /* 客户号*/ strcpy( bs->pz_num, co_info.regist_id) ;/* 注册号码*/ if ( co_info.status == STATUS_DISA ) { bs->result = 8010 ; /* 该客户已注销*/ return( FAILURE) ; } memset( (char *)&broker_info, '\0', sizeof( broker_info)) ; SetBrokerInfo( bs, &broker_info) ; /* 查询客户代表是否存在*/ if ( (ret=DB_search_broker_info_on_bid( &broker_info)) != 100 ) { if ( ret == SUCCESS ) { bs->result = 8032 ; /* 客户代表已存在*/ return( FAILURE) ; } bms_trace("CASE[%d] c8231 search_broker_info_on_bid[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; return( FAILURE) ; } memset( (char *)&broker_info, '\0', sizeof( broker_info)) ; SetBrokerInfo( bs, &broker_info) ; /* 查询客户代表是否存在*/ if ( (ret=DB_search_broker_info_on_ic_no( &broker_info)) != 100 ) { if ( ret == SUCCESS ) { bs->result = 8032 ; /* 客户代表已存在*/ return( FAILURE) ; } bms_trace("CASE[%d] c8231 search_broker_info_on_ic_no[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; return( FAILURE) ; } memset( (char *)&broker_info, '\0', sizeof( broker_info)) ; SetBrokerInfo( bs, &broker_info) ; if ( (ret=DB_add_broker_info( &broker_info)) != SUCCESS ) { bms_trace("CASE[%d] c8231 add_broker_info[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; return( FAILURE) ; } return( SUCCESS) ;}int SetBrokerInfo( BIG_STRC *bs, BROKER_INFO *broker_info){ sprintf( broker_info->zoneno, "%05d", bs->zoneno) ; /* 地区号*/ strcpy( broker_info->cid, bs->cid) ; /* 客户号*/ broker_info->bid = bs->bid ; icbc_des( bs->passwd1, broker_info->ppasswd) ; AllTrim(broker_info->ppasswd); icbc_des( bs->passwd1, broker_info->spasswd) ; AllTrim(broker_info->spasswd); strcpy( broker_info->name, bs->name) ; broker_info->status = STATUS_ACTIVE ; broker_info->acct_num = 0 ; strncpy( broker_info->broker_right, bs->abstract, 5) ; broker_info->detail_num = 0 ; broker_info->ic_type = bs->pz_type ; strncpy( broker_info->ic_no, bs->sonsign_no, 18) ; strncpy( broker_info->fax, bs->notes1, 20) ; strncpy( broker_info->rela_tel, bs->notes2, 20) ; strncpy( broker_info->bp, bs->notes3, 20) ; strcpy( broker_info->reg_teller, bs->teller) ; strcpy( broker_info->reg_brch, bs->term_no); pub_get_year_second( broker_info->reg_date) ; strcpy( broker_info->modi_teller, bs->teller) ; strcpy( broker_info->modi_brch, bs->term_no) ; pub_get_year_second( broker_info->modi_date) ; return( SUCCESS) ;}/* ------------------------------------------------------------------------功 能: 查询客户代表信息 交易码: 8232--------------------------------------------------------------------------- */int c8232( TRADE_HEAD *tr_h, BIG_STRC *bs){ CO_INFO co_info ; int ret ; memset( (char *)&co_info, '\0', sizeof( co_info)) ; /* 查询客户是否存在,并取得客户号证件和客户姓名*/ ret = DB_search_co_info( bs->cid, bs->pz_num, &co_info) ; if ( ret != SUCCESS ) { if ( ret != 100 ) { bms_trace("CASE[%d] c8232 search_co_info[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; } else bs->result = 8004 ; /* 客户档案信息不存在*/ return( FAILURE) ; } strcpy( bs->cid, co_info.cid) ; /* 客户号*/ strcpy( bs->pz_num, co_info.regist_id) ;/* 注册号码*/ if ( co_info.status == STATUS_DISA ) { bs->result = 8010 ; /* 该客户已注销*/ return( FAILURE) ; } if ( (ret=DB_query_broker_info( bs->cid)) != SUCCESS) { if ( ret != FAILURE ) { bms_trace("CASE[%d] c8232 query_co_acc_reg[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; } else bs->result = 8031 ; /* 无客户代表信息*/ return( FAILURE) ; } return( SUCCESS) ;}/* ------------------------------------------------------------------------功 能: 单位代表删除 交易码: 8234--------------------------------------------------------------------------- */int c8234( TRADE_HEAD *tr_h, BIG_STRC *bs){ CO_INFO co_info ; BROKER_INFO broker_info ; int ret ; memset( (char *)&co_info, '\0', sizeof( co_info)) ; /* 查询客户是否存在,并取得客户号证件和客户姓名*/ ret = DB_search_co_info( bs->cid, bs->pz_num, &co_info) ; if ( ret != SUCCESS ) { if ( ret != 100 ) { bms_trace("CASE[%d] c8234 search_co_info[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; } else bs->result = 8004 ; /* 客户档案信息不存在*/ return( FAILURE) ; } strcpy( bs->cid, co_info.cid) ; /* 客户号*/ strcpy( bs->pz_num, co_info.regist_id) ;/* 注册号码*/ if ( co_info.status == STATUS_DISA ) { bs->result = 8010 ; /* 该客户已注销*/ return( FAILURE) ; } memset( (char *)&broker_info, '\0', sizeof( broker_info)) ; strcpy( broker_info.cid, co_info.cid) ; broker_info.bid = bs->bid ; /* 查询客户代表是否存在*/ if ( (ret=DB_search_broker_info_on_bid( &broker_info)) != SUCCESS ) { if ( ret == 100 ) { bs->result = 8031 ; /* 客户代表不存在*/ return( FAILURE) ; } bms_trace("CASE[%d] c8234 search_broker_info_on_bid[%d]!", mypid, ret) ; bs->result = DATABASE_PROGRAM_ERROR ; return( FAILURE) ; } memset( (char *)&broker_info, '\0', sizeof( broker_info)) ; strcpy( broker_info.cid, co_info.cid) ; broker_info.bid = bs->bid ;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -