topic Modifying a Std Script in Application Development and Automation Discussions

Modifying a Std Script

kiran_k8 — Mon, 12 Mar 2007 08:06:39 GMT

Hi Folks,

I am planning to modify a standard script not in terms of windows or logo but in terms of the kind of data it should display in the form.

Can anyone please let me know how to go ahead with such a case.I know that we need to that by defining a perform in the change editor of the particular window and ITCSY structure.

But the problem is I know theotrically but not practically.Can anyone here kindly help me in this regard step by step.

Will be given points for sure.

K.Kiran.

Re: Modifying a Std Script

Former Member — Mon, 12 Mar 2007 08:12:03 GMT

good

you can copy the standard driver program to the Z* program and try to do the changes a sper your requrirements.

Thanks

mrutyun^

Re: Modifying a Std Script

Former Member — Mon, 12 Mar 2007 08:24:37 GMT

Hi Kiran,

here a short example:

In sapscript you use:

/: PERFORM ZMEDRUCK01_01 IN PROGRAM Z_FORMULAR_ROUTINEN

/: USING &EKPO-EMATN&

/: CHANGING &ZEINR&

/: CHANGING &ZEIVR&

/: ENDPERFORM

IL ,,,,&ZEINR& IDX: &ZEIVR&

In Report Z_FORMULAR_ROUTINEN you have to define

a routine like this:

FORM ZMEDRUCK01_01 TABLES IN_TAB STRUCTURE ITCSY

OUT_TAB STRUCTURE ITCSY.

READ TABLE IN_TAB WITH KEY 'EKPO-EMATN'.

check sy-subrc = 0.

MATNR_F = IN_TAB-VALUE.

SELECT SINGLE * FROM MARA WHERE MATNR = MATNR_F.

check sy-subrc = 0.

READ TABLE OUT_TAB WITH KEY = 'ZEINR'.

OUT_TAB-VALUE = MARA-ZEINR.

MODIFY OUT_TAB INDEX SY-TABIX.

READ TABLE OUT_TAB WITH KEY = 'ZEIVR'.

OUT_TAB-VALUE = MARA-ZEIVR.

MODIFY OUT_TAB INDEX SY-TABIX.

ENDFORM.

In itab OUT_TAB you can set the value of the fields you will use.

Hope it helps.

regards, Dieter

Re: Modifying a Std Script

Former Member — Mon, 12 Mar 2007 08:28:00 GMT

hi,

/: PERFORM FORM1 IN PROGRAM ZTEST

/: USING &VAR1&

/: CHANGING &VAR_OUT1&

In program ZTEST...

FORM FORM1 tables in_tab structure itcsy

out_tab structure itcsy.

data: var1 like ...

read table in_tab with key name = 'VAR1'.

if sy-subrc = 0.

move in_tab-value to var1.

endif.

Update the value of VAR_OUT1

read table out_tab with key name = 'VAR_OUT1'.

if sy-subrc = 0.

move <value> to out_tab-value.

modify out_tab index sy-tabix.

endif.

ENDFORM.

check this...

http://help.sap.com/saphelp_erp2005/helpdata/en/d1/803279454211d189710000e8322d00/frameset.htm

do reward if it helps,

priya.

Re: Modifying a Std Script

Former Member — Mon, 12 Mar 2007 08:28:27 GMT

You can do it in two ways

1. If you have copied the scripts driver program, you can declare new variables and populate them, and these will be automatically available with &FIELD& in the script, you can't transfer a internal table like this, for this you would need to LOOP-ENDLOOP and call the WINDOW each time to pass one row at a time

2. USING PERFORM - ENDPERFORM

In SAPscript

/: PERFORM TEST_ROUTINE IN PROGRAM ZTEST
/: USING &REGUP-BUKRS&
/: USING &REGUP-BELNR&
/: USING &REGUP-GJAHR&
/: CHANGING &MY_BKPF_AWKEY&
/: ENDPERFORM.

In ABAP program ZTEST

FORM TEST_ROUTINE TABLES IN_PAR STRUCTURE ITCSY OUT_PAR STRUCTURE ITCSY.

READ TABLE IN_PAR WITH KEY 'REGUP-BUKRS'.
IF SY-SUBRC = 0.
L_BUKRS = IN_PAR-VALUE.
ENDIF.

READ TABLE IN_PAR WITH KEY 'REGUP-BELNR'.
IF SY-SUBRC = 0.
L_BELNR = IN_PAR-VALUE.
ENDIF.

READ TABLE IN_PAR WITH KEY 'REGUP-GJAHR'.
IF SY-SUBRC = 0.
L_GJAHR = IN_PAR-VALUE.
ENDIF.

SELECT SINGLE AWKEY FROM BKPF INTO L_AWKEY WHERE BUKRS = L_BUKRS BELNR = L_BELNR GJAHR = L_GJAHR.

READ TABLE OUT_PAR WITH KEY 'MY_BKPF_AWKEY'.
IF SY-SUBRC = 0.
MY_BKPF_AWKEY = L_AWKEY.
ENDIF.

MODIFY OUT_PAR INDEX SY-TABIX.
ENDFORM.

Re: Modifying a Std Script

Former Member — Mon, 12 Mar 2007 08:34:20 GMT

hi kiran

first of all u cant alter d standar form not only interms of window & logo but alos v cant change d data...the best ting is copy it and declare in d Z fdrmat and den make changes

vijay

Re: Modifying a Std Script

kiran_k8 — Wed, 18 Apr 2007 10:37:04 GMT

problem solved