Hello ,
I need your help to replace the popup in code below instead i want to use the user decision reject option/button , and how can get the text in the popup
to show it in the mail that will be sent to the initiator :
Ive added the code using a method in my BO the popup is showing with text box ..
---------------------------------------------------------------------------------------------------------------------------------------------------------
Select Dialog, Synchronous, Result Paraments
In tab Result type: table SWF_IFAPPR and field: SWF_APPRES
DATA: L_ANSWER LIKE SY-INPUT.
DATA: APPROVE LIKE SWF_IFAPPR-SWF_APPRES.
data : text type CATSXT_LONGTEXT_ITAB ,
title type SYTITLE ,
l_text(72) .
data : v_text(1000) .
CALL FUNCTION 'POPUP_TO_DECIDE'
EXPORTING
TEXTLINE1 = 'Notification Approval?'(001)
TEXT_OPTION1 = 'Approved'(002)
TEXT_OPTION2 = 'Rejected'(003)
TITEL = 'Please provide your Comments also'(004)
IMPORTING
ANSWER = L_ANSWER
EXCEPTIONS
OTHERS = 1.
CASE L_ANSWER.
WHEN '1'.
APPROVE = 0.
WHEN '2'.
APPROVE = 4.
title = 'Reason for Rejection' .
CALL FUNCTION 'CATSXT_SIMPLE_TEXT_EDITOR'
EXPORTING
IM_TITLE = title
IM_START_COLUMN = 20
IM_START_ROW = 20
CHANGING
CH_TEXT = text .
if text is not initial.
rej1text = text.
endif.
WHEN 'A'.
EXIT_CANCELLED.
ENDCASE.
* set result parameter
SWC_SET_ELEMENT CONTAINER RESULT APPROVE.
thanks all foe your help ... and sorry again for any inconvenience
this the code in method :
data : text1 type CATSXT_LONGTEXT_ITAB ,
title type SYTITLE ,
text type Catsxt-1st_ltext_line
data wa_text like line of text1 .
Title = 'Reason for Rejection' .
CALL FUNCTION 'CATSXT_SIMPLE_TEXT_EDI
EXPORTING
IM_TITLE = title
IM_START_COLUMN = 20
IM_START_ROW = 20
CHANGING
CH_TEXT = text1 .
read table text1 into wa_text index 1 .
move wa_text to text .
SWC_GET_ELEMENT CONTAINER RESULT text .
END_METHOD.
in the WF the container (import multiline) :
the bindling in the activity step :
i get this dump :
What happened?
Error in the ABAP Application Program
The current ABAP program "CL_SWF_EXP_SERVICE============CP" had to be
terminated because it has
come across a statement that unfortunately cannot be executed.
Error analysis
You attempted to assign a field to a typed field symbol,
but the field does not have the required type.
Trigger Location of Runtime Error
Program CL_SWF_EXP_SERVICE============CP
Include CL_SWF_EXP_SERVICE============CM002
Row 110
Module type (METHOD)
Module Name ELEMENT_GET_ATTRIBUTES
Hi,
I have the same requirement.
Am getting the pop-up to give the rejection reason.
But, When
the “cancel” icon is selected, with or without text, the user should be returned
to the workflow task.
How can i do this.
Am using FM 'CATSXT_SIMPLE_TEXT_EDITOR'.
Please advice.
Add a comment