topic Re: Invalid operator in Application Development and Automation Discussions

Invalid operator

Former Member — Wed, 11 Jul 2007 05:14:02 GMT

Hi,

In my program

REPORT ZAC_TAB25.

PARAMETERS:

P_NUM1 TYPE I,

P_NUM2 TYPE I,

P_OPER TYPE C.

DATA:

W_RESULT TYPE I.

CALL FUNCTION 'ZAC_CALCULATE'

EXPORTING

IM_NUM1 = P_NUM1

IM_NUM2 = P_NUM2

IM_OPER = P_OPER

IMPORTING

EX_RESULT = W_RESULT

EXCEPTIONS

INVALID_OPERATOR1 = 1

ZERO_DIVIDE1 = 2

OTHERS = 3

IF SY-SUBRC EQ 0.

WRITE:/ 'RESULT IS', W_RESULT.

ELSEIF SY-SUBRC EQ 1.

WRITE:/ 'INVALID OPERATION'.

ELSEIF SY-SUBRC EQ 2.

WRITE:/ 'CANNOT DIVIDE BY ZERO'.

ELSE.

WRITE:/ 'UNKNOWN EXCEPTION'.

ENDIF.

when iam executing the program(F8)with invalid operator like T(p_oper=t), It is givimg result as zero, instead of givimg message as Invalid operator.

Thanks

Re: Invalid operator

Former Member — Wed, 11 Jul 2007 05:17:48 GMT

hi Ram,

did u code it in this fashion in your ZAC_CALCULATE' FM ???


if im_oper = 'T'.
  raise INVALID_OPERATOR1.
endif.

Re: Invalid operator

Former Member — Wed, 11 Jul 2007 05:18:19 GMT

Hi,

What is the value you are sending to FM of W_RESULT?

Can you copy your FM code here?

Re: Invalid operator

Former Member — Wed, 11 Jul 2007 05:20:21 GMT

Hi Santosh,

This is my function module.

CASE IM_OPER.

WHEN '+'.

EX_RESULT = IM_NUM1 + IM_NUM2.

WHEN '-'.

EX_RESULT = IM_NUM1 - IM_NUM2.

WHEN '*'.

EX_RESULT = IM_NUM1 * IM_NUM2.

WHEN '/'.

EX_RESULT = IM_NUM1 / IM_NUM2.

WHEN '%'.

EX_RESULT = IM_NUM1 MOD IM_NUM2.

WHEN OTHERS.

ENDCASE.

IF IM_NUM2 = 0.

WRITE:/ 'CANNOT DIVIDE BY ZERO'.

ENDIF.

ENDFUNCTION.

Plz let me know if anything i have to write in my function module.

I had maintained exceptions INVALID OPERATOR1 AND ZERODIVIDE.

Re: Invalid operator

Former Member — Wed, 11 Jul 2007 05:21:31 GMT

Hi ram,

Can you paste the code of your FM.

Regards,

Atish

Re: Invalid operator

seshatalpasai_madala — Wed, 11 Jul 2007 05:22:06 GMT

Hi Ram,

Code your exception as follos.

CASE IM_OPER.

WHEN '+'.

EX_RESULT = IM_NUM1 + IM_NUM2.

WHEN '-'.

EX_RESULT = IM_NUM1 - IM_NUM2.

WHEN '*'.

EX_RESULT = IM_NUM1 * IM_NUM2.

WHEN '/'.

EX_RESULT = IM_NUM1 / IM_NUM2.

WHEN '%'.

EX_RESULT = IM_NUM1 MOD IM_NUM2.

WHEN OTHERS.

RAISE INVALID_OPERATOR. *See the change

ENDCASE.

Add the same in the EXCEPTIONS of the FUNCTION CALL.

as follows

REPORT ZAC_TAB25.

PARAMETERS:

P_NUM1 TYPE I,

P_NUM2 TYPE I,

P_OPER TYPE C.

DATA:

W_RESULT TYPE I.

CALL FUNCTION 'ZAC_CALCULATE'

EXPORTING

IM_NUM1 = P_NUM1

IM_NUM2 = P_NUM2

IM_OPER = P_OPER

IMPORTING

EX_RESULT = W_RESULT

EXCEPTIONS

INVALID_OPERATOR = 1 See the change

ZERO_DIVIDE1 = 2

OTHERS = 3

IF SY-SUBRC EQ 0.

WRITE:/ 'RESULT IS', W_RESULT.

ELSEIF SY-SUBRC EQ 1.

WRITE:/ 'INVALID OPERATION'.

ELSEIF SY-SUBRC EQ 2.

WRITE:/ 'CANNOT DIVIDE BY ZERO'.

ELSE.

WRITE:/ 'UNKNOWN EXCEPTION'.

ENDIF.

Regards,

Sesh

Re: Invalid operator

Former Member — Wed, 11 Jul 2007 05:25:40 GMT

hi Ram,

do this way

CASE IM_OPER.

WHEN '+'.

EX_RESULT = IM_NUM1 + IM_NUM2.

WHEN '-'.

EX_RESULT = IM_NUM1 - IM_NUM2.

WHEN '*'.

EX_RESULT = IM_NUM1 * IM_NUM2.

WHEN '/'.

EX_RESULT = IM_NUM1 / IM_NUM2.

WHEN '%'.

EX_RESULT = IM_NUM1 MOD IM_NUM2.

WHEN OTHERS.

raise INVALID OPERATION'.

ENDCASE

Re: Invalid operator

Former Member — Wed, 11 Jul 2007 05:25:59 GMT

try like this

CASE IM_OPER.

WHEN '+'.

EX_RESULT = IM_NUM1 + IM_NUM2.

WHEN '-'.

EX_RESULT = IM_NUM1 - IM_NUM2.

WHEN '*'.

EX_RESULT = IM_NUM1 * IM_NUM2.

WHEN '/'.

IF IM_NUM2 = 0.

raise ZERO_DIVIDE1 .

ENDIF.

EX_RESULT = IM_NUM1 / IM_NUM2.

WHEN '%'.

EX_RESULT = IM_NUM1 MOD IM_NUM2.

WHEN OTHERS.

raise INVALID_OPERATOR1 .

ENDCASE.

ENDFUNCTION.

first check zero division in division operator.

regards

shiba dutta