topic Re: subroutines in Application Development and Automation Discussions

subroutines

Former Member — Mon, 01 Sep 2008 05:54:53 GMT

Hi All,

i'm using a function module where in table parameter i defined

FIELDS like RFC_DB_FLD. and pass this table through this subroutine

PERFORM Y_WS3 TABLES OPTIONS FIELDS DATA DATA1 DATA2 USING QSELECT

QUSER .

after getting these values in this form parameters

FORM Y_WS3 TABLES OPTIONS FIELDS DATA DATA1 DATA2

USING QSELECT QUSER.

now i'm facing this error in one of my loop

*The data object "FIELDS" has no structure and therefore no component *

*called "FIELDNAME". *

pls suggest me possible solution.

regards

Re: subroutines

former_member217544 — Mon, 01 Sep 2008 06:12:55 GMT

Hi Anuj,

While writing the form statement you need to declare the type of that parameters.

For Instance:


data : options type table of it_table1,
         fields type RFC_DB_FLD,
         qseelct type wa_tab.

PERFORM Y_WS3 TABLES OPTIONS FIELDS 
                             USING QSELECT.

Now the form statemnt should be written in this form:


FORM Y_WS3 TABLES OPTIONS LIKE IT_TABLE1
                                   FIELDS LIKE RFC_DB_FLD
                             USING QSELECT LIKE WA_TAB.
ENDFORM.

Hope this will be helpful.

Regards,

Swarna Munukoti.

Re: subroutines

naveen_inuganti2 — Mon, 01 Sep 2008 06:19:57 GMT

Hi.....

Change your code like this...

PERFORM Y_WS3 TABLES OPTIONS 
                                           FIELDS 
                                           DATA 
                                           DATA1 
                                           DATA2
                                USING QSELECT
                                           QUSER .

FORM Y_WS3 TABLES OPTIONS type standard table 
                                     FIELDS type standard table
                                     DATA type standard table
                                     DATA1 type standard table
                                     DATA2 type standard table
                          USING QSELECT 
                                     QUSER.

Thanks,

Naveen.I

Re: subroutines

Former Member — Mon, 01 Sep 2008 06:20:15 GMT

Hi swarna,

thanks for reply but when i declaring like

FORM Y_WS3 TABLES OPTIONS FIELDS like RFC_DB_FLD DATA DATA1 DATA2

USING QSELECT QUSER.

then i'm getting error.

For typing of TABLES parameters, only table types should be used. -

if i using

FORM Y_WS3 TABLES OPTIONS FIELDS structure RFC_DB_FLD DATA DATA1 DATA2

USING QSELECT QUSER.

then i got processor error

*Different number of parameters in FORM and PERFORM (routine: Y_WS3, *

*number of formal parameters: 0, number of actual parameters: 7). *

regards,

anuj

Re: subroutines

former_member217544 — Mon, 01 Sep 2008 06:36:07 GMT

Hi Anuj,

I have just taken 2 parameters and explained with them..

If there are 7 parameters in form then in form statement also you need to declare the corresponding types for all the 7 parameters.

That is:

if the declarations are in this way:

data: OPTIONS type table of it_tab1

FIELDS type table of RFC_DB_FLD

DATA type table of it_tab2

DATA1 type table of it_tab3

DATA2 type table of it_tab4,

qselect type wa_tab1,

qyser type wa_tab2.

Then form should be written in the following way:

FORM Y_WS3 TABLES OPTIONS structure it_tab1

FIELDS structure RFC_DB_FLD

DATA structure it_tab2

DATA1 structure it_tab3

DATA2 structure it_tab4

USING QSELECT type wa_tab1

QUSER type wa_tab2.

Regards,

Swarna Munukoti.

Re: subroutines

Former Member — Mon, 01 Sep 2008 06:55:50 GMT

Hi awarna, thanks for reply ,

i know u r taking abt all fields it's nt a matter of problem.

k , now i defined

form as a

FORM Y_WS3 TABLES OPTIONS structure RFC_DB_OPT FIELDS structure RFC_DB_FLD DATA structure ZTAB_4000 DATA1 structure ZTAB_4000 DATA2 structure ZTAB_4000

USING QSELECT QUSER.

where as pls note i'm using function module.

in table parameters

OPTIONS like RFC_DB_OPT,

