早上STO单紧急寻源处理

truncate table SAP_SO_STO1_STO2;

truncate table SAP_STO1_STO2;

INSERT INTO STG.SAP_SO_STO1_STO2(VBELN, POSNR, ZZPOSNR, STO1_NO, STO1_LINE_NO, STO2_NO, STO2_LINE_NO)

SELECT VBELN, POSNR, ZZPOSNR, EBELN_IMAGE, EBELP_IMAGE, EBELN, EBELP FROM SAPSR3.ZTSD_002@SAP_SEP

INSERT INTO STG.SAP_STO1_STO2(STO1_NO, STO1_LINE_NO, STO2_NO, STO2_LINE_NO)

SELECT EBELN_IMAGE,EBELP_IMAGE,EBELN,EBELP FROM SAPSR3.ZTSD_004@SAP_SEP;

select * from SAPSR3.ZTSD_008_1@SAP_SEP where ebeln='';

SELECT * FROM SAP_STO1_STO2 WHERE STO1_NO=''; --STO1_NO='4700005411'

select * from SAP_SO_STO1_STO2 WHERE STO1_NO='';

select * from  SEINEEBS.FP_SALE_REQ_LINES_RPY@EC where ERP_SO_ID='';

INSERT INTO SEINEEBS.FP_SALE_REQ_LINES_RPY@EC(SO_LINE_ID,

ERP_SO_ID,

ERP_SO_LINE_ID,

SEQ,

QUANTITY,

PRO_DATE,

ITEM_ID,

SITEID,

FP_DATE)

SELECT --ZS.EBELN||'_'||LTRIM(SUBSTR(ZS.POSNR,1,6),'0')||'_'||LTRIM(ZS.ETENR,'0'),

B.STO1_NO||'_'||LTRIM(SUBSTR(B.STO1_LINE_NO,1,6),'')||'_'||LTRIM(ZS.ETENR,''),

b.STO1_NO,

LTRIM(SUBSTR(B.STO1_LINE_NO,1,6),''),

TO_NUMBER(LTRIM(ZS.ETENR,'')),

ZS.WMENG,

TO_DATE(SUBSTR(ZS.EDATU,1,4)||'-'||SUBSTR(ZS.EDATU,5,2)||'-'||SUBSTR(ZS.EDATU,7,2),'YYYY-MM-DD'),

LTRIM(ZS.MATNR,''),

ZS.WERKS,

SYSDATE

FROM SAPSR3.ZTSD_008_1@SAP_SEP ZS

join SAP_STO1_STO2 B on ZS.ebeln=B.STO2_NO   and  LTRIM (ZS.EBELP_STO, '')=  LTRIM (B.STO2_LINE_NO, '')

 WHERE EBELN IN ('');--STO2NO

SELECT --ZS.EBELN||'_'||LTRIM(SUBSTR(ZS.POSNR,1,6),'0')||'_'||LTRIM(ZS.ETENR,'0'),

B.STO1_NO||'_'||LTRIM(SUBSTR(B.STO1_LINE_NO,1,6),'')||'_'||LTRIM(ZS.ETENR,'') ,

b.STO1_NO,

LTRIM(SUBSTR(B.STO1_LINE_NO,1,6),''),

TO_NUMBER(LTRIM(ZS.ETENR,'')),

ZS.WMENG,

A.PROMISED_MAT_AVAILDATE,

--TO_DATE(SUBSTR(ZS.EDATU,1,4)||'-'||SUBSTR(ZS.EDATU,5,2)||'-'||SUBSTR(ZS.EDATU,7,2),'YYYY-MM-DD'),

LTRIM(ZS.MATNR,''),

ZS.WERKS,

SYSDATE

FROM SAPSR3.ZTSD_008_1@SAP_SEP ZS

join SAP_STO1_STO2 B on ZS.ebeln=B.STO2_NO   and  LTRIM (ZS.EBELP_STO, '')=  LTRIM (B.STO2_LINE_NO, '')

join V_OUT_SHIPMENT_PLAN A on A.SO_ID=B.STO2_NO  AND LTRIM (B.STO2_LINE_NO, '')=SUBSTR (A.SO_LINE_ID, 1,INSTR (A.SO_LINE_ID, '_') - 1)

  where TRIM(B.STO1_NO) IS NOT NULL

 --WHERE ZS.EBELN='4700005541'--STO2NO

INSERT INTO SEINEEBS.FP_SALE_REQ_LINES_RPY@EC(SO_LINE_ID,

ERP_SO_ID,

ERP_SO_LINE_ID,

SEQ,

QUANTITY,

PRO_DATE,

ITEM_ID,

SITEID,

FP_DATE)

SELECT --ZS.EBELN||'_'||LTRIM(SUBSTR(ZS.POSNR,1,6),'0')||'_'||LTRIM(ZS.ETENR,'0'),

B.STO1_NO||'_'||LTRIM(SUBSTR(B.STO1_LINE_NO,1,6),'')||'_'||LTRIM(ZS.ETENR,''),

b.STO1_NO,

LTRIM(SUBSTR(B.STO1_LINE_NO,1,6),''),

TO_NUMBER(LTRIM(ZS.ETENR,'')),

ZS.WMENG,

TO_DATE(SUBSTR(ZS.EDATU,1,4)||'-'||SUBSTR(ZS.EDATU,5,2)||'-'||SUBSTR(ZS.EDATU,7,2),'YYYY-MM-DD'),

LTRIM(ZS.MATNR,''),

ZS.WERKS,

SYSDATE

FROM SAPSR3.ZTSD_008_1@SAP_SEP ZS

join SAP_SO_STO1_STO2 B on ZS.ebeln=B.STO2_NO   and  LTRIM (ZS.EBELP_STO, '')=  LTRIM (B.STO2_LINE_NO, '')

 WHERE ZS.ebeln=''--STO2NO

 UPDATE SAPSR3.ZTSD_008_1@SAP_SEP ZS SET  zstate='S' where  EBELN IN ('');