fd32

FD32 is the transaction for changing Customer credit management. By simply entering the customer number and credit control area, u can see the overview of the customer, also u can change the address and central data. also u can change the status and payment history.

Please reward points if useful. Also if u have further doubts, shoot here...

See the sample program for BDc FD32

report ZFIEX_CUST_BDC

no standard page heading line-size 255.

include bdcrecx1.

tables: knkk.

types:

begin of it_kna1,

kunnr like rf02l-kunnr,

kkber like rf02l-kkber,

D0210 like rf02l-D0210,

klimk like knkk-klimk,

ctlpc like knkk-ctlpc,

crblb like knkk-crblb,

end of it_kna1.

data: it_kna type it_kna1 occurs 0 with header line,

x_kna type it_kna1.

data: l_file type ibipparms-path.

selection-screen begin of block b1 with frame title text-001.

parameters: p_file like rlgrap-filename.

selection-screen end of block b1.

at selection-screen on value-request for p_file.

perform get_f4_help using p_file.

start-of-selection.

call function 'WS_UPLOAD'

exporting

• CODEPAGE = ' '

filename = p_file

filetype = 'DAT'

• HEADLEN = ' '

• LINE_EXIT = ' '

• TRUNCLEN = ' '

• USER_FORM = ' '

• USER_PROG = ' '

• DAT_D_FORMAT = ' '

• IMPORTING

• FILELENGTH =

tables

data_tab = it_kna

exceptions

conversion_error = 1

file_open_error = 2

file_read_error = 3

invalid_type = 4

no_batch = 5

unknown_error = 6

invalid_table_width = 7

gui_refuse_filetransfer = 8

customer_error = 9

no_authority = 10

others = 11

.

if sy-subrc <> 0.

message id sy-msgid type sy-msgty number sy-msgno

with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.

endif.

perform open_group.

loop at it_kna.

perform bdc_dynpro using 'SAPMF02C' '0100'.

perform bdc_field using 'BDC_CURSOR'

'RF02L-D0210'.

perform bdc_field using 'BDC_OKCODE'

'/00'.

perform bdc_field using 'RF02L-KUNNR'

'10030011'.

perform bdc_field using 'RF02L-KKBER'

'1000'.

perform bdc_field using 'RF02L-D0210'

'X'.

perform bdc_dynpro using 'SAPMF02C' '0210'.

perform bdc_field using 'BDC_CURSOR'

'KNKK-CRBLB'.

perform bdc_field using 'BDC_OKCODE'

'=UPDA'.

perform bdc_field using 'KNKK-KLIMK'

''.

perform bdc_field using 'KNKK-KNKLI'

'10030011'.

perform bdc_field using 'KNKK-CTLPC'

''.

perform bdc_field using 'KNKK-CRBLB'

''.

perform bdc_field using 'KNKK-SBGRP'

'001'.

perform bdc_transaction using 'FD32'.

endloop.

perform close_group.

end-of-selection.

loop at it_kna.

write:/1 sy-vline, it_kna-kunnr,

sy-vline, it_kna-kkber,

sy-vline, it_kna-D0210,

sy-vline, it_kna-klimk,

sy-vline, it_kna-ctlpc,

sy-vline, it_kna-crblb,

sy-vline.

endloop.

&----

*& Form GET_F4_HELP

&----

• text

----

• -->P_P_FILE text

----

form get_f4_help using p_file.

call function 'F4_FILENAME'

exporting

program_name = sy-cprog

dynpro_number = sy-dynnr

• FIELD_NAME = ' '

importing

file_name = l_file

.

if sy-subrc = 0.

p_file = l_file.

endif.

ENDFORM.

see this forum thread

passing values for chekbox