ORACLE INSERT文を教えて下さい

質問

いつもお世話になっております。

以下のような処理を実現したいのですが、どうしてもいい方法が見つかりません。
実現するINSERT文を教えて頂けないでしょうか？
よろしくお願いいたします
ー処理ー
TBL_Aを１レコードづつ読み込み、グループ情報のあるVIEWよりview_GRPCD取得し、TBL_Bへ出力する。
但し、グループ情報には、以下のように同一TENCDに対して複数のグループがヒットする為、日付の降順、
グループコードの降順で一番最初にヒットしたレコードのGRPCDを採用する。

【TBL_A】
│TENCD │SYOCD │URIAGE│
┼───┼───┼───┼
│10100 │ 0100 │1,000 │
│10200 │ 0100 │2,000 │
│10300 │ 0300 │3,000 │
│22200 │ 0200 │2,200 │

【View】
│NO│GRPCD │TENCD │ YMD │
┼─┼───┼───┼───┼
│01│ 010 │10100 │02/01 │
│02│ 010 │10200 │02/01 │
│03│ 010 │10300 │02/01 │
│04│ 020 │10200 │01/01 │
│05│ 030 │10100 │05/01 │→TENCD:10100はこれを採用
│06│ 030 │10300 │03/01 │→TENCD:10300はこれを採用
│07│ 040 │10100 │03/01 │
│08│ 040 │10200 │03/01 │→TENCD:10200はこれを採用
│09│ 040 │10300 │03/01 │
│10│ 050 │10400 │05/01 │

下記のほうに記載しているＳＱＬで作成されるTBL_Bは以下のようになります
【TBL_B】(誤り)
│TENCD │GRPCD │SYOCD │URIAGE│
┼───┼───┼───┼───┼
│10100 │ 030 │ 0100 │1,000 │
│10200 │ 040 │ 0100 │2,000 │
│10300 │ 030 │ 0300 │3,000 │

本来TBL_Bは以下のようにView上に存在しないTBL_Aのレコードでも出力させたく
以下のような結果を求めたいと思っています。
【TBL_B】(正解)
│TENCD │GRPCD │SYOCD │URIAGE│
┼───┼───┼───┼───┼
│10100 │ 030 │ 0100 │1,000 │
│10200 │ 010 │ 0100 │2,000 │
│10300 │ 010 │ 0300 │3,000 │
│22200 │ 000 │ 0200 │2,200 │※※※このレコードを作成することが出来ません※※※

※SQLにある「NVL(View_GRPCD,0)」でVIEW上にないレコードの場合、GRPCDにゼロをセットして
　出力できるかと思ったのですが、VIEW上にないレコードは作成されませんでした。
　これを実現する方法を教えて頂きたいと思います。

■TBL_B(誤り)は作成できるＳＱＬ

CURSOR CUR_A IS
SELECT TENCD,SYOCD,SUM(URIAGE) FROM TBL_A GROUP BY TENCD,SYOCD ORDER BY TENCD,SYOCD;

BEGIN
OPEN CUR_A;
LOOP
FETCH CUR_1 INTO w_TENCD, w_SYOCD, w_URI;

EXIT WHEN CUR_A%NOTFOUND;

INSERT INTO TBL_B(
SELECT w_TENCD, NVL(View_GRPCD,0), w_SYOCD, w_URI
FROM (SELECT
View_TENCD,View_WRICD,View_GRPCD,
RANK()　OVER(PARTITION BY View_TENCD ORDER BY View_YMD DESC, View_GRPCD DESC) w_RANK
FROM View
WHERE View_TENCD = w_TENCD)
WHERE w_RANK = 1);
END LOOP;
CLOSE CUR_A;

回答No.1

nora1962 · ベストアンサー

検証できる環境が今ないのですが、カーソルを使わず外部結合を使えばいいのではないでしょうか。
SELECT A.ENCD, NVL(View_GRPCD,0), A.SYOCD, A.URI
FROM
(SELECT TENCD,SYOCD,SUM(URIAGE) URI FROM TBL_A GROUP BY TENCD,SYOCD ORDER BY TENCD,SYOCD) A
left join
( select View_TENCD,View_WRICD,View_GRPCD from
(SELECT
View_TENCD,View_WRICD,View_GRPCD,
RANK()　OVER(PARTITION BY View_TENCD ORDER BY View_YMD DESC, View_GRPCD DESC) w_RANK
FROM View )
where w_RANK = 1 ) on View_TENCD = w_TENCD

お礼

nora1962 様

ご回答、ありがとうございます。

そうですね、カーソル必要ないかも（仕様の段階で「カーソルでまわせばいい」と
言われたので、その方法しか無いと思っていました）

頂いたＳＱＬをじっくり適用してみようと思います。
（まだ皆様のようにすぐには理解出来ないので・・・）

いつもありがとうございます。
またよろしくお願いします

回答No.3

yamada_g

>VIEW上にないレコードは作成されませんでした。
とありますが、
>FROM View
>WHERE View_TENCD = w_TENCD
としているので存在しないTENCDのデータは取得できないので当然ですね。

他の回答者様も言っているように、外部結合すれば問題ないと思います。

--全角でインデントしてます。
INSERT INTO TBL_B
SELECT
　A.TENCD,NVL(B.GRPCD,'000'),A.SYOCD,A.URIAGE
FROM
　TBL_A A
　LEFT JOIN (
　　SELECT GRPCD,TENCD
　　FROM (
　　　SELECT
　　　　GRPCD,TENCD
　　　　,ROW_NUMBER() OVER(PARTITION BY TENCD ORDER BY YMD DESC,GRPCD DESC) RNUM
　　　FROM
　　V)
　　WHERE RNUM = 1 ) B
　ON A.TENCD = B.TENCD;

No.2様の考え方と同様ですが、No.2様のそのままのSQLだと内側のサブクエリが期待どおりにならないと思います。
where rownum = 1 の条件はorder by より先に適用されるので
降順で並べた1件目、にはならないはずです。（たまたまなる時もあるかもしれませんが）
select * from (select * from tbl order by ソート条件) where rownum = 1
という風に一旦ソートしたサブクエリを作る必要があります。

お礼

yamada_g 様

ご回答ありがとうございます。
＞where rownum = 1 の条件はorder by より先に適用されるので
この辺りの適用される順番についてあまり理解していなかったので、
今までのロジックも見直してみました。
ご提示頂いたＳＱＬも参考にさせて頂きたいと思います。
いつもありがとうございます。

回答No.2

nda23

１レコードずつ処理しているようですが、１発でできますよ。
先ず、理論の展開を考えると、以下のようになります。
(1)Viewを日付、グループコードの降順でソートしたものの
　先頭１レコードを返すサブクエリ
(2)TBL_Aと上記サブクエリをOUTER JOINしたクエリを
　元にしてTBL_Bに挿入
これを元にＳＱＬを組み立てます.

INSERT INTO TBL_B
SELECT A.TENCD,
DECODE(B.GRPCD,NULL,'000',B.GRPCD) GRPCD,
A.SYOCD,A.URIAGE
FROM TBL_A A
LEFT JOIN (SELECT View_GRPCD GRPCD FROM View
WHERE ROWNUM=1 ORDER BY View_YMD DESC,
View_GRPCD DESC) B
ON A.GRPCD=B.GRPCD

こんな感じですが如何でしょう。

お礼

nda23 様

ご回答、ありがとうございます。

やはり、カーソルにする必要は無いようですね。

頂いたＳＱＬを今回の仕様にじっくり適用してみようと思います。
（まだ皆様のようにすぐには理解出来ないので・・・）

大変ありがとうございました。
またよろしくお願いします