FIELDS like RFC_DB_FLD,

same as others with their respective structure

so my perform is PERFORM Y_WS3 TABLES OPTIONS FIELDS DATA DATA1 DATA2 USING QSELECT

QUSER .

but now i'm getting error

Different number of parameters in FORM and PERFORM (routine: Y_WS3,

number of formal parameters: 0, number of actual parameters: 7).

and previouslly before defining form with structure i'm getting this error n both wkg fine with same no's of parameters.

regards,

Re: subroutines

naveen_inuganti2 — Mon, 01 Sep 2008 06:59:24 GMT

Hi...

What is the error you got with following declaration of formal parameters...

FORM Y_WS3 TABLES OPTIONS type standard table 
                                     FIELDS type standard table
                                     DATA type standard table
                                     DATA1 type standard table
                                     DATA2 type standard table
                          USING QSELECT 
                                     QUSER.

---Naveen.I

Re: subroutines

Former Member — Mon, 01 Sep 2008 07:00:33 GMT

FORM Y_WS3 TABLES OPTIONS like RFC_DB_OPT FIELDS like RFC_DB_FLD DATA....................

Regards

Sathar

Re: subroutines

Former Member — Mon, 01 Sep 2008 07:10:17 GMT

Hi naveen

if i'm using ur method then i;m getting error that table type should use so i created respective table types n used all ,

now perform is

PERFORM Y_WS3 TABLES OPTIONS FIELDS DATA DATA1 DATA2 USING QSELECT

QUSER .

and form is

FORM Y_WS3 TABLES OPTIONS type YAJ FIELDS type yaj1 DATA TYPE YAJ2 DATA1 TYPE YAJ2 DATA2 TYPE YAJ2

USING QSELECT QUSER.

but now i'm getting error

Different number of parameters in FORM and PERFORM (routine: Y_WS3,

number of formal parameters: 0, number of actual parameters: 7).

and previouslly before defining form with type i'm getting this error n both wkg fine with same no's of parameters.

regards,

Re: subroutines

naveen_inuganti2 — Mon, 01 Sep 2008 07:18:31 GMT

Hi Anuj...

Not...

> OPTIONS type YAJ

no need to mention that YAJ...

You can try the syntax...

> OPTINS TYPE STANDARD TABLE.

here "Stadard table" is the key word.

Plz get back with result again.

Thanks,

Naveen.I

Re: subroutines

Former Member — Mon, 01 Sep 2008 07:28:02 GMT

Thanx naveen it's help me but in form inside a loop it's throw a error that

*The data object "FIELDS" has no structure and therefore no component called "FIELDNAME". *

here is code also

DATA NUMBER_OF_FIELDS TYPE I.

DESCRIBE TABLE FIELDS LINES NUMBER_OF_FIELDS.

IF NUMBER_OF_FIELDS = 0.

LOOP AT TABLE_STRUCTURE.

MOVE TABLE_STRUCTURE-FIELDNAME TO FIELDS-FIELDNAME.----

> error

APPEND FIELDS.

ENDLOOP.

ENDIF.

regards,

anuj

Re: subroutines

naveen_inuganti2 — Mon, 01 Sep 2008 07:35:51 GMT

Hi....

Define one local itab for FILEDS with structure and internal table...

Append that itab with entries...

After the loop..

write this syntax...

FILEDS() = ITAB()

Here finally FIELDS table carrie out the entries from subroutine.

Thanks,

Naveen.I

Re: subroutines

Former Member — Mon, 01 Sep 2008 07:46:07 GMT

Hi Anuj,

The following syntax working fine.

FUNCTION ZEXFM.

*"----------------------------------------------------------------------
*"*"Local interface:
*"  TABLES
*"      FIELDS STRUCTURE  RFC_DB_FLD
*"      OPTIONS STRUCTURE  RFC_DB_OPT
*"----------------------------------------------------------------------
perform exfm TABLES OPTIONS FIELDS.



ENDFUNCTION.


*&---------------------------------------------------------------------*
*&  Include           LZ701715F01                                      *
*&---------------------------------------------------------------------*
FORM exfm TABLES OPTIONS structure RFC_DB_OPT FIELDS structure RFC_DB_FLD.

endform.

Re: subroutines

Former Member — Tue, 13 Oct 2009 06:44:17 GMT

thanks all.