SELECT "LNLOANTYPE"."LOANTYPE_DESC",
"LNCONTMASTER"."LOANAPPROVE_AMT",
"LNCONTMASTER"."PRINCIPAL_BALANCE",
"LNCONTMASTER"."WITHDRAWABLE_AMT",
"MBUCFPRENAME"."PRENAME_DESC",
"MBMEMBMASTER"."MEMB_NAME",
"MBMEMBMASTER"."MEMB_SURNAME",
"LNCONTMASTER"."LOANTYPE_CODE",
"LNLOANTYPE"."PREFIX",
"MBMEMBMASTER"."MEMBER_TYPE",
"LNCONTMASTER"."CONTLAW_STATUS",
"LNREQCONTADJUST"."COOP_ID",
"LNREQCONTADJUST"."CONTADJUST_DOCNO",
"LNREQCONTADJUST"."MEMCOOP_ID",
"LNREQCONTADJUST"."MEMBER_NO",
"LNREQCONTADJUST"."CONCOOP_ID",
"LNREQCONTADJUST"."LOANCONTRACT_NO",
"LNREQCONTADJUST"."CONTADJUST_DATE",
"LNREQCONTADJUST"."CONTADJUST_STATUS",
"LNREQCONTADJUST"."ENTRY_ID",
"LNREQCONTADJUST"."ENTRY_DATE",
"LNREQCONTADJUST"."ENTRY_BYCOOPID" ,
"LNCONTMASTER".EXPIRECONT_DATE
FROM "LNREQCONTADJUST",
"LNCONTMASTER",
"MBMEMBMASTER",
"MBUCFPRENAME",
"LNLOANTYPE"
WHERE ( "LNCONTMASTER"."MEMBER_NO" = "MBMEMBMASTER"."MEMBER_NO" ) and
( "MBUCFPRENAME"."PRENAME_CODE" = "MBMEMBMASTER"."PRENAME_CODE" ) and
( "LNCONTMASTER"."LOANTYPE_CODE" = "LNLOANTYPE"."LOANTYPE_CODE" ) and
( "LNREQCONTADJUST"."LOANCONTRACT_NO" = "LNCONTMASTER"."LOANCONTRACT_NO" ) and
( "LNCONTMASTER"."COOP_ID" = "LNLOANTYPE"."COOP_ID" ) and
( "LNCONTMASTER"."MEMCOOP_ID" = "MBMEMBMASTER"."COOP_ID" ) and
( "LNREQCONTADJUST"."CONCOOP_ID" = "LNCONTMASTER"."COOP_ID" )
DELETE FROM "LNREQCONTADJUSTDET" WHERE (("COOP_ID" = :Original_COOP_ID) AND ("CONTADJUST_DOCNO" = :Original_CONTADJUST_DOCNO) AND ("CONTADJUST_CODE" = :Original_CONTADJUST_CODE))
INSERT INTO "LNREQCONTADJUSTDET" ("COOP_ID", "CONTADJUST_DOCNO", "CONTADJUST_CODE", "LOANPAYMENT_TYPE", "PERIOD_PAYAMT", "PERIOD_PAYMENT", "PERIOD_PAYMENT_MAX", "PAYMENT_STATUS", "OLDPAYMENT_TYPE", "OLDPERIOD_PAYAMT", "OLDPERIOD_PAYMENT", "OLDPERIOD_PAYMAX", "OLDPAYMENT_STATUS", "INT_CONTINTTYPE", "INT_CONTINTRATE", "INT_CONTINTTABCODE", "INT_CONTINTINCREASE", "INT_INTSTEPTYPE", "OLDINT_CONTINTTYPE", "OLDINT_CONTINTRATE", "OLDINT_CONTINTTABCODE", "OLDINT_CONTINTINCREASE", "OLDINT_INTSTEPTYPE", "LOANPAY_CODE", "LOANPAY_BANK", "LOANPAY_BRANCH", "LOANPAY_ACCID", "OLDLOANPAY_CODE", "OLDLOANPAY_BANK", "OLDLOANPAY_BRANCH", "OLDLOANPAY_ACCID") VALUES (:COOP_ID, :CONTADJUST_DOCNO, :CONTADJUST_CODE, :LOANPAYMENT_TYPE, :PERIOD_PAYAMT, :PERIOD_PAYMENT, :PERIOD_PAYMENT_MAX, :PAYMENT_STATUS, :OLDPAYMENT_TYPE, :OLDPERIOD_PAYAMT, :OLDPERIOD_PAYMENT, :OLDPERIOD_PAYMAX, :OLDPAYMENT_STATUS, :INT_CONTINTTYPE, :INT_CONTINTRATE, :INT_CONTINTTABCODE, :INT_CONTINTINCREASE, :INT_INTSTEPTYPE, :OLDINT_CONTINTTYPE, :OLDINT_CONTINTRATE, :OLDINT_CONTINTTABCODE, :p1, :OLDINT_INTSTEPTYPE, :LOANPAY_CODE, :LOANPAY_BANK, :LOANPAY_BRANCH, :LOANPAY_ACCID, :OLDLOANPAY_CODE, :OLDLOANPAY_BANK, :OLDLOANPAY_BRANCH, :OLDLOANPAY_ACCID)
SELECT "LNREQCONTADJUSTDET"."COOP_ID",
"LNREQCONTADJUSTDET"."CONTADJUST_DOCNO",
"LNREQCONTADJUSTDET"."CONTADJUST_CODE",
"LNREQCONTADJUSTDET"."LOANPAYMENT_TYPE",
"LNREQCONTADJUSTDET"."PERIOD_PAYAMT",
"LNREQCONTADJUSTDET"."PERIOD_PAYMENT",
"LNREQCONTADJUSTDET"."PERIOD_PAYMENT_MAX",
"LNREQCONTADJUSTDET"."PAYMENT_STATUS",
"LNREQCONTADJUSTDET"."OLDPAYMENT_TYPE",
"LNREQCONTADJUSTDET"."OLDPERIOD_PAYAMT",
"LNREQCONTADJUSTDET"."OLDPERIOD_PAYMENT",
"LNREQCONTADJUSTDET"."OLDPERIOD_PAYMAX",
"LNREQCONTADJUSTDET"."OLDPAYMENT_STATUS",
"LNREQCONTADJUSTDET"."INT_CONTINTTYPE",
"LNREQCONTADJUSTDET"."INT_CONTINTRATE",
"LNREQCONTADJUSTDET"."INT_CONTINTTABCODE",
"LNREQCONTADJUSTDET"."INT_CONTINTINCREASE",
"LNREQCONTADJUSTDET"."INT_INTSTEPTYPE",
"LNREQCONTADJUSTDET"."OLDINT_CONTINTTYPE",
"LNREQCONTADJUSTDET"."OLDINT_CONTINTRATE",
"LNREQCONTADJUSTDET"."OLDINT_CONTINTTABCODE",
"LNREQCONTADJUSTDET"."OLDINT_CONTINTINCREASE",
"LNREQCONTADJUSTDET"."OLDINT_INTSTEPTYPE",
"LNREQCONTADJUSTDET"."LOANPAY_CODE",
"LNREQCONTADJUSTDET"."LOANPAY_BANK",
"LNREQCONTADJUSTDET"."LOANPAY_BRANCH",
"LNREQCONTADJUSTDET"."LOANPAY_ACCID",
"LNREQCONTADJUSTDET"."OLDLOANPAY_CODE",
"LNREQCONTADJUSTDET"."OLDLOANPAY_BANK",
"LNREQCONTADJUSTDET"."OLDLOANPAY_BRANCH",
"LNREQCONTADJUSTDET"."OLDLOANPAY_ACCID"
FROM "LNREQCONTADJUSTDET"
UPDATE "LNREQCONTADJUSTDET" SET "COOP_ID" = :COOP_ID, "CONTADJUST_DOCNO" = :CONTADJUST_DOCNO, "CONTADJUST_CODE" = :CONTADJUST_CODE, "LOANPAYMENT_TYPE" = :LOANPAYMENT_TYPE, "PERIOD_PAYAMT" = :PERIOD_PAYAMT, "PERIOD_PAYMENT" = :PERIOD_PAYMENT, "PERIOD_PAYMENT_MAX" = :PERIOD_PAYMENT_MAX, "PAYMENT_STATUS" = :PAYMENT_STATUS, "OLDPAYMENT_TYPE" = :OLDPAYMENT_TYPE, "OLDPERIOD_PAYAMT" = :OLDPERIOD_PAYAMT, "OLDPERIOD_PAYMENT" = :OLDPERIOD_PAYMENT, "OLDPERIOD_PAYMAX" = :OLDPERIOD_PAYMAX, "OLDPAYMENT_STATUS" = :OLDPAYMENT_STATUS, "INT_CONTINTTYPE" = :INT_CONTINTTYPE, "INT_CONTINTRATE" = :INT_CONTINTRATE, "INT_CONTINTTABCODE" = :INT_CONTINTTABCODE, "INT_CONTINTINCREASE" = :INT_CONTINTINCREASE, "INT_INTSTEPTYPE" = :INT_INTSTEPTYPE, "OLDINT_CONTINTTYPE" = :OLDINT_CONTINTTYPE, "OLDINT_CONTINTRATE" = :OLDINT_CONTINTRATE, "OLDINT_CONTINTTABCODE" = :OLDINT_CONTINTTABCODE, "OLDINT_CONTINTINCREASE" = :p1, "OLDINT_INTSTEPTYPE" = :OLDINT_INTSTEPTYPE, "LOANPAY_CODE" = :LOANPAY_CODE, "LOANPAY_BANK" = :LOANPAY_BANK, "LOANPAY_BRANCH" = :LOANPAY_BRANCH, "LOANPAY_ACCID" = :LOANPAY_ACCID, "OLDLOANPAY_CODE" = :OLDLOANPAY_CODE, "OLDLOANPAY_BANK" = :OLDLOANPAY_BANK, "OLDLOANPAY_BRANCH" = :OLDLOANPAY_BRANCH, "OLDLOANPAY_ACCID" = :OLDLOANPAY_ACCID WHERE (("COOP_ID" = :Original_COOP_ID) AND ("CONTADJUST_DOCNO" = :Original_CONTADJUST_DOCNO) AND ("CONTADJUST_CODE" = :Original_CONTADJUST_CODE))
DELETE FROM "LNREQCONTADJUSTINTSPC" WHERE (("COOP_ID" = :Original_COOP_ID) AND ("CONTADJUST_DOCNO" = :Original_CONTADJUST_DOCNO) AND ("CONTADJUST_TYPE" = :Original_CONTADJUST_TYPE) AND ("SEQ_NO" = :Original_SEQ_NO))
INSERT INTO "LNREQCONTADJUSTINTSPC" ("COOP_ID", "CONTADJUST_DOCNO", "CONTADJUST_TYPE", "SEQ_NO", "EFFECTIVE_DATE", "INT_CONTINTTYPE", "INT_CONTINTRATE", "INT_CONTINTTABCODE", "INT_CONTINTINCREASE", "INT_TIMETYPE", "INT_TIMEAMT") VALUES (:COOP_ID, :CONTADJUST_DOCNO, :CONTADJUST_TYPE, :SEQ_NO, :EFFECTIVE_DATE, :INT_CONTINTTYPE, :INT_CONTINTRATE, :INT_CONTINTTABCODE, :INT_CONTINTINCREASE, :INT_TIMETYPE, :INT_TIMEAMT)
SELECT "LNREQCONTADJUSTINTSPC"."COOP_ID",
"LNREQCONTADJUSTINTSPC"."CONTADJUST_DOCNO",
"LNREQCONTADJUSTINTSPC"."CONTADJUST_TYPE",
"LNREQCONTADJUSTINTSPC"."SEQ_NO",
"LNREQCONTADJUSTINTSPC"."EFFECTIVE_DATE",
"LNREQCONTADJUSTINTSPC"."INT_CONTINTTYPE",
"LNREQCONTADJUSTINTSPC"."INT_CONTINTRATE",
"LNREQCONTADJUSTINTSPC"."INT_CONTINTTABCODE",
"LNREQCONTADJUSTINTSPC"."INT_CONTINTINCREASE",
"LNREQCONTADJUSTINTSPC"."INT_TIMETYPE",
"LNREQCONTADJUSTINTSPC"."INT_TIMEAMT"
FROM "LNREQCONTADJUSTINTSPC"
UPDATE "LNREQCONTADJUSTINTSPC" SET "COOP_ID" = :COOP_ID, "CONTADJUST_DOCNO" = :CONTADJUST_DOCNO, "CONTADJUST_TYPE" = :CONTADJUST_TYPE, "SEQ_NO" = :SEQ_NO, "EFFECTIVE_DATE" = :EFFECTIVE_DATE, "INT_CONTINTTYPE" = :INT_CONTINTTYPE, "INT_CONTINTRATE" = :INT_CONTINTRATE, "INT_CONTINTTABCODE" = :INT_CONTINTTABCODE, "INT_CONTINTINCREASE" = :INT_CONTINTINCREASE, "INT_TIMETYPE" = :INT_TIMETYPE, "INT_TIMEAMT" = :INT_TIMEAMT WHERE (("COOP_ID" = :Original_COOP_ID) AND ("CONTADJUST_DOCNO" = :Original_CONTADJUST_DOCNO) AND ("CONTADJUST_TYPE" = :Original_CONTADJUST_TYPE) AND ("SEQ_NO" = :Original_SEQ_NO))