--水分No取得 [lDBSearchNomoist] select max(NO_MOIST) NO_MOIST from T_SHIP_PRODUCT -- where DTS_SHIP_PRODUCT_YEAR = '&1' where DT_SHIP_PRODUCT >= to_date( '&1'||'0401' ,'yyyymmdd') and DT_SHIP_PRODUCT <= to_date( ('&1'+1)||'0331' ,'yyyymmdd') --風乾取引重量算定区分の取得 [lDBSearchDivWeightDried] select DIV_WEIGHT_DRIED --2003.5.19 start 水分率丸め率の取得 konishi ,RATE_MOIST --2003.5.19 end 水分率丸め率の取得 konishi from M_DERIVERY where CD_DERIVERY = '&1' and CD_CUSTOMER = '&2' and DT_START <= '&3' and DT_END >= '&3' --同日水分率の平均値の取得 [lDBSearchAvgRatio_moist] select avg(RATIO_MOIST) RATIO_MOIST from T_DERIVERY_PRODUCT where DT_DERIVERY_PRODUCT = to_date('&1','yyyymmdd') --2003.5.21 konishi start (出荷済みかどうかの確認） [lDBShip_Chek] select DT_DERIVERY_PRODUCT, NO_PALLET, DIV_SHIP from T_DERIVERY_PRODUCT --2014.04.08 M.Inoue start where DT_DERIVERY_PRODUCT= to_date('&2','yyyy/mm/dd') --where DT_DERIVERY_PRODUCT= to_date('&2','yyyymmdd') --2014.04.08 M.Inoue end and NO_PALLET = '&1' --2003.5.21 konishi end (出荷済みかどうかの確認） --出荷記録明細画面表示 [lDBSearchhistory] --2014.04.08 M.Inoue 日付編集訂正 start --select to_char(DT_SHIP_PRODUCT,'yyyymmdd') DT_SHIP_PRODUCT -- , to_char(DT_DUE_ARRIVAL,'yyyymmdd') DT_DUE_ARRIVAL select to_char(DT_SHIP_PRODUCT,'yyyy/mm/dd') DT_SHIP_PRODUCT , to_char(DT_DUE_ARRIVAL,'yyyy/mm/dd') DT_DUE_ARRIVAL --2014.04.08 M.Inoue 日付編集訂正 end , NO_MOIST , NAME_CUSTOMER , NAME_DERIVERY , NAME_PRODUCT -- 2014.02.05 M.Inoue 倉庫対応 start , NAME_WAREHOUSE -- 2014.02.05 M.Inoue 倉庫対応 end , DIV_WEIGHT_DRIED , NAME_GREAD , NO_SHIP_PRODUCT_SLIP , NO_SALE from T_SHIP_PRODUCT TSP --#24303 2022.06.17 MOD STT -- , M_GREAD MG -- ,(select CD_CUSTOMER, NAME_CUSTOMER,DT_START, DT_END -- from M_CUSTOMER -- where FLG_DELETE = 0) MC -- ,(select CD_DERIVERY,CD_CUSTOMER,DIV_WEIGHT_DRIED ,NAME_DERIVERY,DT_START, DT_END -- from M_DERIVERY -- where FLG_DELETE = 0 ) MD -- ,(select CD_PRODUCT,CD_GREAD, NAME_PRODUCT,DT_START, DT_END -- from M_PRODUCT -- where FLG_DELETE = 0 )MP ---- 2014.02.05 M.Inoue 倉庫対応 start -- ,(select CD_WAREHOUSE, NAME_WAREHOUSE -- from M_WAREHOUSE -- where FLG_DELETE = 0 )MW ---- 2014.02.05 M.Inoue 倉庫対応 end left join M_GREAD MG on ( TSP.CD_GREAD_SEND = MG.CD_GRADE ) left join (select CD_CUSTOMER, NAME_CUSTOMER,DT_START, DT_END from M_CUSTOMER where FLG_DELETE = 0) MC on ( TSP.CD_CUSTOMER_SEND = MC.CD_CUSTOMER and MC.DT_START <= TSP.DT_SHIP_PRODUCT and MC.DT_END >= TSP.DT_SHIP_PRODUCT ) left join (select CD_DERIVERY,CD_CUSTOMER,DIV_WEIGHT_DRIED ,NAME_DERIVERY,DT_START, DT_END from M_DERIVERY where FLG_DELETE = 0 ) MD on ( TSP.CD_CUSTOMER_SEND = MD.CD_CUSTOMER and TSP.CD_DERIVERY_SEND = MD.CD_DERIVERY and MD.DT_START <= TSP.DT_SHIP_PRODUCT and MD.DT_END >= TSP.DT_SHIP_PRODUCT ) left join (select CD_PRODUCT,CD_GREAD, NAME_PRODUCT,DT_START, DT_END from M_PRODUCT where FLG_DELETE = 0 )MP on ( TSP.CD_PRODUCT_SEND = MP.CD_PRODUCT and MP.DT_START <= TSP.DT_SHIP_PRODUCT and MP.DT_END >= TSP.DT_SHIP_PRODUCT ) -- 2014.02.05 M.Inoue 倉庫対応 start left join (select CD_WAREHOUSE, NAME_WAREHOUSE from M_WAREHOUSE where FLG_DELETE = 0 )MW on ( TSP.CD_WAREHOUSE = MW.CD_WAREHOUSE ) -- 2014.02.05 M.Inoue 倉庫対応 end --#24303 2022.06.17 MOD END /* from T_SHIP_PRODUCT TSP , M_CUSTOMER MC , M_DERIVERY MD , M_GREAD MG , M_PRODUCT MP */ --#24428 2022.6.17 MOD STT -- where TSP.DTS_SHIP_PRODUCT_YEAR = &1 ---- 2014.03.10 tsujimoto 検索追加対応 start ---- and TSP.DTS_SHIP_PRODUCT_MONTH = '&2' -- and (( &2 is null ) or (TSP.DTS_SHIP_PRODUCT_MONTH = &2)) ---- 2014.03.10 tsujimoto 検索追加対応 end ---- 2014.02.05 M.Inoue 倉庫対応 start -- and ((&3 is null) or (TSP.DTS_SHIP_PRODUCT_DAY = &3)) where TSP.DTS_SHIP_PRODUCT_YEAR = '&1' and (( &2 is null ) or (TSP.DTS_SHIP_PRODUCT_MONTH = '&2')) and ((&3 is null) or (TSP.DTS_SHIP_PRODUCT_DAY = '&3')) --#24428 2022.6.17 MOD END -- and (( '&3' is null ) or (TSP.NO_SHIP_PRODUCT_SLIP = '&3')) and TSP.FLG_DELETE = 0 --#24303 2022.06.17 MOD STT -- and TSP.CD_CUSTOMER_SEND = MC.CD_CUSTOMER(+) -- and TSP.CD_CUSTOMER_SEND = MD.CD_CUSTOMER(+) -- and TSP.CD_DERIVERY_SEND = MD.CD_DERIVERY(+) -- and TSP.CD_PRODUCT_SEND = MP.CD_PRODUCT(+) ---- 2014.02.05 M.Inoue 倉庫対応 start -- and TSP.CD_WAREHOUSE = MW.CD_WAREHOUSE(+) ---- 2014.02.05 M.Inoue 倉庫対応 end -- and TSP.CD_GREAD_SEND = MG.CD_GRADE(+) --#24303 2022.06.17 MOD END -- and MC.DT_START <= TSP.DT_SHIP_PRODUCT -- and MC.DT_END >= TSP.DT_SHIP_PRODUCT -- and MD.DT_START <= TSP.DT_SHIP_PRODUCT -- and MD.DT_END >= TSP.DT_SHIP_PRODUCT -- and MP.DT_START <= TSP.DT_SHIP_PRODUCT -- and MP.DT_END >= TSP.DT_SHIP_PRODUCT -- and MC.FLG_DELETE = 0 -- and MD.FLG_DELETE = 0 -- and MP.FLG_DELETE = 0 -- 2014.03.10 tsujimoto 検索追加対応 start and (( &5 is null ) or (TSP.CD_CUSTOMER = &5)) and (( &6 is null ) or (TSP.CD_DERIVERY = &6)) and (( &7 is null ) or (TSP.CD_PRODUCT = &7)) -- 2014.03.10 tsujimoto 検索追加対応 end group by DT_SHIP_PRODUCT , DT_DUE_ARRIVAL , NO_MOIST , NAME_CUSTOMER , NAME_DERIVERY , NAME_PRODUCT -- 2014.02.05 M.Inoue 倉庫対応 start , NAME_WAREHOUSE -- 2014.02.05 M.Inoue 倉庫対応 end , DIV_WEIGHT_DRIED , NAME_GREAD , NO_SHIP_PRODUCT_SLIP , NO_SALE order by DT_SHIP_PRODUCT desc , DT_DUE_ARRIVAL desc , NO_MOIST desc -- 出荷明細取得（修正、削除） [lDBSelecthistory] select TSP.NO_SHIP_PRODUCT_SLIP ,to_char(TSP.DT_SHIP_PRODUCT,'yyyymmdd') DT_SHIP_PRODUCT ,TSP.DTS_SHIP_PRODUCT_YEAR ,TSP.DTS_SHIP_PRODUCT_MONTH ,TSP.DTS_SHIP_PRODUCT_DAY --2014.04.08 日付型編集訂正 start ,to_char(TSP.DT_DERIVERY_PRODUCT,'yyyy/mm/dd') DT_DERIVERY_PRODUCT --,to_char(TSP.DT_DERIVERY_PRODUCT,'yyyymmdd') DT_DERIVERY_PRODUCT --2014.04.08 日付型編集訂正 end ,TSP.DTS_DERIVERY_PRODUCT_YEAR ,TSP.DTS_DERIVERY_PRODUCT_MONTH ,TSP.DTS_DERIVERY_PRODUCT_DAY ,to_char(TSP.DT_DUE_ARRIVAL,'yyyymmdd') DT_DUE_ARRIVAL ,TSP.NO_MOIST ,TSP.CD_CUSTOMER_SEND ,TSP.CD_DERIVERY_SEND ,CD_PRODUCT_SEND ,CD_GREAD_SEND ,TSP.CD_CUSTOMER ,MC.NAME_CUSTOMER ,TSP.CD_DERIVERY ,MD.NAME_DERIVERY ,MD2.DIV_WEIGHT_DRIED ,MD2.RATE_MOIST ,TSP.CD_PRODUCT ,MP.NAME_PRODUCT -- 2014.02.05 M.Inoue 倉庫対応 start ,TSP.CD_WAREHOUSE ,MW.NAME_WAREHOUSE -- 2014.02.05 M.Inoue 倉庫対応 end ,TSP.CD_GREAD ,MG.NAME_GREAD ,MG.AVE_MOIST ,TSP.CD_TRANSPORT ,TSP.CD_TRUCK ,TSP.NO_PALLET ,TSP.WEIGHT_MOIST ,TSP.RATIO_MOIST ,TSP.WEIGHT_DRY -- ,round(((TSP.WEIGHT_MOIST) * (100 - (TSP.RATIO_MOIST)) * 10 / 9 * (1 / 100)) , 2) WEIGHT_DRY ,TO_CHAR(TDP.TM_FINISHED, 'HH24:MI') TM_FINISHED ,TDP.NOTE --2004.03.10 konishi add 特記事項項目変更 start , TDP.NOTE_KEIKOU , TDP.NOTE_ZANPORI , TDP.NOTE_IROBUTU --2004.03.10 konishi add 特記事項項目変更 end ,TPSTOC.UNIT_PRICE_STOCK ,TSP.NO_SALE ,TSP.DT_REGIST ,TSP.ID_REGIST --2014.02.10 FCS対応 start ,TSP.FLG_FCS --2014.02.10 FCS対応 end from T_SHIP_PRODUCT TSP --#24303 2022.06.17 MOD STT -- ,(select CD_CUSTOMER, NAME_CUSTOMER,DT_START, DT_END -- from M_CUSTOMER -- where FLG_DELETE = 0) MC -- ,(select CD_DERIVERY,CD_CUSTOMER,NAME_DERIVERY,DT_START, DT_END -- from M_DERIVERY -- where FLG_DELETE = 0 ) MD -- ,(select CD_DERIVERY,CD_CUSTOMER,DIV_WEIGHT_DRIED ,RATE_MOIST ,NAME_DERIVERY,DT_START, DT_END -- from M_DERIVERY -- where FLG_DELETE = 0 ) MD2 -- , M_GREAD MG -- ,(select CD_PRODUCT,CD_GREAD, NAME_PRODUCT,DT_START, DT_END -- from M_PRODUCT -- where FLG_DELETE = 0 )MP -- ,T_DERIVERY_PRODUCT TDP -- ,(select DTS_YM, CD_CUSTOMER, CD_DERIVERY, CD_PRODUCT, CD_GREAD, CD_WAREHOUSE, UNIT_PRICE_STOCK -- from T_PRODUCT_STOCK -- where FLG_DELETE = 0 ) TPSTOC -- ---- 2014.02.05 M.Inoue 倉庫対応 start -- ,(select CD_WAREHOUSE, NAME_WAREHOUSE -- from M_WAREHOUSE -- where FLG_DELETE = 0) MW ---- 2014.02.05 M.Inoue 倉庫対応 end left join (select CD_CUSTOMER, NAME_CUSTOMER,DT_START, DT_END from M_CUSTOMER where FLG_DELETE = 0) MC on ( TSP.CD_CUSTOMER = MC.CD_CUSTOMER and MC.DT_START <= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') and MC.DT_END >= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') ) left join (select CD_DERIVERY,CD_CUSTOMER,NAME_DERIVERY,DT_START, DT_END from M_DERIVERY where FLG_DELETE = 0 ) MD on ( TSP.CD_CUSTOMER = MD.CD_CUSTOMER and TSP.CD_DERIVERY = MD.CD_DERIVERY and MD.DT_START <= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') and MD.DT_END >= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') ) left join (select CD_DERIVERY,CD_CUSTOMER,DIV_WEIGHT_DRIED ,RATE_MOIST ,NAME_DERIVERY,DT_START, DT_END from M_DERIVERY where FLG_DELETE = 0 ) MD2 on ( TSP.CD_CUSTOMER_SEND = MD2.CD_CUSTOMER and TSP.CD_DERIVERY_SEND = MD2.CD_DERIVERY and MD2.DT_START <= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') and MD2.DT_END >= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') ) left join M_GREAD MG on ( TSP.CD_GREAD = MG.CD_GRADE ) left join (select CD_PRODUCT,CD_GREAD, NAME_PRODUCT,DT_START, DT_END from M_PRODUCT where FLG_DELETE = 0 )MP on ( TSP.CD_PRODUCT = MP.CD_PRODUCT and MP.DT_START <= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') and MP.DT_END >= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') ) left join T_DERIVERY_PRODUCT TDP on ( TSP.DT_DERIVERY_PRODUCT = TDP.DT_DERIVERY_PRODUCT and TSP.NO_PALLET = TDP.NO_PALLET and TDP.FLG_DELETE = 0 ) left join (select DTS_YM, CD_CUSTOMER, CD_DERIVERY, CD_PRODUCT, CD_GREAD, CD_WAREHOUSE, UNIT_PRICE_STOCK from T_PRODUCT_STOCK where FLG_DELETE = 0 ) TPSTOC on ( TSP.CD_CUSTOMER = TPSTOC.CD_CUSTOMER and TSP.CD_DERIVERY = TPSTOC.CD_DERIVERY and TSP.CD_PRODUCT = TPSTOC.CD_PRODUCT and TSP.CD_GREAD = TPSTOC.CD_GREAD and TSP.CD_WAREHOUSE = TPSTOC.CD_WAREHOUSE and to_char(TSP.DT_SHIP_PRODUCT,'YYYYMM') = TPSTOC.DTS_YM ) left join (select CD_WAREHOUSE, NAME_WAREHOUSE from M_WAREHOUSE where FLG_DELETE = 0) MW on ( TSP.CD_WAREHOUSE = MW.CD_WAREHOUSE ) --#24303 2022.06.17 MOD END -- ,M_CUSTOMER MC -- ,M_DERIVERY MD -- ,M_DERIVERY MD2 -- ,M_GREAD MG -- ,M_PRODUCT MP -- ,T_DERIVERY_PRODUCT TDP -- ,T_PRODUCT_STOCK TPSTOC --2014.04.08 M.Inoue 日付編集訂正 start --where TSP.DT_SHIP_PRODUCT = to_date( '&1','yyyymmdd' ) --and TSP.DT_DUE_ARRIVAL = to_date( '&2','yyyymmdd' ) where TSP.DT_SHIP_PRODUCT = to_date( '&1','yyyy/mm/dd' ) and TSP.DT_DUE_ARRIVAL = to_date( '&2','yyyy/mm/dd' ) --2014.04.08 M.Inoue 日付編集訂正 start and TSP.NO_SHIP_PRODUCT_SLIP = '&3' and TSP.NO_MOIST = '&4' and TSP.FLG_DELETE = 0 --#24303 2022.06.17 MOD STT -- and TSP.CD_CUSTOMER = MC.CD_CUSTOMER(+) -- and TSP.CD_CUSTOMER = MD.CD_CUSTOMER(+) -- and TSP.CD_DERIVERY = MD.CD_DERIVERY(+) -- and TSP.CD_CUSTOMER_SEND = MD2.CD_CUSTOMER(+) -- and TSP.CD_DERIVERY_SEND = MD2.CD_DERIVERY(+) -- and TSP.CD_PRODUCT = MP.CD_PRODUCT(+) -- and TSP.CD_GREAD = MG.CD_GRADE(+) -- 2014.02.05 M.Inoue 倉庫対応 start -- and TSP.CD_WAREHOUSE = MW.CD_WAREHOUSE(+) -- 2014.02.05 M.Inoue 倉庫対応 end -- and MC.DT_START <= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') -- and MC.DT_END >= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') -- and MD.DT_START <= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') -- and MD.DT_END >= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') -- and MD2.DT_START <= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') -- and MD2.DT_END >= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') -- and MP.DT_START <= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') -- and MP.DT_END >= TSP.DT_SHIP_PRODUCT --to_date( '&1' ,'yyyy/mm/dd') -- and MC.FLG_DELETE = 0 -- and MD.FLG_DELETE = 0 -- and MD2.FLG_DELETE = 0 -- and MP.FLG_DELETE = 0 -- and TSP.DT_DERIVERY_PRODUCT = TDP.DT_DERIVERY_PRODUCT(+) -- and TSP.NO_PALLET = TDP.NO_PALLET(+) -- M.Tsujinka 2003/06/11 Add 削除ﾌﾗｸﾞの追加 Start -- and TDP.FLG_DELETE = 0 -- M.Tsujinka 2003/06/11 Add 削除ﾌﾗｸﾞの追加 Start -- -- and TSP.CD_CUSTOMER = TPSTOC.CD_CUSTOMER(+) -- -- and TSP.CD_DERIVERY = TPSTOC.CD_DERIVERY(+) -- -- and TSP.CD_PRODUCT = TPSTOC.CD_PRODUCT(+) -- -- and TSP.CD_GREAD = TPSTOC.CD_GREAD(+) -- ---- 2014.02.05 M.Inoue 倉庫対応 start -- and TSP.CD_WAREHOUSE = TPSTOC.CD_WAREHOUSE(+) ---- 2014.02.05 M.Inoue 倉庫対応 end -- ---- and TPSTOC.FLG_DELETE = 0 -- and to_char(TSP.DT_SHIP_PRODUCT,'YYYYMM') = TPSTOC.DTS_YM (+) --#24303 2022.06.17 MOD END group by TSP.NO_SHIP_PRODUCT_SLIP ,TSP.DT_SHIP_PRODUCT ,TSP.DTS_SHIP_PRODUCT_YEAR ,TSP.DTS_SHIP_PRODUCT_MONTH ,TSP.DTS_SHIP_PRODUCT_DAY ,TSP.DT_DERIVERY_PRODUCT ,TSP.DTS_DERIVERY_PRODUCT_YEAR ,TSP.DTS_DERIVERY_PRODUCT_MONTH ,TSP.DTS_DERIVERY_PRODUCT_DAY ,TSP.DT_DUE_ARRIVAL ,TSP.NO_MOIST ,TSP.CD_CUSTOMER_SEND ,TSP.CD_DERIVERY_SEND ,CD_PRODUCT_SEND ,CD_GREAD_SEND ,TSP.CD_CUSTOMER ,MC.NAME_CUSTOMER ,TSP.CD_DERIVERY ,MD.NAME_DERIVERY ,MD2.DIV_WEIGHT_DRIED ,MD2.RATE_MOIST --2014.02.05 M.Inoue 倉庫対応 start ,TSP.CD_WAREHOUSE ,MW.NAME_WAREHOUSE --2014.02.05 M.Inoue 倉庫対応 end ,TSP.CD_PRODUCT ,MP.NAME_PRODUCT ,TSP.CD_GREAD ,MG.NAME_GREAD ,MG.AVE_MOIST ,TSP.CD_TRANSPORT ,TSP.CD_TRUCK ,TSP.NO_PALLET ,TSP.WEIGHT_MOIST ,TSP.RATIO_MOIST ,TSP.WEIGHT_DRY ,TDP.TM_FINISHED ,TDP.NOTE --2004.03.10 konishi add 特記事項項目変更 start , TDP.NOTE_KEIKOU , TDP.NOTE_ZANPORI , TDP.NOTE_IROBUTU --2004.03.10 konishi add 特記事項項目変更 end ,TPSTOC.UNIT_PRICE_STOCK ,TSP.NO_SALE ,TSP.DT_REGIST ,TSP.ID_REGIST --2014.02.10 FCS対応 start ,TSP.FLG_FCS --2014.02.10 FCS対応 end --2014.06.09 M.Inoue start -- order by TSP.DT_SHIP_PRODUCT,TSP.NO_PALLET order by TSP.DT_DERIVERY_PRODUCT, TSP.NO_PALLET --2014.06.09 M.Inoue end --製品在庫データ取得 [lDBSearchStock] select TDP.DTS_YEAR ,TDP.DTS_MONTH ,TDP.DTS_DAY --2014.04.08 M.Inoue start --,to_char(TDP.DT_DERIVERY_PRODUCT,'yyyymmdd') DT_DERIVERY_PRODUCT ,to_char(TDP.DT_DERIVERY_PRODUCT,'yyyy/mm/dd') DT_DERIVERY_PRODUCT --2014.04.08 M.Inoue end ,TDP.NO_PALLET ,TDP.CD_CUSTOMER ,MC.NAME_CUSTOMER ,TDP.CD_DERIVERY ,MD.NAME_DERIVERY ,MD.DIV_WEIGHT_DRIED ,TDP.CD_PRODUCT ,MP.NAME_PRODUCT --2014.02.05 M.Inoue 倉庫対応 start ,TDP.CD_WAREHOUSE ,MW.NAME_WAREHOUSE --2014.02.05 M.Inoue 倉庫対応 start ,TDP.WEIGHT_MOIST ,TDP.RATIO_MOIST ,TDP.DIV_INSPECT ,TDP.WEIGHT_DRY -- ,round(((TDP.WEIGHT_MOIST) * (100 - (TDP.RATIO_MOIST)) * 10 / 9 * (1 / 100)) , 2) WEIGHT_DRY ,TO_CHAR(TM_FINISHED, 'HH24:MI') TM_FINISHED ,TDP.NOTE --2004.03.10 konishi add 特記事項項目変更 start , TDP.NOTE_KEIKOU , TDP.NOTE_ZANPORI , TDP.NOTE_IROBUTU --2004.03.10 konishi add 特記事項項目変更 end --2014.03.10 tsujimoto add 特記事項項目変更、追加 start , TDP.NOTE_KYOUZATSU , TDP.NOTE_ARUMI , TDP.NOTE_SHIROBOTSU --2014.03.10 tsujimoto add 特記事項項目変更、追加 end ,TPSTOC.UNIT_PRICE_STOCK ,TDP.CD_GREAD ,MG.NAME_GREAD from T_DERIVERY_PRODUCT TDP --#24303 2022.06.17 MOD STT -- ,M_CUSTOMER MC -- ,M_DERIVERY MD -- ,M_PRODUCT MP -- ,M_GREAD MG ----2014.02.05 M.Inoue 倉庫対応 start -- ,M_WAREHOUSE MW ----2014.02.05 M.Inoue 倉庫対応 end -- ,T_PRODUCT_STOCK TPSTOC left join M_CUSTOMER MC on ( TDP.CD_CUSTOMER = MC.CD_CUSTOMER and MC.DT_START <= TDP.DT_DERIVERY_PRODUCT --to_date( '&3' ,'yyyy/mm/dd') and MC.DT_END >= TDP.DT_DERIVERY_PRODUCT --to_date( '&3' ,'yyyy/mm/dd') ) left join M_DERIVERY MD on ( TDP.CD_DERIVERY = MD.CD_DERIVERY and MD.DT_START <= TDP.DT_DERIVERY_PRODUCT --to_date( '&3' ,'yyyy/mm/dd') and MD.DT_END >= TDP.DT_DERIVERY_PRODUCT --to_date( '&3' ,'yyyy/mm/dd') ) left join M_PRODUCT MP on ( TDP.CD_PRODUCT = MP.CD_PRODUCT and MP.DT_START <= TDP.DT_DERIVERY_PRODUCT --to_date( '&3' ,'yyyy/mm/dd') and MP.DT_END >= TDP.DT_DERIVERY_PRODUCT --to_date( '&3' ,'yyyy/mm/dd') ) left join M_GREAD MG on ( TDP.CD_GREAD = MG.CD_GRADE ) left join M_WAREHOUSE MW on ( TDP.CD_WAREHOUSE = MW.CD_WAREHOUSE ) left join T_PRODUCT_STOCK TPSTOC on ( TDP.CD_CUSTOMER = TPSTOC.CD_CUSTOMER and TDP.CD_DERIVERY = TPSTOC.CD_DERIVERY and TDP.CD_PRODUCT = TPSTOC.CD_PRODUCT and TDP.CD_GREAD = TPSTOC.CD_GREAD and TDP.CD_WAREHOUSE = TPSTOC.CD_WAREHOUSE and to_char(TDP.DT_DERIVERY_PRODUCT,'YYYYMM') = TPSTOC.DTS_YM ) --#24303 2022.06.17 MOD END where --TDP.DT_DERIVERY_PRODUCT >= to_date( '&2' ,'yyyy/mm/dd') -- and TDP.DT_DERIVERY_PRODUCT <= to_date( '&3' ,'yyyy/mm/dd') --2003.5.20 konishi start (検品区分関係なくすべてのものを出荷OKに変更のため） -- and TDP.DIV_INSPECT <> 0 --2003.5.20 konishi end (検品区分関係なくすべてのものを出荷OKに変更のため） -- and TDP.DIV_SHIP = 0 and TDP.FLG_DELETE = 0 --#24303 2022.06.17 MOD STT -- and TDP.CD_CUSTOMER = MC.CD_CUSTOMER(+) -- and TDP.CD_DERIVERY = MD.CD_DERIVERY(+) -- and TDP.CD_PRODUCT = MP.CD_PRODUCT(+) -- and TDP.CD_GREAD = MG.CD_GRADE(+) --2014.02.05 M.Inoue 倉庫対応 start -- and TDP.CD_WAREHOUSE = MW.CD_WAREHOUSE(+) --2014.02.05 M.Inoue 倉庫対応 end -- and MC.DT_START <= TDP.DT_DERIVERY_PRODUCT --to_date( '&3' ,'yyyy/mm/dd') -- and MC.DT_END >= TDP.DT_DERIVERY_PRODUCT --to_date( '&3' ,'yyyy/mm/dd') -- and MD.DT_START <= TDP.DT_DERIVERY_PRODUCT --to_date( '&3' ,'yyyy/mm/dd') -- and MD.DT_END >= TDP.DT_DERIVERY_PRODUCT --to_date( '&3' ,'yyyy/mm/dd') -- and MP.DT_START <= TDP.DT_DERIVERY_PRODUCT --to_date( '&3' ,'yyyy/mm/dd') -- and MP.DT_END >= TDP.DT_DERIVERY_PRODUCT --to_date( '&3' ,'yyyy/mm/dd') -- and TDP.CD_CUSTOMER = TPSTOC.CD_CUSTOMER(+) -- and TDP.CD_DERIVERY = TPSTOC.CD_DERIVERY(+) -- and TDP.CD_PRODUCT = TPSTOC.CD_PRODUCT(+) -- and TDP.CD_GREAD = TPSTOC.CD_GREAD(+) ----2014.02.05 M.Inoue 倉庫対応 start -- and TDP.CD_WAREHOUSE = TPSTOC.CD_WAREHOUSE(+) ----2014.02.05 M.Inoue 倉庫対応 end -- and to_char(TDP.DT_DERIVERY_PRODUCT,'YYYYMM') = TPSTOC.DTS_YM (+) --and TPSTOC.DTS_YM = '&4' --#24303 2022.06.17 MOD END order by TDP.DT_DERIVERY_PRODUCT,TDP.NO_PALLET --製品払出データ登録 [lDBInsertShip] insert into T_SHIP_PRODUCT( NO_SHIP_PRODUCT_SLIP --製品払出登録No ,NO_LINE --連番 ,NO_MOIST --水分Ｎｏ ,CD_TRANSPORT --運送会社コード ,CD_TRUCK --車番コード ,NO_PALLET --パレットNo ,CD_CUSTOMER_SEND --あて先得意先コード ,CD_DERIVERY_SEND --あて先納品先コード ,CD_PRODUCT_SEND --あて先製品コード ,CD_GREAD_SEND --あて先グレードコード ,CD_CUSTOMER --得意先コード ,CD_DERIVERY --納品先コード ,CD_PRODUCT --製品コード ,CD_GREAD --グレードコード ,WEIGHT_MOIST --含水重量 ,RATIO_MOIST --水分率 ,WEIGHT_DRY --風乾重量 ,WEIGHT_DRY_DISP --表示用風乾重量 ,UNIT_COST_PRODUCT --原単価 ,MONEY_COST_PRODUCT --原価 ,DIV_TRANSPORT --運送タイプ区分 ,DT_SHIP_PRODUCT --払出日付 ,DTS_SHIP_PRODUCT_YEAR --払出年 ,DTS_SHIP_PRODUCT_MONTH --払出月 ,DTS_SHIP_PRODUCT_DAY --払出日 ,DT_DERIVERY_PRODUCT --製造日付 ,DTS_DERIVERY_PRODUCT_YEAR --製造年 ,DTS_DERIVERY_PRODUCT_MONTH --製造月 ,DTS_DERIVERY_PRODUCT_DAY --製造日 ,DT_DUE_ARRIVAL --到着予定日付 ,FLG_DELETE --削除フラグ ,ID_REGIST --登録端末ＩＤ ,DT_REGIST --登録日 --2003.5.19 (ﾌｨｰﾙﾄﾞ追加)　konishi start ,RATIO_MOIST_DISP --表示用水分率 --2003.5.19 (ﾌｨｰﾙﾄﾞ追加)　konishi end --2014.02.05 M.Inoue 倉庫対応 start ,CD_WAREHOUSE --倉庫コード ,FLG_FCS --FCSフラグ --2014.02.05 M.Inoue 倉庫対応 start )values( '&1' --製品払出登録No , '&2' --連番 , '&3' --水分Ｎｏ , '&4' --運送会社コード --#24438 2022.06.18 MOD STT -- , '&5' --車番コード , to_number('&5') --車番コード --#24438 2022.06.18 MOD END , '&6' --パレットNo , '&7' --あて先得意先コード , '&8' --あて先納品先コード , '&31' --あて先製品コード , '&32' --あて先グレードコード , '&9' --得意先コード , '&10' --納品先コード , '&11' --製品コード , '&12' --グレードコード , '&13' --含水重量 , to_number('&14') --水分率 , '&15' --風乾重量 , '&16' --表示用風乾重量 , '&17' --原単価 , '&18' --原価 , null --運送タイプ区分 , to_date( '&19' ,'yyyymmdd') --払出日付 , '&20' --払出年 , '&21' --払出月 , '&22' --払出日 , to_date( '&23' ,'yyyy/mm/dd') --製造日付 , '&24' --製造年 , '&25' --製造月 , '&26' --製造日 , to_date( '&27','yyyymmdd') --到着予定日付 , 0 --削除フラグ , '&28' --登録端末ＩＤ , to_timestamp(to_char(now(),'yyyymmddhh24:mi:ss'),'yyyymmddhh24:mi:ss')--登録日 -- , now() --登録日 --2003.5.19 (ﾌｨｰﾙﾄﾞ追加)　konishi start ,'&33' --表示用水分率 --2003.5.19 (ﾌｨｰﾙﾄﾞ追加)　konishi end --2014.02.05 M.Inoue 倉庫対応 start , '&34' --倉庫コード --#24438 2022.06.18 MOD STT -- , '&35' --FCSフラグ , to_number('&35') --FCSフラグ --#24438 2022.06.18 MOD END --2014.02.05 M.Inoue 倉庫対応 start ) --製品払出データ修正(削除処理) [lDBUpdateShip] update T_SHIP_PRODUCT set FLG_DELETE = 1 -- 削除フラグ , ID_DELETE = '&28' -- 削除端末ＩＤ , DT_DELETE = to_timestamp(to_char(now(),'yyyymmddhh24:mi:ss'),'yyyymmddhh24:mi:ss') -- 修正日 -- , DT_DELETE = now() -- 修正日 where NO_SHIP_PRODUCT_SLIP = '&1' -- 製品払出登録No --製品払出データ修正登録 [lDBUpdateInsShip] insert into T_SHIP_PRODUCT( NO_SHIP_PRODUCT_SLIP --製品払出登録No ,NO_LINE --連番 ,NO_MOIST --水分Ｎｏ ,CD_TRANSPORT --運送会社コード ,CD_TRUCK --車番コード ,NO_PALLET --パレットNo ,CD_CUSTOMER_SEND --あて先得意先コード ,CD_DERIVERY_SEND --あて先納品先コード ,CD_PRODUCT_SEND --あて先製品コード ,CD_GREAD_SEND --あて先グレードコード ,CD_CUSTOMER --得意先コード ,CD_DERIVERY --納品先コード ,CD_PRODUCT --製品コード ,CD_GREAD --グレードコード ,WEIGHT_MOIST --含水重量 ,RATIO_MOIST --水分率 ,WEIGHT_DRY --風乾重量 --2003.5.19 (ﾌｨｰﾙﾄﾞ追加)　konishi start ,RATIO_MOIST_DISP --表示用水分率 --2003.5.19 (ﾌｨｰﾙﾄﾞ追加)　konishi end ,WEIGHT_DRY_DISP --表示用風乾重量 ,UNIT_COST_PRODUCT --原単価 ,MONEY_COST_PRODUCT --原価 ,DIV_TRANSPORT --運送タイプ区分 ,DT_SHIP_PRODUCT --払出日付 ,DTS_SHIP_PRODUCT_YEAR --払出年 ,DTS_SHIP_PRODUCT_MONTH --払出月 ,DTS_SHIP_PRODUCT_DAY --払出日 ,DT_DERIVERY_PRODUCT --製造日付 ,DTS_DERIVERY_PRODUCT_YEAR --製造年 ,DTS_DERIVERY_PRODUCT_MONTH --製造月 ,DTS_DERIVERY_PRODUCT_DAY --製造日 ,DT_DUE_ARRIVAL --到着予定日付 ,FLG_DELETE --削除フラグ ,ID_REGIST --登録端末ＩＤ ,DT_REGIST --登録日 ,ID_UPDATE --修正ID ,DT_UPDATE --修正日 --2014.02.05 M.Inoue 倉庫対応 start ,CD_WAREHOUSE --倉庫コード ,FLG_FCS --2014.02.05 M.Inoue 倉庫対応 end )values( '&1' --製品払出登録No , '&2' --連番 , '&3' --水分Ｎｏ , '&4' --運送会社コード --#24438 2022.06.18 MOD STT -- , '&5' --車番コード , to_number('&5') --車番コード --#24438 2022.06.18 MOD END , '&6' --パレットNo , '&7' --あて先得意先コード , '&8' --あて先納品先コード , '&31' --あて先製品コード , '&32' --あて先グレードコード , '&9' --得意先コード , '&10' --納品先コード , '&11' --製品コード , '&12' --グレードコード , '&13' --含水重量 , to_number('&14') --水分率 , '&15' --風乾重量 --2003.5.19 (ﾌｨｰﾙﾄﾞ追加)　konishi start , '&33' --表示用水分率 --2003.5.19 (ﾌｨｰﾙﾄﾞ追加)　konishi　end , '&16' --表示用風乾重量 --#24438 2022.06.18 MOD STT -- , '&17' --原単価 , to_number('&17') --原単価 --#24438 2022.06.18 MOD END , '&18' --原価 , null --運送タイプ区分 , to_date( '&19' ,'yyyymmdd') --払出日付 , '&20' --払出年 , '&21' --払出月 , '&22' --払出日 , to_date( '&23' ,'yyyy/mm/dd') --製造日付 , '&24' --製造年 , '&25' --製造月 , '&26' --製造日 , to_date( '&27','yyyy/mm/dd') --到着予定日付 , 0 --削除フラグ , '&29' --登録端末ＩＤ , to_timestamp('&30','yyyy/mm/dd HH24:MI:SS') --登録日 , '&28' --修正端末ＩＤ , to_timestamp(to_char(now(),'yyyymmddhh24:mi:ss'),'yyyymmddhh24:mi:ss') --修正日 -- , now() --修正日 --2014.02.05 M.Inoue 倉庫対応 start , '&34' --倉庫コード --#24438 2022.06.18 MOD STT -- , '&35' --FCSフラグ , to_number('&35') --FCSフラグ --#24438 2022.06.18 MOD END --2014.02.05 M.Inoue 倉庫対応 end ) -- update T_SHIP_PRODUCT set -- NO_SHIP_PRODUCT_SLIP = '&1' --製品払出登録No -- ,NO_LINE = '&2' --連番 -- ,NO_MOIST = '&3' --水分Ｎｏ -- ,CD_TRANSPORT = '&4' --運送会社コード -- ,CD_TRUCK = '&5' --車番コード -- ,NO_PALLET = '&6' --パレットNo -- ,CD_CUSTOMER_SEND = '&7' --あて先得意先コード -- ,CD_DERIVERY_SEND = '&8' --あて先納品先コード -- ,CD_PRODUCT_SEND = '&30' --あて先得意先コード -- ,CD_GREAD_SEND = '&31' --あて先納品先コード -- ,CD_CUSTOMER = '&9' --得意先コード -- ,CD_DERIVERY = '&10' --納品先コード -- ,CD_PRODUCT = '&11' --製品コード -- ,CD_GREAD = '&12' --グレードコード -- ,WEIGHT_MOIST = '&13' --含水重量 -- ,RATIO_MOIST = '&14' --水分率 -- ,WEIGHT_DRY = '&15' --風乾重量 -- ,WEIGHT_DRY_DISP = '&16' --表示用風乾重量 -- ,UNIT_COST_PRODUCT = '&17' --原単価 -- ,MONEY_COST_PRODUCT = '&18' --原価 -- ,DIV_TRANSPORT = null --運送タイプ区分 -- ,DT_SHIP_PRODUCT = to_date( '&19' ,'yyyymmdd') --払出日付 -- ,DTS_SHIP_PRODUCT_YEAR = '&20' --払出年 -- ,DTS_SHIP_PRODUCT_MONTH = '&21' --払出月 -- ,DTS_SHIP_PRODUCT_DAY = '&22' --払出日 -- ,DT_DERIVERY_PRODUCT = to_date( '&23' ,'yyyy/mm/dd') --製造日付 -- ,DTS_DERIVERY_PRODUCT_YEAR = '&24' --製造年 -- ,DTS_DERIVERY_PRODUCT_MONTH = '&25' --製造月 -- ,DTS_DERIVERY_PRODUCT_DAY = '&26' --製造日 -- ,DT_DUE_ARRIVAL = to_date( '&27','yyyymmdd') --到着予定日付 -- ,FLG_DELETE = 1 --削除フラグ -- ,ID_REGIST = '&29' --登録端末ＩＤ -- ,DT_REGIST = to_date('&30','yyyy/mm/dd HH24:MI:SS') --登録日 -- ,ID_UPDATE = '&28' --修正端末ＩＤ -- ,DT_UPDATE = sysdate --修正日 -- where NO_RECEIVESLIP = &1 --製品払出登録No --製品払出データ削除 [lDBDeleteShip] delete from T_SHIP_PRODUCT where NO_SHIP_PRODUCT_SLIP = '&1' -- 製品払出登録No --製品受入データの更新 [lDBUpdateDerivery] update T_DERIVERY_PRODUCT set DIV_SHIP = 1 ,ID_UPDATE = '&28' ,DT_UPDATE = to_timestamp(to_char(now(),'yyyymmddhh24:mi:ss'),'yyyymmddhh24:mi:ss') -- ,DT_UPDATE = now() where DT_DERIVERY_PRODUCT = to_date( '&23' ,'yyyy/mm/dd') and NO_PALLET = '&6' --製品受入データの更新(削除時出荷済区分を０に戻す） [lDBUpdateDeriveryDelete] update T_DERIVERY_PRODUCT set DIV_SHIP = 0 ,ID_UPDATE = '&28' ,DT_UPDATE = to_timestamp(to_char(now(),'yyyymmddhh24:mi:ss'),'yyyymmddhh24:mi:ss') -- ,DT_UPDATE = now() where DT_DERIVERY_PRODUCT = to_date( '&23' ,'yyyy/mm/dd') and NO_PALLET = '&6' --製品在庫データ更新処理 [lsaveExecProcsProductStock] --#24439 2022.06.18 MOD STT --declare begin NSP_PacMain.changeShipProduct( '&1', &2, &3 );end; select changeShipProduct( '&1', &2, &3 ) --#24439 2022.06.18 MOD END