Short Dump

[Former Member]

Hello Friends,

I have developed this code for Open Items for Vendors.

It use the Logical Database KDF.

However I am having a short dump at the function module to call the ALV List DISPLAY.(CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY')

Attached is the code.

Any Suggestions.

[code]TABLES:

bsid,

bsak, "Accounting: 2nd index Customers

bsik, "Accounting: 2nd index Customers

faede, "I/O for Determining Due Date

lfa1, "General Data in Customer Master

lfb1, "Customer Master (Company Code)

t001, "Company Codes

vbrk. "Billing Header fgs05/15/02

----

---

• S E L E C T - O P T I O N S / P A R A M E T E R S *

----

---

SELECTION-SCREEN BEGIN OF BLOCK s0

WITH FRAME TITLE text-000. "Processing Criteria:

PARAMETERS:

p_memid(20) TYPE c NO-DISPLAY,

p_commit(4) TYPE n

DEFAULT '5000'

NO-DISPLAY.

SELECTION-SCREEN BEGIN OF LINE.

SELECTION-SCREEN COMMENT 01(31) text-025."Aging currency amount

SELECTION-SCREEN POSITION POS_LOW.

PARAMETERS: "Aging by currency.

p_$wrbtr "Amount in document currency

RADIOBUTTON GROUP age$.

SELECTION-SCREEN COMMENT (09) text-doc."Document

PARAMETERS:

p_$dmbtr "Amount in local currency

DEFAULT 'X'

RADIOBUTTON GROUP age$.

SELECTION-SCREEN COMMENT (09) text-loc."Local

PARAMETERS:

p_$dmbe2 "Amount in Second Local Currency

RADIOBUTTON GROUP age$.

SELECTION-SCREEN COMMENT (09) text-grp."Group

SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN BEGIN OF LINE.

SELECTION-SCREEN COMMENT 01(31) text-026."Aging breakdown

SELECTION-SCREEN POSITION POS_LOW.

PARAMETERS: p_age_1(2) TYPE p

DEFAULT -31.

PARAMETERS: p_age_2 LIKE rfpdo1-allgrogr DEFAULT '001'.

PARAMETERS: p_age_3 LIKE rfpdo1-allgrogr DEFAULT '031'.

PARAMETERS: p_age_4 LIKE rfpdo1-allgrogr DEFAULT '061'.

PARAMETERS: p_age_5 LIKE rfpdo1-allgrogr DEFAULT '091'.

PARAMETERS: p_age_6 LIKE rfpdo1-allgrogr DEFAULT '121'.

SELECTION-SCREEN END OF LINE.

SELECT-OPTIONS: s_fkart FOR vbrk-fkart NO INTERVALS.

PARAMETER p_zgdp AS CHECKBOX.

SELECTION-SCREEN END OF BLOCK s0.

SELECTION-SCREEN BEGIN OF BLOCK a30

WITH FRAME TITLE text-030. "List layout

PARAMETERS:

variant LIKE disvariant-variant,

p_vari LIKE disvariant NO-DISPLAY.

SELECTION-SCREEN END OF BLOCK a30.

CONSTANTS: xfield VALUE 'X'.

INCLUDE zsi00001. "Common include for all programs.

INCLUDE rpr_alv_data.

DATA:

BEGIN OF w,

c LIKE syst-linsz,

jobname LIKE tbtco-jobname,

amount LIKE bseg-dmbtr,

tot_off LIKE bseg-dmbtr,

count LIKE syst-tabix,

commit_cnt(4) TYPE n,

num3(03) TYPE n,

numeric_12(12) TYPE n,

earnable LIKE bseg-dmbtr,

days(4) TYPE p,

first_sw(01) TYPE c,

seq(04) TYPE n,

date01 LIKE syst-datum,

past_inv_date LIKE syst-datum,

num03(03) TYPE n,

clear_rc LIKE syst-subrc,

rpt_no(01) TYPE n,

END OF w.

DATA:

BEGIN OF i_bsik OCCURS 0,

bukrs LIKE bsik-bukrs, "company code

lifnr LIKE bsik-lifnr, "customer number

adrnr LIKE lfa1-adrnr, "Address

name1 LIKE lfa1-name1, "Customer Name 1

telf1 LIKE lfa1-telf1, "First telephone number

gjahr LIKE bsik-gjahr, "fiscal year

belnr LIKE bsik-belnr, "accounting document number

buzei LIKE bsik-buzei, "line item number within t

budat LIKE bsik-budat, "posting date in the docum

bldat LIKE bsik-bldat, "Document date in document

xblnr LIKE bsik-xblnr, "reference document number

blart LIKE bsik-blart, "document type

monat LIKE bsik-monat, "fiscal period

bschl LIKE bsik-bschl, "posting key

shkzg LIKE bsik-shkzg, "debit/credit indicator

waers LIKE bsik-waers, "Currency key

wrbtr LIKE bsik-wrbtr, "Amount in document currency

dmbtr LIKE bsik-dmbtr, "amount in local currency

dmbe2 LIKE bsik-dmbe2, "Amount in Second Local Currency

hkont LIKE bsik-hkont, "g/l account

skfbt LIKE bsik-skfbt, "Amount eligible for cash

zfbdt LIKE bsik-zfbdt, "baseline date for due dat

zterm LIKE bsik-zterm, "Terms of payment key

zbd1t LIKE bsik-zbd1t, "days for first cash disco

zbd2t LIKE bsik-zbd2t, "days for second cash disc

zbd3t LIKE bsik-zbd3t, "net payment terms period

zbd1p LIKE bsik-zbd1p, "cash discount percentage

zbd2p LIKE bsik-zbd2p, "cash discount percentage

wskto LIKE bsik-wskto, "cash discount amount in d

a_dsc LIKE bsik-wskto, "Available disc.(Still earnable

rebzg LIKE bsik-rebzg, "Doc.no.of the invoice to which

rebzj LIKE bsik-rebzj, "Fiscal year of the relevant invo

rebzz LIKE bsik-rebzz, "Line item in the relevant invoic

sgtxt LIKE bsik-sgtxt, "Item text

days(3) TYPE p,

netdt LIKE faede-netdt, "Due date for net payment

bucket0 LIKE bsik-dmbtr, "Total

bucket1 LIKE bsik-dmbtr, "Future

bucket2 LIKE bsik-dmbtr, "Currrent

bucket3 LIKE bsik-dmbtr,

bucket4 LIKE bsik-dmbtr,

bucket5 LIKE bsik-dmbtr,

bucket6 LIKE bsik-dmbtr,

bucket7 LIKE bsik-dmbtr, "121 and over

xref1 LIKE bsik-xref1, "x-ref to sales order

xref2 LIKE bsik-xref2,

xref3 LIKE bsik-xref3,

rstgr LIKE bsik-rstgr,

END OF i_bsik.

DATA: BEGIN OF t_zgdp OCCURS 0,

xref1 LIKE bsik-xref1,

credit,

debit,

• dmbtr like BSIK-dmbtr,

END OF t_zgdp.

DATA:

i_fieldcat TYPE slis_t_fieldcat_alv WITH HEADER LINE.

INITIALIZATION.

pgm = disvariant-report = sy-repid.

PERFORM assign_eom_date USING kd_stida.

AT USER-COMMAND.

CASE sy-ucomm.

WHEN 'ITEM'.

PERFORM display_selected_item.

ENDCASE.

AT SELECTION-SCREEN.

AT SELECTION-SCREEN ON variant.

CLEAR p_vari.

CHECK NOT variant IS INITIAL.

PERFORM check_variant_existence USING variant 'A'.

p_vari-report = syst-repid.

p_vari-variant = variant.

CALL FUNCTION 'REUSE_ALV_VARIANT_EXISTENCE'

EXPORTING

i_save = 'A'

CHANGING

cs_variant = p_vari.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR variant.

PERFORM f4_display_variant USING variant 'A'.

START-OF-SELECTION.

COMMIT WORK.

GET bsik.

MOVE-CORRESPONDING lfa1 TO i_bsik.

MOVE-CORRESPONDING bsik TO i_bsik.

APPEND i_bsik.

END-OF-SELECTION.

PERFORM reset_system_clock. " Reset task clock with COMMIT

PERFORM process_oi TABLES i_bsik

USING kd_stida.

COMMIT WORK.

IF p_memid IS INITIAL.

PERFORM: call_list_viewer.

ELSE.

LOOP AT i_bsik.

AT LAST.

SUM.

EXPORT i_bsik-bucket2 i_bsik-bucket3 i_bsik-bucket4

i_bsik-bucket5 i_bsik-bucket6 i_bsik-bucket7

TO MEMORY ID p_memid.

ENDAT.

ENDLOOP.

ENDIF.

TOP-OF-PAGE.

PERFORM top_of_page.

----

---

• FORM TOP_OF_PAGE *

----

---

• ........ *

----

---

FORM top_of_page.

PERFORM standard_headings.

FORMAT COLOR COL_HEADING.

• Individual report headings & columns.

WRITE:/001 'Key date -',

kd_stida.

FORMAT COLOR OFF.

FORMAT INTENSIFIED OFF.

ENDFORM. "TOP_OF_PAGE

----

---

• FORM PROCESS_OI *

----

---

• ........ *

----

---

• --> A_OI *

• --> A_BUKRS *

• --> A_HKONT *

• --> A_AGEDTE *

• --> A_TOTAL *

• --> A_TOT_ERN *

----

---

FORM process_oi TABLES a_oi STRUCTURE i_bsik

USING a_agedte.

w-rpt_no = 2.

SORT a_oi. " by kunnr.

w-c = syst-linsz.

CLEAR: w-commit_cnt.

LOOP AT a_oi.

• Reset system clock?

w-commit_cnt = w-commit_cnt + 1.

IF w-commit_cnt GE p_commit.

CLEAR w-commit_cnt.

PERFORM reset_system_clock. "Reset task clock with COMMIT

ENDIF.

PERFORM sign_amount USING a_oi-wrbtr

a_oi-shkzg.

PERFORM sign_amount USING a_oi-dmbtr

a_oi-shkzg.

PERFORM sign_amount USING a_oi-dmbe2

a_oi-shkzg.

CLEAR faede.

MOVE-CORRESPONDING a_oi TO faede.

faede-koart = 'D'.

CALL FUNCTION 'DETERMINE_DUE_DATE'

EXPORTING

i_faede = faede

IMPORTING

e_faede = faede

EXCEPTIONS

account_type_not_supported = 1

OTHERS = 2.

PERFORM disc_amt_earnable USING faede

a_agedte

a_oi-wskto

a_oi-skfbt

a_oi-zbd1p

a_oi-zbd2p

a_oi-a_dsc.

a_oi-days = a_agedte - faede-netdt.

a_oi-netdt = faede-netdt.

IF p_$wrbtr <> space.

a_oi-bucket0 = a_oi-wrbtr.

ELSEIF p_$dmbtr <> space.

a_oi-bucket0 = a_oi-dmbtr.

ELSE.

a_oi-bucket0 = a_oi-dmbe2.

ENDIF.

a_oi-bucket0 = a_oi-dmbtr.

IF a_oi-days < p_age_1.

a_oi-bucket1 = a_oi-bucket0.

ELSEIF a_oi-days < p_age_2.

a_oi-bucket2 = a_oi-bucket0.

ELSEIF a_oi-days < p_age_3.

a_oi-bucket3 = a_oi-bucket0.

ELSEIF a_oi-days < p_age_4.

a_oi-bucket4 = a_oi-bucket0.

ELSEIF a_oi-days < p_age_5.

a_oi-bucket5 = a_oi-bucket0.

ELSEIF a_oi-days < p_age_6.

a_oi-bucket6 = a_oi-bucket0.

ELSE.

a_oi-bucket7 = a_oi-bucket0.

ENDIF.

ENDLOOP.

IF p_zgdp EQ 'X'.

LOOP AT a_oi.

CHECK NOT a_oi-xref1 IS INITIAL.

READ TABLE t_zgdp WITH KEY xref1 = a_oi-xref1 BINARY SEARCH.

CHECK sy-subrc EQ 0.

IF t_zgdp-credit EQ 'X' AND t_zgdp-debit EQ ' '.

DELETE a_oi.

CONTINUE.

ENDIF.

ENDLOOP.

ENDIF.

ENDFORM. "PROCESS_OI

----

---

• FORM display_selected_item *

----

---

• ........ *

----

---

FORM display_selected_item.

DATA:

BEGIN OF l,

belnr LIKE bseg-belnr, " Belegnummer

END OF l.

GET CURSOR LINE syst-lilli.

READ LINE syst-lilli FIELD VALUE i_bsik-belnr INTO l-belnr.

IF l-belnr IS INITIAL.

MESSAGE s315(f4).

ELSE.

PERFORM view_fi_item USING i_bsik-bukrs

i_bsik-belnr

i_bsik-gjahr

i_bsik-buzei.

ENDIF.

ENDFORM. "display_selected_item

----

---

• FORM ASSIGN_EOM_DATE *

----

---

• ........ *

----

---

• --> A_EOM_DATE *

----

---

FORM assign_eom_date USING a_eom_date.

a_eom_date+06(02) = '01'. "Force in first day of month.

a_eom_date = a_eom_date - 1.

ENDFORM. "ASSIGN_EOM_DATE

----

---

• FORM SIGN_AMOUNT *

----

---

• ........ *

----

---

• --> A_AMOUNT *

• --> A_SIGN *

----

---

FORM sign_amount USING a_amount

a_sign.

IF a_sign = 'H'.

a_amount = a_amount * -1.

ENDIF.

ENDFORM. "sign_amount

----

---

• FORM view_fi_item *

----

---

• ........ *

----

---

FORM view_fi_item USING a_bukrs

a_belnr

a_gjahr

a_buzei.

• Generic code lifted fro program SAPF101. Do a where used on dialog

• "RF_ZEILEN_ANZEIGE".

DATA:

BEGIN OF buztab OCCURS 0,

bukrs LIKE bseg-bukrs, " Company code

belnr LIKE bseg-belnr, " Acct document number

gjahr LIKE bseg-gjahr, " Fiscal year

buzei LIKE bseg-buzei, " Line item number within t

flaen(1) TYPE c, " X = Posten geaendert

END OF buztab.

DATA:

buztab-zeile LIKE sy-tabix, " anzuzeigende Zeile

x_nochange(1) TYPE c, " keine Aenderung

x_commit(1) TYPE c. " Commit ausfuehren

buztab-buzei = buztab-zeile = a_buzei. " Line item number

buztab-bukrs = a_bukrs. " Company code

buztab-gjahr = a_gjahr. " Fiscal year

buztab-belnr = a_belnr. " Acct document number

APPEND buztab.

IF buztab-zeile IS INITIAL.

MESSAGE e315(f4).

ENDIF.

x_nochange = space. "<== On/Off "change" ICON.

CALL DIALOG 'RF_ZEILEN_ANZEIGE'

EXPORTING

buztab

buztab-zeile

tcode FROM 'FB03'

x_nochange

x_commit.

• If some changes done ...

• IF X_COMMIT EQ 'X'.

COMMIT WORK.

• ENDIF.

ENDFORM. "view_fi_item

----

---

• FORM WRT_ULINE *

----

---

• ........ *

----

---

FORM wrt_uline.

WRITE AT /001(syst-linsz) sy-uline.

ENDFORM. "wrt_uline

----

---

• FORM BUILD_FIELDCAT

----

---

• Build field catalog for ABAP listviewer

----

---

FORM build_fieldcat.

FIELD-SYMBOLS: <fs> LIKE fieldcat_ln.

CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'

EXPORTING

i_program_name = pgm

i_internal_tabname = 'I_BSIK'

i_inclname = pgm

CHANGING

ct_fieldcat = fieldcat

EXCEPTIONS

inconsistent_interface = 1

program_error = 2

OTHERS = 3.

IF sy-subrc <> 0.

ENDIF.

i_fieldcat[] = fieldcat[].

LOOP AT i_fieldcat.

CLEAR i_fieldcat-key.

CASE i_fieldcat-fieldname.

WHEN 'A_DSC'.

i_fieldcat-seltext_l = 'Avail.Dsc.'.

PERFORM numeric_alv USING i_fieldcat.

WHEN 'BLART'.

i_fieldcat-seltext_l = 'DT'.

i_fieldcat-outputlen = 2.

WHEN 'BSCHL'.

i_fieldcat-seltext_l = 'PK'.

WHEN 'BUCKET0'.

i_fieldcat-seltext_l = 'Amount'.

PERFORM numeric_alv USING i_fieldcat.

WHEN 'BUCKET1'.

i_fieldcat-seltext_l = 'Future'.

PERFORM numeric_alv USING i_fieldcat.

WHEN 'BUCKET2'.

i_fieldcat-seltext_l = 'Current'.

PERFORM numeric_alv USING i_fieldcat.

WHEN 'BUCKET3'.

w-num3 = p_age_3 - 1.

CONCATENATE p_age_2

'_'

w-num3

INTO i_fieldcat-seltext_l.

CONCATENATE i_fieldcat-seltext_l

'days'

INTO i_fieldcat-seltext_l SEPARATED BY space.

PERFORM numeric_alv USING i_fieldcat.

WHEN 'BUCKET4'.

w-num3 = p_age_4 - 1.

CONCATENATE p_age_3

'_'

w-num3

INTO i_fieldcat-seltext_l.

CONCATENATE i_fieldcat-seltext_l

'days'

INTO i_fieldcat-seltext_l SEPARATED BY space.

PERFORM numeric_alv USING i_fieldcat.

WHEN 'BUCKET5'.

w-num3 = p_age_5 - 1.

CONCATENATE p_age_4

'_'

w-num3

INTO i_fieldcat-seltext_l.

CONCATENATE i_fieldcat-seltext_l

'days'

INTO i_fieldcat-seltext_l SEPARATED BY space.

PERFORM numeric_alv USING i_fieldcat.

WHEN 'BUCKET6'.

w-num3 = p_age_6 - 1.

CONCATENATE p_age_5

'_'

w-num3

INTO i_fieldcat-seltext_l.

CONCATENATE i_fieldcat-seltext_l

'days'

INTO i_fieldcat-seltext_l SEPARATED BY space.

PERFORM numeric_alv USING i_fieldcat.

WHEN 'BUCKET7'.

CONCATENATE p_age_6

'& over'

INTO i_fieldcat-seltext_l SEPARATED BY space.

PERFORM numeric_alv USING i_fieldcat.

WHEN 'BUKRS'.

i_fieldcat-reprep = 'X'.

i_fieldcat-seltext_l = ' CC '.

i_fieldcat-outputlen = 4.

WHEN 'BUZEI'.

i_fieldcat-seltext_l = 'Itm'.

i_fieldcat-outputlen = 3.

WHEN 'DMBE2'.

i_fieldcat-seltext_l = 'Grp.Crcy.Amt'.

PERFORM numeric_alv USING i_fieldcat.

WHEN 'DMBTR'.

i_fieldcat-seltext_l = 'Loc.Crcy.Amt'.

PERFORM numeric_alv USING i_fieldcat.

WHEN 'KUNNR'.

i_fieldcat-reprep = 'X'.

WHEN 'WAERS'.

i_fieldcat-seltext_l = 'Curr.'.

WHEN 'WRBTR'.

i_fieldcat-seltext_l = 'Doc.Crcy.Amt'.

PERFORM numeric_alv USING i_fieldcat.

WHEN 'WSKTO'.

PERFORM numeric_alv USING i_fieldcat.

ENDCASE.

i_fieldcat-reptext_ddic = i_fieldcat-seltext_l.

MODIFY i_fieldcat.

ENDLOOP.

fieldcat[] = i_fieldcat[].

ENDFORM. "BUILD_FIELDCAT

----

---

• FORM NUMERIC_ALV *

----

---

• ........ *

----

---

• --> A *

----

---

FORM numeric_alv USING a STRUCTURE i_fieldcat.

a-do_sum = 'X'.

a-no_zero = 'X'.

ENDFORM. "NUMERIC_ALV

----

---

• FORM CALL_LIST_VIEWER *

----

---

• ........ *

----

---

FORM call_list_viewer.

DATA:

excltab TYPE slis_t_extab,

i_events TYPE slis_t_event,

eventcat_ln LIKE LINE OF eventcat,

i_sort TYPE slis_t_sortinfo_alv,

h_sort TYPE slis_sortinfo_alv.

eventcat_ln-name = eventcat_ln-form = slis_ev_top_of_page.

APPEND eventcat_ln TO i_events.

REFRESH i_sort.

• Sort 1

CLEAR h_sort.

h_sort-spos = 1.

h_sort-fieldname = 'BUKRS'.

h_sort-tabname = 'I_BSIK'.

h_sort-up = 'X'.

h_sort-group = 'X'.

h_sort-subtot = 'X'.

APPEND h_sort TO i_sort.

• Sort 2

CLEAR h_sort.

h_sort-spos = 2.

h_sort-fieldname = 'KUNNR'.

h_sort-tabname = 'I_BSIK'.

h_sort-up = 'X'.

h_sort-group = 'X'.

h_sort-subtot = 'X'.

APPEND h_sort TO i_sort.

PERFORM: build_fieldcat.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

i_callback_program = pgm

i_callback_user_command = 'USER_COMMAND'

it_fieldcat = fieldcat

it_sort = i_sort

it_events = i_events

i_save = 'A'

is_variant = p_vari

TABLES

t_outtab = i_bsik

EXCEPTIONS

program_error = 1

OTHERS = 2.

ENDFORM. "CALL_LIST_VIEWER

----

---

• FORM USER_COMMAND *

----

---

• ........ *

----

---

• --> UCOMM *

• --> SELFIELD *

----

---

FORM user_command USING ucomm LIKE sy-ucomm

selfield TYPE slis_selfield.

READ TABLE i_bsik INDEX selfield-tabindex.

IF sy-subrc <> 0.

• Cursor is not positioned on a list line

EXIT.

ENDIF.

CASE ucomm.

WHEN '&IC1'.

• F2 or double click on the list

PERFORM view_fi_item USING i_bsik-bukrs

i_bsik-belnr

i_bsik-gjahr

i_bsik-buzei.

ENDCASE.

ENDFORM. "USER_COMMAND

----

---

• FORM DISC_AMT_EARNABLE *

----

---

• ........ *

----

---

• --> FAEDE *

• --> A_AGEDTE *

• --> A_WSKTO *

• --> A_SKFBT *

• --> A_ZBD1P *

• --> A_ZBD2P *

• --> A_EARNABLE_DISC *

----

---

FORM disc_amt_earnable USING faede STRUCTURE faede

a_agedte

a_wskto

a_skfbt

a_zbd1p

a_zbd2p

a_earnable_disc.

DATA:

BEGIN OF l,

seitzfbdt TYPE i, " Tage seit ZFBDT (PGM RFEPOSSF

END OF l.

l-seitzfbdt = a_agedte - faede-zfbdt.

IF NOT faede-zfbdt IS INITIAL.

IF l-seitzfbdt <= faede-zbd1t.

IF a_wskto IS INITIAL.

a_earnable_disc = a_skfbt * a_zbd1p / 100.

ELSE.

a_earnable_disc = a_wskto.

ENDIF.

ELSE.

IF l-seitzfbdt <= faede-zbd2t.

a_earnable_disc = a_skfbt * a_zbd2p / 100.

ENDIF.

ENDIF.

ENDIF.

• If a discount is earnable, then compute sign to match to open item.

IF a_earnable_disc IS INITIAL.

EXIT.

ELSE.

PERFORM sign_amount USING a_earnable_disc

faede-shkzg.

ENDIF.

ENDFORM. "DISC_AMT_EARNABLE[/code]

[Former Member]

What is the error given by the dump?

Rob

[Former Member]

The Error Analysis.

However in the code posted I have changes KUNNR to LIFNR.

The program tried to assign a new value to a field even though

it is protected against changes.

The following objects are protected:

- Character or numeric literals,

- Constants (CONSTANTS),

- Function module and method parameters with the type IMPORTING

REFERENCE,

- Untyped field symbols to which a field has not yet been assigned

using ASSIGN,

- TABLES parameters, if the corresponding actual parameter is protected

against changes,

- USING reference parameters and CHANGING parameters in subroutines, if

the

actual parameter is protected against changes,

- Field symbols, if the field assigned using ASSIGN is protected against

changes,

- External write access to attributes with the READ-ONLY property,

- Key components of lines of internal tables with the type HASHED or

SORTED TABLE.

Ster

[RichHeilman]

Where is the dump pointing to in the code?

Regards,

Rich Heilman

[Former Member]

Looks like type-confilict problem ,Keep the break point at function moudle and see what are the values at internal table

[Former Member]

Thanks Got it.

Ster.

[Former Member]

Hi,

I guess the short dump is because of Type Conflict. usually we get this type of short dumps when we use FMs. This is because there is data type mismatch between the exporting parameter and the FM parameter.

Apart from this, you have to pass sy-repid to i_inclname also to the FM.

check your exporting parameters.

thanks,

sksingh