SELECT '@sid@', @jobno@, 仮売.仮売上番号, 仮売.仮売上行番号, to_char(仮売.受注番号) || ( case when (仮売.受注行番号 = 1 or 仮売.受注行番号 is null) then '' else '-' || to_char(仮売.受注行番号) end ) 受注伝票番号, 仮売.受注形態区分, ATOM.JCOM0320C.FNC_GET_項目辞書('受注形態区分',仮売.受注形態区分,NULL,0) 受注形態区分名, 仮売.仮売上日付, DECODE(メカ.諸口区分, 1, 仮売.メーカ名, NVL(メカ.社内用メーカ名, メカ.メーカ名)) メーカ名, 仮売.メーカ品番, 仮売.仮売上数量, 0 売上数量, 単位.単位名 単位名, DECODE(商品.諸口区分, 1, 仮売.商品名, 商品.商品名) 商品名, DECODE(商品.諸口区分, 1, 仮売.規格, 商品.規格) 規格, 仮売.商品コード, 詳入.JANコード, 仮詳.ロット, 仮詳.シリアル, 仮詳.有効期限, DECODE(需要.諸口区分, 1, 仮売.需要先名, NVL(需要.社内用得意先名,需要.得意先名)) 需要先名, 0 頁番号, 0 行番号, 仮売.仮売上情報_ID FROM ATOM.仮売上情報 仮売, ATOM.商品マスタ 商品, ATOM.得意先マスタ 需要, ATOM.メーカマスタ メカ, ATOM.単位マスタ 単位, ATOM.仮売上詳細情報 仮詳, ATOM.商品入数マスタ 詳入 WHERE 仮売.商品コード = 商品.商品コード(+) AND 仮売.需要先コード = 需要.得意先コード(+) AND 仮売.メーカコード = メカ.メーカコード(+) AND 仮売.単位コード = 単位.単位コード(+) AND 仮売.仮売上情報_ID = 仮詳.仮売上情報_ID(+) AND 仮詳.商品コード = 詳入.商品コード(+) AND 仮詳.仮売上詳細ランク = 詳入.入数ランク(+) AND 仮売.事業所コード = @souko@ AND 仮売.需要先コード = @jyuyousaki@ AND 仮売.仮売上日付 <= to_date('@uridate@') AND DECODE(商品.諸口区分, 1, 仮売.商品名, 商品.商品名) like '%@hinmei@%' AND 仮売.受注形態区分 = @jucyuukeitai@ AND 仮売.メーカ品番 like '%@hinban@%' AND DECODE(商品.諸口区分, 1, 仮売.規格, 商品.規格) like '%@kikaku@%' AND (仮詳.ロット like '%@lotno@%' or 仮詳.シリアル like '%@lotno@%') AND 仮詳.仮売上情報_ID IS NOT NULL -- AND 詳細.有効期限 <= to_date() --to_date('@ubddate@') AND 仮売.実績用担当者コード = @tantousya@ AND 詳入.JANコード like '%@jancode@%' AND DECODE(メカ.諸口区分, 1, 仮売.メーカ名, NVL(メカ.社内用メーカ名, メカ.メーカ名)) like '%@maker@%' -- AND (商品.ロット管理必要区分 = 1 OR 商拡.滅菌期限管理区分 = 1 OR 商拡.シリアルNO管理区分 = 1) ;