189 8069 5689
内向交货单VL32N，外向交货单VL02N。以内向交货单为例。
站在用户的角度思考问题，与客户深入沟通，找到上海网站设计与上海网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：成都网站制作、成都网站设计、企业官网、英文网站、手机端网站、网站推广、域名注册、网络空间、企业邮箱。业务覆盖上海地区。
使用VL32N，输入DN号，选择删除
输入DN单，选择删除
这张DN单因为启用了HU，无法直接删除，需要先删除HU
删除HU
2. 再回到第一步进行DN删除，保存DN就删除成功
删除成功，查看该DN单不存在
我在项目上做过类似的。
首先要做的是物料主数据中 找个字段记录一下物料申请人 邮箱
以MIGO为例
首先需要 BASIS做SAP 相应邮件的配置
用Badi：MB_MIGO_BADI增强 interface:POST_DOCUMENT
发邮件FM代码如下
FUNCTION Z02FI_SEND_EMAIL_ALL.
*"----------------------------------------------------------------------
*"*"Local Interface:
*" IMPORTING
*" REFERENCE(I_ADDR) TYPE ADR6-SMTP_ADDR
*" REFERENCE(I_TITLE) TYPE SO_REC_EXT
*" EXPORTING
*" REFERENCE(E_STATUS) TYPE STRING
*" REFERENCE(E_OK) TYPE FLAG
*" TABLES
*" T_BODY STRUCTURE W3HTML
*" T_CCADDR STRUCTURE ZCCADDR OPTIONAL
*"----------------------------------------------------------------------
DATA: LV_TITLE TYPE SO_OBJ_DES,
SEND_REQUEST TYPE REF TO CL_BCS,
DOCUMENT TYPE REF TO CL_DOCUMENT_BCS,
CONLENGTHS TYPE SO_OBJ_LEN,
HTML TYPE STANDARD TABLE OF W3HTML,
WA_HTML TYPE W3HTML,
SENDER_ID TYPE REF TO IF_SENDER_BCS,
RECIPIENT TYPE REF TO IF_RECIPIENT_BCS,
SENT_TO_ALL TYPE OS_BOOLEAN,
BCS_EXCEPTION TYPE REF TO CX_BCS,
BCS_MESSAGE TYPE STRING.
DATA RECIPIENTCC LIKE RECIPIENT.
DATA L_ADDR LIKE I_ADDR.
LV_TITLE = I_TITLE.
WA_HTML-LINE = 'html'.
APPEND WA_HTML TO HTML.
WA_HTML-LINE = 'body'.
APPEND WA_HTML TO HTML.
LOOP AT T_BODY.
WA_HTML-LINE = T_BODY-LINE.
APPEND WA_HTML TO HTML.
WA_HTML-LINE = 'BR'.
APPEND WA_HTML TO HTML.
ENDLOOP.
WA_HTML-LINE = 'BR'.
APPEND WA_HTML TO HTML.
WA_HTML-LINE = '/body'.
APPEND WA_HTML TO HTML.
WA_HTML-LINE = '/html'.
APPEND WA_HTML TO HTML.
TRY.
CLEAR SEND_REQUEST.
SEND_REQUEST = CL_BCS=CREATE_PERSISTENT( ).
CLEAR DOCUMENT .
DOCUMENT = CL_DOCUMENT_BCS=CREATE_DOCUMENT(
I_TYPE = 'HTM'
I_TEXT = HTML
I_LENGTH = CONLENGTHS
I_SUBJECT = LV_TITLE ).
* Add document to send request
CALL METHOD SEND_REQUEST-SET_DOCUMENT( DOCUMENT ).
* Construct sender and receiver
CLEAR: SENDER_ID , RECIPIENT .
* sender_id = cl_cam_address_bcs=create_internet_address( 'TESTDELOITTE@PETROCHINA-HFY.COM' ).
RECIPIENT = CL_CAM_ADDRESS_BCS=CREATE_INTERNET_ADDRESS( I_ADDR ).
* Set sender
CALL METHOD SEND_REQUEST-SET_SENDER
EXPORTING
I_SENDER = SENDER_ID.
* Add recipient with its respective attributes to send request
CALL METHOD SEND_REQUEST-ADD_RECIPIENT
EXPORTING
I_RECIPIENT = RECIPIENT
I_EXPRESS = 'X'.
LOOP AT T_CCADDR WHERE CCADDR IS NOT INITIAL .
CLEAR RECIPIENTCC.
RECIPIENTCC = CL_CAM_ADDRESS_BCS=CREATE_INTERNET_ADDRESS( T_CCADDR-CCADDR ).
CALL METHOD SEND_REQUEST-ADD_RECIPIENT
EXPORTING
I_RECIPIENT = RECIPIENTCC
I_COPY = 'X'
I_EXPRESS = 'X'.
ENDLOOP.
* Set E-mail sending options
CALL METHOD SEND_REQUEST-SET_STATUS_ATTRIBUTES
EXPORTING
I_REQUESTED_STATUS = 'E'
I_STATUS_MAIL = 'E'.
CALL METHOD SEND_REQUEST-SET_SEND_IMMEDIATELY( 'X' ).
* Send document
CALL METHOD SEND_REQUEST-SEND(
EXPORTING
I_WITH_ERROR_SCREEN = 'X'
RECEIVING
RESULT = SENT_TO_ALL ).
IF SENT_TO_ALL = 'X'.
* E_STATUS = 'Email is send out successful.'.
E_OK = 'X'.
ENDIF.
COMMIT WORK.
CATCH CX_BCS INTO BCS_EXCEPTION.
BCS_MESSAGE = BCS_EXCEPTION-GET_TEXT( ).
E_STATUS = BCS_MESSAGE.
EXIT.
ENDTRY.
ENDFUNCTION.
SAP MM 向交货单的存在不阻止PO被删除
使用过SAP的人都知道，SAP系统的风格是比较严谨的。SAP系统非常注重业务流程的前后端单据的勾稽关联关系。正常情况下，删除前端单据的时候，系统会检查该单据是否有后续的单据，如果有后续的单据系统会有所提醒，甚至报错不让删除。
一些项目里的采购订单，会有Inbound Delivery单据。笔者发现，在删除采购订单的时候，即使存在后续的inbound delivery单据，系统无任何提示就允许用户删除了采购订单行项目。
比如如下的采购订单被删除了，
行项目无'采购订单历史', 但是却有Inbound delivery 2501484267，而这个Inbound delivery 是Open的。SAP居然不检查该PO是否存在后续open的单据就直接能删除item，无任何提示。 貌似不够严谨？
难道还能对该Inbound delivery执行收货不成？VL32N 对该Inbound Delivery收货，
系统报错，
有这个报错就对了，合乎SAP系统严谨之风格了。
－完－
2020-6-22写于苏州市。