sav_init1.ec

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

              break;
            case 52:
              printf("      \n港元活期利息:");
              s_type[0]=101;
              cu_type[0]='H';
              ter[0]=4;
              break;
            case 53:
              printf("      \n港元利息合计:");
              s_type[0]=101;
              cu_type[0]='H';
              ter[0]=100;
              break;
            case 54:
              printf("      \n港元买入:");
              s_type[0]=102;
              cu_type[0]='H';
              ter[0]=100;
              break;
            case 55:
              printf("      \n买入港元支付人民币:");
              s_type[0]=103;
              cu_type[0]='H';
              ter[0]=100;
              break;
            case 56:
              printf("      \n港元业务备用金:");
              s_type[0]=105;
              cu_type[0]='H';
              ter[0]=100;
              break;
            case 57:
              printf("      \n港元暂收款:");
              s_type[0]=106;
              cu_type[0]='H';
              ter[0]=100;
              break;
            case 58:
              printf("      \n港元暂付款:");
              s_type[0]=107;
              cu_type[0]='H';
              ter[0]=100;
              break;
            case 59:
              printf("      \n港元应付利息:");
              s_type[0]=108;
              cu_type[0]='H';
              ter[0]=100;
              break;
            case 60:
              printf("      \n港元往来收支:");
              s_type[0]=109;
              cu_type[0]='H';
              ter[0]=100;
              break;
            case 61:
              printf("      \n港元营业收支:");
              s_type[0]=110;
              cu_type[0]='H';
              ter[0]=100;
              break;
            case 62:
              printf("      \n港元库存现金:");
              s_type[0]=111;
              cu_type[0]='H';
              ter[0]=100;
              break;
            case 63:
              printf("      \n港元总计:");
              s_type[0]=120;
              cu_type[0]='H';
              ter[0]=100;
              break;
            case 64:
              printf("      \n日元整存整取一个月:");
              s_type[0]=11;
              cu_type[0]='J';
              ter[0]=1;
              break;
            case 65:
              printf("      \n日元整存整取三个月:");
              s_type[0]=11;
              cu_type[0]='J';
              ter[0]=3;
              break;
            case 66:
              printf("      \n日元整存整取六个月:");
              s_type[0]=11;
              cu_type[0]='J';
              ter[0]=6;
              break;
            case 67:
              printf("      \n日元整存整取一年:");
              s_type[0]=11;
              cu_type[0]='J';
              ter[0]=12;
              break;
            case 68:
              printf("      \n日元整存整取两年:");
              s_type[0]=11;
              cu_type[0]='J';
              ter[0]=24;
              break;
            case 69:
              printf("      \n日元整存整取小计:");
              s_type[0]=11;
              cu_type[0]='J';
              ter[0]=100;
              break;
            case 70:
              printf("      \n日元活期:");
              s_type[0]=12;
              cu_type[0]='J';
              ter[0]=0;
              break;
            case 71:
              printf("      \n日元合计:");
              s_type[0]=100;
              cu_type[0]='J';
              ter[0]=100;
              break;
            case 72:
              printf("      \n日元定期利息:");
              s_type[0]=101;
              cu_type[0]='J';
              ter[0]=1;
              break;
            case 73:
              printf("      \n日元活期利息:");
              s_type[0]=101;
              cu_type[0]='J';
              ter[0]=4;
              break;
            case 74:
              printf("      \n日元利息合计:");
              s_type[0]=101;
              cu_type[0]='J';
              ter[0]=100;
              break;
            case 75:
              printf("      \n日元买入:");
              s_type[0]=102;
              cu_type[0]='J';
              ter[0]=100;
              break;
            case 76:
              printf("      \n买入日元支付人民币:");
              s_type[0]=103;
              cu_type[0]='J';
              ter[0]=100;
              break;
            case 77:
              printf("      \n日元业务备用金:");
              s_type[0]=105;
              cu_type[0]='J';
              ter[0]=100;
              break;
            case 78:
              printf("      \n日元暂收款:");
              s_type[0]=106;
              cu_type[0]='J';
              ter[0]=100;
              break;
            case 79:
              printf("      \n日元暂付款:");
              s_type[0]=107;
              cu_type[0]='J';
              ter[0]=100;
              break;
            case 80:
              printf("      \n日元应付利息:");
              s_type[0]=108;
              cu_type[0]='J';
              ter[0]=100;
              break;
            case 81:
              printf("      \n日元往来收支:");
              s_type[0]=109;
              cu_type[0]='J';
              ter[0]=100;
              break;
            case 82:
              printf("      \n日元营业收支:");
              s_type[0]=110;
              cu_type[0]='J';
              ter[0]=100;
              break;
            case 83:
              printf("      \n日元库存现金:");
              s_type[0]=111;
              cu_type[0]='J';
              ter[0]=100;
              break;
            case 84:
              printf("      \n日元总计:");
              s_type[0]=120;
              cu_type[0]='J';
              ter[0]=100;
              break;
            case 85:
              printf("      \n德国马克整存整取一个月:");
              s_type[0]=11;
              cu_type[0]='M';
              ter[0]=1;
              break;
            case 86:
              printf("      \n德国马克整存整取三个月:");
              s_type[0]=11;
              cu_type[0]='M';
              ter[0]=3;
              break;
            case 87:
              printf("      \n德国马克整存整取六个月:");
              s_type[0]=11;
              cu_type[0]='M';
              ter[0]=6;
              break;
            case 88:
              printf("      \n德国马克整存整取一年:");
              s_type[0]=11;
              cu_type[0]='M';
              ter[0]=12;
              break;
            case 89:
              printf("      \n德国马克整存整取两年:");
              s_type[0]=11;
              cu_type[0]='M';
              ter[0]=24;
              break;
            case 90:
              printf("      \n德国马克整存整取小计:");
              s_type[0]=11;
              cu_type[0]='M';
              ter[0]=100;
              break;
            case 91:
              printf("      \n德国马克活期:");
              s_type[0]=12;
              cu_type[0]='M';
              ter[0]=0;
              break;
            case 92:
              printf("      \n德国马克合计:");
              s_type[0]=100;
              cu_type[0]='M';
              ter[0]=100;
              break;
            case 93:
              printf("      \n德国马克定期利息:");
              s_type[0]=101;
              cu_type[0]='M';
              ter[0]=1;
              break;
            case 94:
              printf("      \n德国马克活期利息:");
              s_type[0]=101;
              cu_type[0]='M';
              ter[0]=4;
              break;
            case 95:
              printf("      \n德国马克利息合计:");
              s_type[0]=101;
              cu_type[0]='M';
              ter[0]=100;
              break;
            case 96:
              printf("      \n德国马克买入:");
              s_type[0]=102;
              cu_type[0]='M';
              ter[0]=100;
              break;
            case 97:
              printf("      \n买入德国马克支付人民币:");
              s_type[0]=103;
              cu_type[0]='M';
              ter[0]=100;
              break;
            case 98:
              printf("      \n德国马克业务备用金:");
              s_type[0]=105;
              cu_type[0]='M';
              ter[0]=100;
              break;
            case 99:
              printf("      \n德国马克暂收款:");
              s_type[0]=106;
              cu_type[0]='M';
              ter[0]=100;
              break;
            case 100:
              printf("      \n德国马克暂付款:");
              s_type[0]=107;
              cu_type[0]='M';
              ter[0]=100;
              break;
            case 101:
              printf("      \n德国马克应付利息:");
              s_type[0]=108;
              cu_type[0]='M';
              ter[0]=100;
              break;
            case 102:
              printf("      \n德国马克往来收支:");
              s_type[0]=109;
              cu_type[0]='M';
              ter[0]=100;
              break;
            case 103:
              printf("      \n德国马克营业收支:");
              s_type[0]=110;
              cu_type[0]='M';
              ter[0]=100;
              break;
            case 104:
              printf("      \n德国马克库存现金:");
              s_type[0]=111;
              cu_type[0]='M';
              ter[0]=100;
              break;
            case 105:
              printf("      \n德国马克总计:");
              s_type[0]=120;
              cu_type[0]='M';
              ter[0]=100;
              break;
            case 106:
              printf("      \n英镑整存整取一个月:");
              s_type[0]=11;
              cu_type[0]='P';
              ter[0]=1;
              break;
            case 107:
              printf("      \n英镑整存整取三个月:");
              s_type[0]=11;
              cu_type[0]='P';
              ter[0]=3;
              break;
            case 108:
              printf("      \n英镑整存整取六个月:");
              s_type[0]=11;
              cu_type[0]='P';
              ter[0]=6;
              break;
            case 109:
              printf("      \n英镑整存整取一年:");
              s_type[0]=11;
              cu_type[0]='P';
              ter[0]=12;
              break;
            case 110:
              printf("      \n英镑整存整取两年:");
              s_type[0]=11;
              cu_type[0]='P';
              ter[0]=24;
              break;
            case 111:
              printf("      \n英镑整存整取小计:");
              s_type[0]=11;
              cu_type[0]='P';
              ter[0]=100;
              break;
            case 112:
              printf("      \n英镑活期:");
              s_type[0]=12;
              cu_type[0]='P';
              ter[0]=0;
              break;
            case 113:
              printf("      \n英镑合计:");
              s_type[0]=100;
              cu_type[0]='P';
              ter[0]=100;
              break;
            case 114:
              printf("      \n英镑定期利息:");
              s_type[0]=101;
              cu_type[0]='P';
              ter[0]=1;
              break;
            case 115:
              printf("      \n英镑活期利息:");
              s_type[0]=101;
              cu_type[0]='P';
              ter[0]=4;
              break;
            case 116:
              printf("      \n英镑利息合计:");
              s_type[0]=101;
              cu_type[0]='P';
              ter[0]=100;
              break;
            case 117:
              printf("      \n英镑买入:");
              s_type[0]=102;
              cu_type[0]='P';
              ter[0]=100;
              break;
            case 118:
              printf("      \n买入英镑支付人民币:");
              s_type[0]=103;
              cu_type[0]='P';
              ter[0]=100;
              break;
            case 119:
              printf("      \n英镑业务备用金:");
              s_type[0]=105;
              cu_type[0]='P';
              ter[0]=100;
              break;
            case 120:
              printf("      \n英镑暂收款:");
              s_type[0]=106;
              cu_type[0]='P';
              ter[0]=100;
              break;
            case 121:
              printf("      \n英镑暂付款:");
              s_type[0]=107;
              cu_type[0]='P';
              ter[0]=100;
              break;
            case 122:
              printf("      \n英镑应付利息:");
              s_type[0]=108;
              cu_type[0]='P';
              ter[0]=100;
              break;
            case 123:
              printf("      \n英镑往来收支:");
              s_type[0]=109;
              cu_type[0]='P';
              ter[0]=100;
              break;
            case 124:
              printf("      \n英镑营业收支:");
              s_type[0]=110;
              cu_type[0]='P';
              ter[0]=100;