select mbmembmaster.coop_id, mbmembmaster.member_no, mbucfprename.prename_desc, mbmembmaster.memb_name, mbmembmaster.memb_surname, mbmembmaster.member_type from mbmembmaster, mbucfprename where ( mbmembmaster.prename_code = mbucfprename.prename_code ) and ( ( mbmembmaster.coop_id = :as_coopid ) and ( mbmembmaster.member_no = :as_memno ) ) DELETE FROM "LNCONTINTCERTDET" WHERE (("COOP_ID" = :Original_COOP_ID) AND ("LOANCONTRACT_NO" = :Original_LOANCONTRACT_NO)) INSERT INTO "LNCONTINTCERTDET" ("COOP_ID", "LOANCONTRACT_NO", "OBJMAINBUY_FLAG", "OBJMAINRENT_FLAG", "OBJMAINBUILD_FLAG", "OBJMAINREPAY_FLAG", "OBJSUBBUY_CODE", "OBJSUBRENT_CODE", "OBJSUBBUILD_CODE", "OBJSUBREPAY_CODE", "INTCERTOBJ_OVERAMT", "INTADDR_NO", "INTADDR_SOI", "INTADDR_ROAD", "INTADDR_TAMBOL", "INTADDR_AMPHUR", "INTADDR_PROVINCE") VALUES (:COOP_ID, :LOANCONTRACT_NO, :OBJMAINBUY_FLAG, :OBJMAINRENT_FLAG, :OBJMAINBUILD_FLAG, :OBJMAINREPAY_FLAG, :OBJSUBBUY_CODE, :OBJSUBRENT_CODE, :OBJSUBBUILD_CODE, :OBJSUBREPAY_CODE, :INTCERTOBJ_OVERAMT, :INTADDR_NO, :INTADDR_SOI, :INTADDR_ROAD, :INTADDR_TAMBOL, :INTADDR_AMPHUR, :INTADDR_PROVINCE) select coop_id, loancontract_no, objmainbuy_flag, objmainrent_flag, objmainbuild_flag, objmainrepay_flag, objsubbuy_code, objsubrent_code, objsubbuild_code, objsubrepay_code, intcertobj_overamt, intaddr_no, intaddr_soi, intaddr_road, intaddr_tambol, intaddr_amphur, intaddr_province from lncontintcertdet where ( coop_id = :as_coopid ) and ( loancontract_no = :as_contno ) UPDATE "LNCONTINTCERTDET" SET "COOP_ID" = :COOP_ID, "LOANCONTRACT_NO" = :LOANCONTRACT_NO, "OBJMAINBUY_FLAG" = :OBJMAINBUY_FLAG, "OBJMAINRENT_FLAG" = :OBJMAINRENT_FLAG, "OBJMAINBUILD_FLAG" = :OBJMAINBUILD_FLAG, "OBJMAINREPAY_FLAG" = :OBJMAINREPAY_FLAG, "OBJSUBBUY_CODE" = :OBJSUBBUY_CODE, "OBJSUBRENT_CODE" = :OBJSUBRENT_CODE, "OBJSUBBUILD_CODE" = :OBJSUBBUILD_CODE, "OBJSUBREPAY_CODE" = :OBJSUBREPAY_CODE, "INTCERTOBJ_OVERAMT" = :INTCERTOBJ_OVERAMT, "INTADDR_NO" = :INTADDR_NO, "INTADDR_SOI" = :INTADDR_SOI, "INTADDR_ROAD" = :INTADDR_ROAD, "INTADDR_TAMBOL" = :INTADDR_TAMBOL, "INTADDR_AMPHUR" = :INTADDR_AMPHUR, "INTADDR_PROVINCE" = :INTADDR_PROVINCE WHERE (("COOP_ID" = :Original_COOP_ID) AND ("LOANCONTRACT_NO" = :Original_LOANCONTRACT_NO)) select lncontmaster.coop_id, lncontmaster.loancontract_no, lncontmaster. loantype_code, lnloantype. loantype_desc, lncontmaster.startcont_date, lncontmaster.loanapprove_amt, lncontmaster.principal_balance, lncontmaster.lastpayment_date, lncontmaster.intaccum_lastyear, lncontmaster.period_payment from lncontmaster, lnloantype where ( lncontmaster.coop_id = lnloantype.coop_id ) and ( lncontmaster.loantype_code = lnloantype.loantype_code ) and ( ( lncontmaster.coop_id = :as_coopid ) and ( lncontmaster.member_no = :as_memno ) and ( lncontmaster.intcertificate_status = 1 ) )