2008 May 02 1:22 PM
Hi All,
I am not recieving any mail through the FM 'SO_DOCUMENT_SEND_API1'
Fill the Mailing List.
LOOP AT IT_EMAIL INTO WA_EMAIL.
WA_RECLIST-RECEIVER = WA_EMAIL-EMAIL.
WA_RECLIST-REC_TYPE = 'U'.
APPEND WA_RECLIST TO RECLIST.
ENDLOOP.
Send e-mail to the Global Stock management group.
CALL FUNCTION 'SO_DOCUMENT_SEND_API1'
EXPORTING
DOCUMENT_DATA = DOC_CHNG
PUT_IN_OUTBOX = 'X'
SENDER_ADDRESS = sy-uname
SENDER_ADDRESS_TYPE = 'B'
COMMIT_WORK = 'X'
IMPORTING
SENT_TO_ALL = 'X'
NEW_OBJECT_ID =
SENDER_ID =
TABLES
PACKING_LIST = OBJPACK
OBJECT_HEADER =
CONTENTS_BIN =
CONTENTS_TXT = OBJTXT
CONTENTS_HEX =
OBJECT_PARA =
OBJECT_PARB =
RECEIVERS = RECLIST
EXCEPTIONS
TOO_MANY_RECEIVERS = 1
DOCUMENT_NOT_SENT = 2
DOCUMENT_TYPE_NOT_EXIST = 3
OPERATION_NO_AUTHORIZATION = 4
PARAMETER_ERROR = 5
X_ERROR = 6
ENQUEUE_ERROR = 7
OTHERS = 8
.
Please provoide helpful pointers.
2008 May 02 1:27 PM
Hi Vivek,
After Call Function,
IF sy-subrc EQ 0.
COMMIT WORK AND WAIT.
ENDIF.
I am sure it will work.
Please assign points.
Hi All,
I am not recieving any mail through the FM 'SO_DOCUMENT_SEND_API1'
Fill the Mailing List.
LOOP AT IT_EMAIL INTO WA_EMAIL.
WA_RECLIST-RECEIVER = WA_EMAIL-EMAIL.
WA_RECLIST-REC_TYPE = 'U'.
APPEND WA_RECLIST TO RECLIST.
ENDLOOP.
Send e-mail to the Global Stock management group.
CALL FUNCTION 'SO_DOCUMENT_SEND_API1'
EXPORTING
DOCUMENT_DATA = DOC_CHNG
PUT_IN_OUTBOX = 'X'
SENDER_ADDRESS = sy-uname
SENDER_ADDRESS_TYPE = 'B'
COMMIT_WORK = 'X'
IMPORTING
SENT_TO_ALL = 'X'
NEW_OBJECT_ID =
SENDER_ID =
TABLES
PACKING_LIST = OBJPACK
OBJECT_HEADER =
CONTENTS_BIN =
CONTENTS_TXT = OBJTXT
CONTENTS_HEX =
OBJECT_PARA =
OBJECT_PARB =
RECEIVERS = RECLIST
EXCEPTIONS
TOO_MANY_RECEIVERS = 1
DOCUMENT_NOT_SENT = 2
DOCUMENT_TYPE_NOT_EXIST = 3
OPERATION_NO_AUTHORIZATION = 4
PARAMETER_ERROR = 5
X_ERROR = 6
ENQUEUE_ERROR = 7
OTHERS = 8
.
Please provoide helpful pointers.
2008 May 02 1:26 PM
I created a seperate program for this so that I could force the email process to kick off.
Try using this code
SUBMIT rsconn01 "SAPconnect Start Send Process
WITH mode EQ '*'
WITH output EQ ''
TO SAP-SPOOL
DESTINATION 'LOCAL'
IMMEDIATELY ' '
KEEP IN SPOOL 'X'
WITHOUT SPOOL DYNPRO
AND RETURN.
2008 May 02 1:27 PM
Hi Vivek,
After Call Function,
IF sy-subrc EQ 0.
COMMIT WORK AND WAIT.
ENDIF.
I am sure it will work.
Please assign points.
2008 May 02 1:28 PM
Hi Vivek,
Uncomment Commit Work and Make its value as 'X'.
also check in SBWP -
> OUTBOX (whether your Mail is generated or Not).
Regards,
Sunil.