topic Re: user exit for VA02 in Application Development and Automation Discussions

user exit for VA02

Former Member — Fri, 06 Jan 2006 08:57:54 GMT

Hi,

I got a requirement to develop USEREXIT for the pricing condition for sales order (VA02).

It is for ITEM level(VBAP-ABGRU='ZC')(Reason for Rejection) and i have to check VBAK-AUART = 'ZR01' and 'ZR02'.

If net value is greater than $500 then raise message.

Can any one tell me what is the suitable user exit for this requirement and what is the approach.

Points guaranteed

cheers

kaki

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 09:06:57 GMT

hi,

Go for

include mv45afzz. " User-forms

in the program SAPMV45A.

Regards,

Sailaja.

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 09:07:41 GMT

hi..

use the exit - MV45AFZZ and put your code inside FORM USEREXIT_MOVE_FIELD_TO_VBKD. For checking AUART or any field values use structure XVBAK..(if XVBAK-AUART = '..')This structure will have the value in runtime. For VBAP Values use XVBAP.

Regards,

Pradhiba

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 09:10:36 GMT

Hi Kaki,

in the include MV45AFZZ

you need to write the code in the form userexit_move_field_to_vbap

 IF VBAK-AUART = 'ZIC'                                   
      AND VBAP-ABGRU ='ZC' .
      message id 'ZZ' type 'E' number '002' with
       'Document type ZIC is only allowed for Consignments'.
    ENDIF.

thanks

vijay

Message was edited by: Vijay Babu Dudla

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 09:15:20 GMT

Hi Sailaja and pratibha,

Thanks for replies.

How to use XVBAK & XVBAP structures in userexits?

Do i need to use INCLUDE STRUCTURE?

kaki

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 09:16:28 GMT

Hi KAKI,

Extension: V46H0001

Exit Name: EXIT_SAPLV46H_001

Desc: Customer Function When Creating Item

Include ZXV46U01

Here, read the internal table for items and proceed further.

Regards,

Raj

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 09:18:29 GMT

You could use one of the 16 exits depending upon your need.

SDAPO001

SDTRM001

V45A0001

V45A0002

V45A0003

V45A0004

V45E0001

V45E0002

V45L0001

V45P0001

V45S0001

V45S0003

V45S0004

V45W0001

V46H0001

V60F0001

Regards,

Ankur Bhandari

p.s Reward points if it helps.

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 09:22:32 GMT

Hi Vijay,

It is not allowing to modify the function module.

Getting error "Program names ZX... are reserved for includes of exit function groups"

kaki

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 09:25:02 GMT

no no .. u dont have to declare or include the structure.. just use it..

if xvbap-auart = 'ZSR1'.

...

endif.

pradhiba

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 09:26:44 GMT

I feel that is a warning message only.

check it, if it is warning proceed with your change.

thanks

vijay

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 09:37:55 GMT

hi Kaki,

"Program names ZX... are reserved for includes of exit function groups" is a warning message only.

You can proceed further as it is not error message.

While creating includes, they follow some naming conventions. ZX.. is reserved for includes in User-exits.

Regards,

Sailaja.

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 09:54:42 GMT

Hi,

In VA02, Reason for Rejection, I need to calculate total amouts for all the items.( if vbak-auart = 'ZR01' or

vbak-auart = 'ZR02' and vbap-abgru ='ZC').If the amount is greater than 500 then raise message.

I have written this code.Pls let me know whether this code meet my requirement.


data: v_amt(5).

  if vbak-auart = 'ZR01' or
     vbak-auart = 'ZR02' and
      vbap-abgru ='ZC'.

    loop at vbap.
     v_amt = v_amt + vbap-netwr.
    endloop.
  endif.

  if v_amt gt '500'.
      message e000(zmsg) with 'FOC sales order limit exceeded!'.
  endif.

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 09:59:50 GMT

data: v_amt(5).
  if vbak-auart = 'ZR01' or 
    vbak-auart = 'ZR02'.
   loop at vbap <b>where abgru ='ZC'.</b> 
    v_amt = v_amt + vbap-netwr.
    endloop.
  endif.  
if v_amt gt '500'. 
message e000(zmsg) with 'FOC sales order limit exceeded!'.
endif.

check it...

Message was edited by: Vijay Babu Dudla

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 10:09:46 GMT

Hi Kaki

Just one question: what is the total for you?

Is it only total net amount?

If it was so you can know by reading header table.

Another questions: are you interested in all total amounts (1) or only total amonut for intems with abgru ='ZC' (2).

(1) -

CHECK vbak-auart = 'ZR01' or

vbak-auart = 'ZR02'.

READ TABLE XVBAP WITH KEY abgru ='ZC'

TRANSPORTING NO FIELDS.

CHECK SY-SUBRC = 0.

IF VBAK-NETWR GT 500.

message e000(zmsg) with

'FOC sales order limit exceeded!'.

ENDIF.

In this case you don't need to read all items.

(2)

DATA: TOTAL LIKE VBAP-NETWR.

CHECK vbak-auart = 'ZR01' or

vbak-auart = 'ZR02'.

LOOP AT XVBAP WHERE abgru ='ZC'.

TOTAL = TOTAL + XVBAP-NETWR.

ENDLOOP.

IF TOTAL GT 500.

message e000(zmsg) with

'FOC sales order limit exceeded!'.

ENDIF.

In both cases you should do this controls at the end so

you should place this code in user-exit userexit_save_document_prepare, it's triggered just before saving document.

Max

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 10:12:50 GMT

Hi Max bianchi,

Where to find 'userexit_save_document_prepare'? How to go into it? I want to calculate total amount for all the items.So total amount of all the items should not cross 500.

kaki

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 10:23:17 GMT

Hi Kaki,

For USEREXIT_SAVE_DOCUMENT_PREPARE ,

SE38 -> MV45AFZZ . In this program you will find Routine USEREXIT_SAVE_DOCUMENT_PREPARE.

Regards,

Raj

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 10:23:45 GMT

Hi Kaki,

Since your requirement is for all items then you can proceed with this code'

data: v_amt(5). 
 if vbak-auart = 'ZR01' or 
    vbak-auart = 'ZR02'. 
  loop at vbap where abgru ='ZC'.
     v_amt = v_amt + vbap-netwr. 
   endloop. 
 endif. 
 if v_amt gt '500'.
 message e000(zmsg) with 'FOC sales order limit exceeded!'.
endif.

Re: user exit for VA02

Former Member — Fri, 06 Jan 2006 10:24:37 GMT

Include MV45AFZZ.

Max

Re: user exit for VA02

Former Member — Sun, 08 Jan 2006 11:50:35 GMT

Thank you Max bianchi.

Full points alloted.

cheers

kaki

Re: user exit for VA02

Former Member — Tue, 14 May 2013 06:16:15 GMT

Vijay sir,

At run time I am getting 2 work areas namely

vbak and

xvbak

and I want to use them for passing them for fetching some record from database table.

I am confused that which work area should I use to fetch data.

Please guide.