运维I-17692，计算罚息应收金额时减掉已收，避免部分核销罚息导致多收钱

src/main/webapp/WEB-INF/classes/csh/CSH531N/csh_con_contract_cashflow.lwm

@@ -19,7 +19,7 @@
                                    CON_OVERDUE_PENALTY_PKG.CALC_PENALTY_FOR_WRITE_OFF(p_cashflow_id=>t.cashflow_id,
                                                                                       p_calc_date=>decode(nvl(${@deposit_flag},'N'),'Y',sysdate,to_date(${@transaction_date}, 'yyyy-mm-dd')),
                                                                                       p_user_id=>${/session/@user_id},
-                                                                                      p_penalty_flag=>'Y'),
+                                                                                      p_penalty_flag=>'Y')-nvl(t.received_amount,0),
                                    due_amount)                     due_amount,
                             principal,
                             interest,

src/main/webapp/WEB-INF/classes/csh/CSH531N/csh_write_off_interface.lwm

@@ -119,9 +119,9 @@ end;
         <bm:field name="interest" expression="(select interest from con_contract_cashflow where cashflow_id = t1.write_off_cashflow_id)" />
         <bm:field name="due_amount" expression="(select decode(cf_item, 9,
                                       CON_OVERDUE_PENALTY_PKG.CALC_PENALTY_FOR_WRITE_OFF(p_cashflow_id=> cashflow_id,
-                                                                                         p_calc_date=>to_date(${@transaction_date}, 'yyyy-mm-dd'),
+                                                                                         p_calc_date=>decode(${@trx_transaction_type},'DEPOSIT',sysdate,to_date(${@transaction_date}, 'yyyy-mm-dd')),
                                                                                          p_user_id=>${/session/@user_id},
-                                                                                         p_penalty_flag=>'Y'),
+                                                                                         p_penalty_flag=>'Y')-nvl(received_amount,0),
                                       due_amount) from con_contract_cashflow where cashflow_id = t1.write_off_cashflow_id)" />
         <bm:field name="payment_deduction" expression="(select payment_deduction from con_contract c where c.contract_id = t1.contract_id)" forInsert="false" forUpdate="false"/>
     </bm:fields>

src/main/webapp/modules/csh/CSH531N/csh_write_off_interface.lview

@@ -786,7 +786,7 @@
             </a:dataSet>
             <a:dataSet id="csh_write_off_interface_ds" autoQuery="true" fetchAll="true"
                        model="csh.CSH531N.csh_write_off_interface"
-                       queryUrl="${/request/@context_path}/autocrud/csh.CSH531N.csh_write_off_interface/query?trx_interface_id=${/parameter/@transaction_id}&amp;transaction_date=${/parameter/@transaction_date}"
+                       queryUrl="${/request/@context_path}/autocrud/csh.CSH531N.csh_write_off_interface/query?trx_interface_id=${/parameter/@transaction_id}&amp;trx_transaction_type=${/parameter/@transaction_type}&amp;transaction_date=${/parameter/@transaction_date}"
                        selectable="true">
                 <a:fields>
                     <a:field name="company_id" defaultValue="${/parameter/@company_id}"/>