Form parameter mismatch

[Former Member]

I'm testing a basic form -- trying to figure out how to line up the parameters.

I read F1 help on this and tried to structure my program likewise, but I could not get around this.

REPORT ZTESTMOVE .
DATA: STRUC LIKE ZDOLSARC09.
DATA: FIELDMATCH TYPE ZDOLSARC09 OCCURS 0 WITH HEADER LINE.
DATA: COUNTER TYPE I.

FIELDMATCH-FIELD = 'BUKRS'.
APPEND FIELDMATCH.
FIELDMATCH-FIELD = 'KUNNR'.
FIELDMATCH-HIT = 'X'.
APPEND FIELDMATCH.

PERFORM TESTFORM TABLES FIELDMATCH USING STRUC.

*&---------FORM TESTFORM---------------------------------
FORM TESTFORM USING FIELDMATCH STRUCTURE STRUC.
DATA: COUNTER TYPE I.

COUNTER = 0.

LOOP AT FIELDMATCH.
  IF FIELDMATCH-HIT = 'X'.
     COUNTER = COUNTER + 1.
  ENDIF.
ENDLOOP.
ENDFORM.

What am I doing wrong.

[vani_krishnamoorthy]

Hi Howard,

I assume you want to pass a table to your form routine. If so you have to use the tables statement.

Try this

REPORT ZTESTMOVE .

DATA: STRUC LIKE ZDOLSARC09.

DATA: FIELDMATCH TYPE ZDOLSARC09 OCCURS 0 WITH HEADER LINE.

DATA: COUNTER TYPE I.

FIELDMATCH-FIELD = 'BUKRS'.

APPEND FIELDMATCH.

FIELDMATCH-FIELD = 'KUNNR'.

FIELDMATCH-HIT = 'X'.

APPEND FIELDMATCH.

PERFORM TESTFORM TABLES FIELDMATCH .

*&--

---

FORM TESTFORM--

---

FORM TESTFORM tables I_FIELDMATCH STRUCTURE STRUC.

DATA: COUNTER TYPE I.

COUNTER = 0.

LOOP AT FIELDMATCH.

IF FIELDMATCH-HIT = 'X'.

COUNTER = COUNTER + 1.

ENDIF.

ENDLOOP.

ENDFORM

Hope this helps.

Regards,

Vani