Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 

Help needed on Validation exit GGB0

Former Member

‎09-11-2008 6:28 AM

0 Kudos

Hi Guys,

Pls suggest how can i go about using exit validation for callup point 3(complete document level).

i am trying to call form U101, but its not getting called.

below is the code for this form.

----

  • FORM U101 *

----

  • Example of an exit using the complete data from one *

  • multi-line rule. *

  • This exit is intended for use from callup point 3, in FI. *

  • *

  • If account 400000 is used, then account 399999 must be posted *

  • to in another posting line. *

----

  • --> BOOL_DATA The complete posting data. *

  • <-- B_RESULT T = True F = False *

----

FORM u101 USING bool_data TYPE gb002_015

CHANGING b_result.

DATA: b_acc_400000_used LIKE d_bool VALUE 'F'.

    • Has account 400000 has been used?

  • LOOP AT BOOL_DATA-BSEG INTO BSEG

  • WHERE HKONT = '0000400000'.

  • B_ACC_400000_USED = B_TRUE.

  • EXIT.

  • ENDLOOP.

*

    • Check that account 400000 has been used.

  • CHECK B_ACC_400000_USED = B_TRUE.

*

  • B_RESULT = B_FALSE.

  • LOOP AT BOOL_DATA-BSEG INTO BSEG

  • WHERE HKONT = '0000399999'.

  • B_RESULT = B_TRUE.

  • EXIT.

  • ENDLOOP.

**************************

lemi knw the process to call validation exit at complete document level (callup point 3).

actually i am not able to pass parameter bool_data. plz suggest wht do v do for tht.

Rgrds,

Prash

Edited by: Prashant Malik on Sep 11, 2008 12:00 PM

1 REPLY 1

Former Member

‎10-23-2008 8:35 AM

0 Kudos

Hi Prash,

in ZGGBR000 (copy of RGGBR000) you have to add your exit to internal table exits e.g.

  • Einfügen von U535 NB20081022

exits-name = 'U535'. "NB20081022

exits-param = c_exit_param_class. "NB20081022

exits-title = text-535. "NB20081022

APPEND exits. "NB20081022

The value c_exit_param_class for exits-param will provide you after creating the step in validation (transaction GGB=) below coding for the call of the exit in my exmaple in include GBTASFIF. With the vlaue c_exit_param_none it doesn't work. I did the same error.

FORM VALCHCK_2FI_BELG003

USING

BOOL_DATA

CHANGING

RES000.

DATA: RES001 LIKE D_BOOL.

  • Exit-Evaluation :RES000 *

RES000 = B_TRUE.

PERFORM U535(ZGGBR000)

IF FOUND

USING

BOOL_DATA

CHANGING

RES000.

ENDFORM. " VALCHCK_2FI_BELG003

Hope that solved your problem.

Regards

Norbert