[loadOriginal]
select fnc_load_basv0230(:s_id, :nyukin_no)

[updateOriginal]
select fnc_update_basv0230(:s_id)

[doDelete]
select fnc_delete_basv0230(:nyukin_no, ':login_id')

[getMaxDenNo]
select
  (select max(den_no) from m_saiban where saiban_kbn = 5) as last_den_no

[getUriDen]
select
  w.tok_cd
, w.tok_nm
--, w.zeikomi_gaku as jucyu_gaku
--, w.uri_gaku1 as uri_gaku
--, w.uri_gaku2 as kon_uri_gaku
--, COALESCE(w.zeikomi_gaku,0) - COALESCE(w.uri_gaku1,0) - COALESCE(w.uri_gaku2,0) as jucyu_zan
, (case when(w.jucyu_flg = 1)then(w.zeikomi_gaku)else(null)end) as jucyu_gaku
, (case when(w.jucyu_flg = 1)then(w.uri_gaku1)else(null)end) as uri_gaku
, (case when(w.jucyu_flg = 1)then(w.uri_gaku2)else(null)end) as kon_uri_gaku
, (case when(w.jucyu_flg = 1)then(COALESCE(w.zeikomi_gaku,0) - COALESCE(w.uri_gaku1,0) - COALESCE(w.uri_gaku2,0))else(null)end) as jucyu_zan
--, COALESCE(w.uri_gaku1,0) + COALESCE(w.uri_gaku2,0) as seikyu_gaku
, (case when(w.jucyu_flg = 1)then(COALESCE(w.uri_gaku1,0) + COALESCE(w.uri_gaku2,0))else(w.zeikomi_gaku)end) as seikyu_gaku
, w.nyu_gaku1 as maeuke_gaku
, w.nyu_gaku2 as keshi_gaku
, (case when(w.jucyu_flg = 1)then(COALESCE(w.uri_gaku1,0) + COALESCE(w.uri_gaku2,0))else(w.zeikomi_gaku)end) - COALESCE(w.nyu_gaku1,0) - COALESCE(w.nyu_gaku2,0) as seikyu_zan
from (
select uh.tok_cd, uh.tok_nm, uh.zeikomi_gaku
--, COALESCE(nk.keshi_gaku,0) as keshi_gaku
--, COALESCE(uh.zeikomi_gaku,0) - COALESCE(nk.keshi_gaku,0) as seikyu_zan
, uh.jucyu_flg
, uri.uri_gaku1
, uri.uri_gaku2
, nk.nyu_gaku1
, nk.nyu_gaku2
from v_jucyu_no v
inner join t_uri uh on (uh.den_no = v.keiyaku_no)
inner join t_uri uh2 on (uh2.den_no = v.den_no)
left join (
	select v.keiyaku_no
	, sum((case when(nk.den_no != :uri_no)then(nk.zeikomi_gaku)else(0)end)) as uri_gaku1
	, sum((case when(nk.den_no = :uri_no)then(nk.zeikomi_gaku)else(0)end)) as uri_gaku2
	from t_uri nk
	inner join v_jucyu_no v on (v.den_no = nk.den_no)
	where nk.jucyu_flg = 0
	and nk.jucyu_no in (select keiyaku_no from v_jucyu_no where den_no = :uri_no)
	group by v.keiyaku_no
) uri on (uri.keiyaku_no = v.keiyaku_no)
left join (
	select v.keiyaku_no, sum(nk.nyukin_gaku) as keshi_gaku
	, sum(case when(jh.jucyu_flg = 1 and nk.uri_no = v.keiyaku_no)then(nk.nyukin_gaku)else(0)end) as nyu_gaku1
	, sum(case when(jh.jucyu_flg = 1 and nk.uri_no = v.keiyaku_no)then(0)else(nk.nyukin_gaku)end) as nyu_gaku2
	from t_nyu_keshi nk
	inner join v_jucyu_no v on (v.den_no = nk.uri_no)
	inner join t_uri jh on (jh.den_no = v.keiyaku_no)
	where v.keiyaku_no in (select keiyaku_no from v_jucyu_no where den_no = :uri_no)
	and nk.nyukin_no != fnc_to_number(':w_nyukin_no')
	group by v.keiyaku_no
) nk on (nk.keiyaku_no = v.keiyaku_no)
where v.den_no = :uri_no
) w


[load_grdList_den]
select nk.uri_no, nk.nyukin_no, n.nyukin_ymd, n.total_gaku
, uh.jucyu_flg
, (case when(uh.jucyu_flg = 1)then('��')else('����')end) as ju_uri
from t_nyu_keshi nk
inner join t_nyukin n on (n.nyukin_no = nk.nyukin_no)
inner join v_jucyu_no v on (v.den_no = nk.uri_no)
inner join t_uri uh on (uh.den_no = nk.uri_no)
where v.keiyaku_no in (select keiyaku_no from v_jucyu_no where den_no = :uri_no)
and nk.nyukin_no != fnc_to_number(':w_nyukin_no')
order by nyukin_no

[checkAutoRegisted]
select nk.keshi_no
from t_nyu_keshi nk
inner join t_uri uh on (uh.den_no = nk.uri_no)
where nk.nyukin_no = :nyukin_no
and uh.cash_flg = 1




[__load_grdList_den]
select k.nyukin_no, n.nyukin_ymd, n.total_gaku
from t_nyu_keshi k
inner join t_nyukin n on (n.nyukin_no = k.nyukin_no)
where k.uri_no = :uri_no
and k.nyukin_no != fnc_to_number(':w_nyukin_no')
order by k.nyukin_no

[__getUriDen]
select uh.tok_cd, uh.tok_nm, uh.zeikomi_gaku as seikyu_gaku
, COALESCE(nk.keshi_gaku,0) as keshi_gaku
, COALESCE(uh.zeikomi_gaku,0) - COALESCE(nk.keshi_gaku,0) as seikyu_zan
from v_jucyu_no v
inner join t_uri uh on (uh.den_no = v.keiyaku_no)
left join (
	select v.keiyaku_no, sum(nk.nyukin_gaku) as keshi_gaku
	from t_nyu_keshi nk
	inner join v_jucyu_no v on (v.den_no = nk.uri_no)
	where v.keiyaku_no in (select keiyaku_no from v_jucyu_no where den_no = :uri_no)
	and nk.nyukin_no != fnc_to_number(':w_nyukin_no')
	group by v.keiyaku_no
) nk on (nk.keiyaku_no = v.keiyaku_no)
where v.den_no = :uri_no