Help needed on Validation exit GGB0

Former Member — Thu, 11 Sep 2008 05:28:24 GMT

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

Re: Help needed on Validation exit GGB0

Former Member — Thu, 23 Oct 2008 07:35:10 GMT

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

topic Help needed on Validation exit GGB0 in Application Development and Automation Discussions

Help needed on Validation exit GGB0

Re: Help needed on Validation exit GGB0