topic Re: Enhancement in IW31 in Application Development and Automation Discussions

Enhancement in IW31

former_member1716 — Mon, 28 Oct 2013 07:50:35 GMT

Hello Experts,

I have a requirement, to validate partner function fields like ship to party,bill to party,payer for the corresponding Sold to party in IW31 (service order creation.)

I want these fields to get validated both when i press "ENTER" and wen i click "SAVE", Can you please help me in providing the correct user exits for it.

Thanks in advance.

Satish.

Re: Enhancement in IW31

Former Member — Mon, 28 Oct 2013 10:15:58 GMT

Hi Satish,

Please check the enhancement spot..

Include : LCOMDF30

*&---------------------------------------------------------------------*
*&      Form konnr_chk_pm
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
FORM konnr_chk_pm.
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(1) Form KONNR_CHK_PM, Start                                                                                                                          A
hope it will be helpful..

Re: Enhancement in IW31

Former Member — Mon, 28 Oct 2013 10:17:55 GMT

Hi,

Check the enhancement spots..

Include : LCOIHF08

*---------------------------------------------------------------------*
*       Form XCURSOR_FIELD_GET_F00
*---------------------------------------------------------------------*
*       get Dynprofeld auf dem Cursor steht
*---------------------------------------------------------------------*
FORM XCURSOR_FIELD_GET_F00 USING P_FIELD P_VALUE.
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(1) Form XCURSOR_FIELD_GET_F00, Start                                                                                                                 A
*$*$-Start: (1)---------------------------------------------------------------------------------$*$*

Include : LCOIHF1Z

FORM T430_READ USING STEUS XRC.
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(1) Form T430_READ, Start A
*$*$-Start: (1)---------------------------------------------------------------------------------$*$*

Include : LCOIHFTK

FORM contract_chk_tk using     caufvd like caufvd
                             afvgd like afvgd
                             afvgd_sav like afvgd.
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(1) Form CONTRACT_CHK_TK, Start                                                                                                                       A
*$*$-Start: (1)---------------------------------------------------------------------------------$*$*

Re: Enhancement in IW31

former_member1716 — Mon, 28 Oct 2013 10:50:41 GMT

thanks Kusuma,

I will check for this and get back to you.

May i know the Program name.

Re: Enhancement in IW31

former_member1716 — Mon, 28 Oct 2013 11:27:27 GMT

hi kusuma,

Thanks for the info,

1) Include : LCOIHF08

FORM XCURSOR_FIELD_GET_F00 USING P_FIELD P_VALUE.
2.

Include : LCOIHF1Z

FORM T430_READ USING STEUS XRC.

the above two forms got triggered when i put a break point and checked.

I have a requirement, to validate partner function fields like ship to party,bill to party,payer for the corresponding Sold to party in IW31 (service order creation.)

Do you have any sample code for this senario???

Re: Enhancement in IW31

Former Member — Mon, 28 Oct 2013 11:35:28 GMT

Hi,

Actually i have used this for tracking num scenario, dont have any sample code, but i am pasting the code which i have used for tracking num..

IF SY-TCODE = 'IW31' OR SY-TCODE = 'IW32' OR SY-TCODE = 'IW33'.

DATA: LV_TRACK_NO TYPE ZDEPT,

L_LEVEL TYPE ZLEVEL.

* For Operation

CLEAR : LV_TRACK_NO, L_LEVEL .

IF AFVGD-AFNAM IS NOT INITIAL.

TRANSLATE AFVGD-AFNAM TO UPPER CASE.

SELECT SINGLE DEPT_CODE

ZLEVEL

FROM ZDEPARTMENT

INTO (LV_TRACK_NO , L_LEVEL)

WHERE EMP_CODE = AFVGD-AFNAM.

AFVGD-BEDNR = LV_TRACK_NO.

* update EBAN SET ZZLEVEL = L_LEVEL WHERE BANFN = AFVGD-BANFN.

ENDIF.

Re: Enhancement in IW31

former_member1716 — Fri, 08 Nov 2013 12:54:38 GMT

Hello All,

I have finally found the solution by debugging and got the exact requirement.

1)For "enter" i coded in program SAPLS38E in Include LIPARF00 under form

PROOF_ALL_F00, i have created an implicit enhancement here and wrote my Logic.

2)For "Save" i have coded it in BADI "WORKORDER_UPDATE" under AT_SAVE interface method.

However the logic in code in these two places differ.

Thanks for all your help who tried answering this question.

I have also created a document on Partner Functions Validations on sales and service order documents in the link below,

you may find it useful please check.

http://scn.sap.com/docs/DOC-52249#comment-457018

Re: Enhancement in IW31

former_member1716 — Fri, 08 Nov 2013 12:59:01 GMT

Thanks for your support and information Kusuma