sa_in.ec

这是一个使用 informix esql/c 技术开发的银行程序的部分代码。

              printf("      \n合计:");
              s_type[0]=120;
              cu_type[0]='R';
              ter[0]=100;
          }
/*
        printf("        \n余额:  ");
        scanf("%lf",&yes_bala);
        printf("        \n户数:  ");
        scanf("%ld",&yes_user);
        printf("        \n挂失数:  ");
        scanf("%hd",&yes_hang);
        printf("        \n冻结数:  ");
        scanf("%hd",&yes_free);
        printf("        \n修改数:  ");
        scanf("%hd",&yes_chan);
*/
        $insert into r_month
          values
          ($s_type,$cu_type,$ter,$yes_bala,$deb_amoun,$cre_amoun,$toda_bala,
          $yes_user,$ope_user,$can_user,$toda_user,$deb_vouch,$cre_vouch,
          $yes_hang,$han_up,$lif_hang,$toda_hang,$yes_free,$freez,$unfreez,
          $toda_free,$yes_chan,$chang,$toda_chan);
        if(sqlca.sqlcode!=0)
          {
            printf("** 错误 %d :写月报表出错 **",sqlca.sqlcode);
            return;
          }
      }
    printf("=== 请输入人民币上季额 ===\n");
    for(i=1;i<=41;i++)
      {
        switch(i)
          {
            case 1:
              printf("      \n人民币整存整取三个月:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=3;
              break;
            case 2:
              printf("      \n人民币整存整取六个月:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=6;
              break;
            case 3:
              printf("      \n人民币整存整取一年:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=12;
              break;
            case 4:
              printf("      \n人民币整存整取两年:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=24;
              break;
            case 5:
              printf("      \n人民币整存整取三年:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=36;
              break;
            case 6:
              printf("      \n人民币整存整取五年:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=60;
              break;
            case 7:
              printf("      \n人民币整存整取小计:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 8:
              printf("      \n人民币活期:");
              s_type[0]=2;
              cu_type[0]='R';
              ter[0]=0;
              break;
            case 9:
              printf("      \n人民币零存整取一年:");
              s_type[0]=3;
              cu_type[0]='R';
              ter[0]=12;
              break;
            case 10:
              printf("      \n人民币零存整取三年:");
              s_type[0]=3;
              cu_type[0]='R';
              ter[0]=36;
              break;
            case 11:
              printf("      \n人民币零存整取五年:");
              s_type[0]=3;
              cu_type[0]='R';
              ter[0]=60;
              break;
            case 12:
              printf("      \n人民币零存整取小计:");
              s_type[0]=3;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 13:
              printf("      \n人民币存本取息一年:");
              s_type[0]=4;
              cu_type[0]='R';
              ter[0]=12;
              break;
            case 14:
              printf("      \n人民币存本取息三年:");
              s_type[0]=4;
              cu_type[0]='R';
              ter[0]=36;
              break;
            case 15:
              printf("      \n人民币存本取息五年:");
              s_type[0]=4;
              cu_type[0]='R';
              ter[0]=60;
              break;
            case 16:
              printf("      \n人民币存本取息小计:");
              s_type[0]=4;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 17:
              printf("      \n人民币定活两变:");
              s_type[0]=5;
              cu_type[0]='R';
              ter[0]=0;
              break;
            case 18:
              printf("      \n人民币大额一月:");
              s_type[0]=6;
              cu_type[0]='R';
              ter[0]=1;
              break;
            case 19:
              printf("      \n人民币大额三月:");
              s_type[0]=6;
              cu_type[0]='R';
              ter[0]=3;
              break;
            case 20:
              printf("      \n人民币大额六月:");
              s_type[0]=6;
              cu_type[0]='R';
              ter[0]=6;
              break;
            case 21:
              printf("      \n人民币大额九月:");
              s_type[0]=6;
              cu_type[0]='R';
              ter[0]=9;
              break;
            case 22:
              printf("      \n人民币大额一年:");
              s_type[0]=6;
              cu_type[0]='R';
              ter[0]=12;
              break;
            case 23:
              printf("      \n人民币大额小计:");
              s_type[0]=6;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 24:
              printf("      \n人民币通知存款:");
              s_type[0]=7;
              cu_type[0]='R';
              ter[0]=0;
              break;
            case 25:
              printf("      \n人民币合计:");
              s_type[0]=100;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 26:
              printf("      \n一年以下利息:");
              s_type[0]=101;
              cu_type[0]='R';
              ter[0]=1;
              break;
            case 27:
              printf("      \n一年以上利息:");
              s_type[0]=101;
              cu_type[0]='R';
              ter[0]=2;
              break;
            case 28:
              printf("      \n保值利息:");
              s_type[0]=101;
              cu_type[0]='R';
              ter[0]=3;
              break;
            case 29:
              printf("      \n活期利息:");
              s_type[0]=101;
              cu_type[0]='R';
              ter[0]=4;
              break;
            case 30:
              printf("      \n利息合计:");
              s_type[0]=101;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 31:
              printf("      \n有奖储蓄:");
              s_type[0]=102;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 32:
              printf("      \n国库券:");
              s_type[0]=103;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 33:
              printf("      \n债券:");
              s_type[0]=104;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 34:
              printf("      \n业务备用金:");
              s_type[0]=105;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 35:
              printf("      \n暂收款:");
              s_type[0]=106;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 36:
              printf("      \n暂付款:");
              s_type[0]=107;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 37:
              printf("      \n应付利息:");
              s_type[0]=108;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 38:
              printf("      \n往来收支:");
              s_type[0]=109;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 39:
              printf("      \n营业收支:");
              s_type[0]=110;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 40:
              printf("      \n库存现金:");
              s_type[0]=111;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 41:
              printf("      \n合计:");
              s_type[0]=120;
              cu_type[0]='R';
              ter[0]=100;
          }
/*
        printf("        \n余额:  ");
        scanf("%lf",&yes_bala);
        printf("        \n户数:  ");
        scanf("%ld",&yes_user);
        printf("        \n挂失数:  ");
        scanf("%hd",&yes_hang);
        printf("        \n冻结数:  ");
        scanf("%hd",&yes_free);
        printf("        \n修改数:  ");
        scanf("%hd",&yes_chan);
*/
        $insert into r_quarter
          values
          ($s_type,$cu_type,$ter,$yes_bala,$deb_amoun,$cre_amoun,$toda_bala,
          $yes_user,$ope_user,$can_user,$toda_user,$deb_vouch,$cre_vouch,
          $yes_hang,$han_up,$lif_hang,$toda_hang,$yes_free,$freez,$unfreez,
          $toda_free,$yes_chan,$chang,$toda_chan);
        if(sqlca.sqlcode!=0)
          {
            printf("** 错误 %d :写季报表出错 **",sqlca.sqlcode);
            return;
          }
      }
    printf("=== 请输入人民币上年额 ===\n");
    for(i=1;i<=41;i++)
      {
        switch(i)
          {
            case 1:
              printf("      \n人民币整存整取三个月:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=3;
              break;
            case 2:
              printf("      \n人民币整存整取六个月:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=6;
              break;
            case 3:
              printf("      \n人民币整存整取一年:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=12;
              break;
            case 4:
              printf("      \n人民币整存整取两年:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=24;
              break;
            case 5:
              printf("      \n人民币整存整取三年:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=36;
              break;
            case 6:
              printf("      \n人民币整存整取五年:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=60;
              break;
            case 7:
              printf("      \n人民币整存整取小计:");
              s_type[0]=1;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 8:
              printf("      \n人民币活期:");
              s_type[0]=2;
              cu_type[0]='R';
              ter[0]=0;
              break;
            case 9:
              printf("      \n人民币零存整取一年:");
              s_type[0]=3;
              cu_type[0]='R';
              ter[0]=12;
              break;
            case 10:
              printf("      \n人民币零存整取三年:");
              s_type[0]=3;
              cu_type[0]='R';
              ter[0]=36;
              break;
            case 11:
              printf("      \n人民币零存整取五年:");
              s_type[0]=3;
              cu_type[0]='R';
              ter[0]=60;
              break;
            case 12:
              printf("      \n人民币零存整取小计:");
              s_type[0]=3;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 13:
              printf("      \n人民币存本取息一年:");
              s_type[0]=4;
              cu_type[0]='R';
              ter[0]=12;
              break;
            case 14:
              printf("      \n人民币存本取息三年:");
              s_type[0]=4;
              cu_type[0]='R';
              ter[0]=36;
              break;
            case 15:
              printf("      \n人民币存本取息五年:");
              s_type[0]=4;
              cu_type[0]='R';
              ter[0]=60;
              break;
            case 16:
              printf("      \n人民币存本取息小计:");
              s_type[0]=4;
              cu_type[0]='R';
              ter[0]=100;
              break;
            case 17:
              printf("      \n人民币定活两变:");
              s_type[0]=5;
              cu_type[0]='R';
              ter[0]=0;
              break;
            case 18:
              printf("      \n人民币大额一月:");
              s_type[0]=6;
              cu_type[0]='R';
              ter[0]=1;
              break;
            case 19:
              printf("      \n人民币大额三月:");
              s_type[0]=6;
              cu_type[0]='R';
              ter[0]=3;
              break;
            case 20:
              printf("      \n人民币大额六月:");
              s_type[0]=6;
              cu_type[0]='R';
              ter[0]=6;
              break;
            case 21:
              printf("      \n人民币大额九月:");
              s_type[0]=6;
              cu_type[0]='R';
              ter[0]=9;
              break;
            case 22:
              printf("      \n人民币大额一年:");
              s_type[0]=6;
              cu_type[0]='R';
              ter[0]=12;
              break;
            case 23: