Re: BDC issue in ME41

Hello Please find below the code.

report ZVR_ME41

       no standard page heading line-size 255.

include bdcrecx1.

start-of-selection.

perform open_group.

perform bdc_dynpro      using 'SAPMM06E' '0300'.

perform bdc_field       using 'BDC_CURSOR'

                              'EKKO-EKGRP'.

perform bdc_field       using 'BDC_OKCODE'

                              '/00'.

perform bdc_field       using 'RM06E-ASART'

                              'ZQFM'.

perform bdc_field       using 'EKKO-SPRAS'

                              'EN'.

perform bdc_field       using 'RM06E-ANFDT'

                              '15.07.2014'.

perform bdc_field       using 'EKKO-ANGDT'

                              '30.07.2014'.

perform bdc_field       using 'EKKO-EKORG'

                              '3000'.

perform bdc_field       using 'EKKO-EKGRP'

                              '995'.

perform bdc_field       using 'RM06E-LPEIN'

                              ''.

perform bdc_field       using 'RM06E-LGORT'

                              ''.

perform bdc_dynpro      using 'SAPMM06E' '0514'.

perform bdc_field       using 'BDC_CURSOR'

                              'EKKO-BUKRS'.

perform bdc_field       using 'BDC_OKCODE'

                              '=ENTE'.

perform bdc_field       using 'EKKO-BUKRS'

                              '3402'.

perform bdc_dynpro      using 'SAPMM06E' '0301'.

perform bdc_field       using 'BDC_CURSOR'

                              'EKKO-KDATE'.

perform bdc_field       using 'BDC_OKCODE'

                              '/00'.

perform bdc_field       using 'EKKO-EKGRP'

                              '995'.

perform bdc_field       using 'EKKO-PINCR'

                              '1'.

perform bdc_field       using 'EKKO-SPRAS'

                              'EN'.

perform bdc_field       using 'EKKO-UPINC'

                              '1'.

perform bdc_field       using 'EKKO-ANGDT'

                              '30.07.2014'.

perform bdc_field       using 'EKKO-KDATB'

                              '01.05.2014'.

perform bdc_field       using 'EKKO-KDATE'

                              '30.07.2014'.

perform bdc_dynpro      using 'SAPMM06E' '0320'.

perform bdc_field       using 'BDC_CURSOR'

                              'RM06E-ANFPS(01)'.

perform bdc_field       using 'BDC_OKCODE'

                              '=DETA'.

perform bdc_field       using 'EKKO-ANGDT'

                              '30.07.2014'.

perform bdc_field       using 'RM06E-TCSELFLAG(01)'

                              'X'.

perform bdc_field       using 'EKPO-EMATN(01)'

                              'pickup'.

perform bdc_field       using 'RM06E-ANMNG(01)'

                              '                2'.

perform bdc_field       using 'RM06E-EEIND(01)'

                              '30.09.2014'.

perform bdc_dynpro      using 'SAPMM06E' '0311'.

perform bdc_field       using 'BDC_OKCODE'

                              '/00'.

perform bdc_field       using 'EKPO-TXZ01'

                              'Pickup'.

perform bdc_field       using 'RM06E-ANMNG'

                              '2.000'.

perform bdc_field       using 'EKPO-AGDAT'

                              '30.07.2014'.

perform bdc_field       using 'RM06E-EEIND'

                              '30.09.2014'.

perform bdc_field       using 'RM06E-LPEIN'

                              'D'.

perform bdc_field       using 'BDC_CURSOR'

                              'EKPO-ZPICKVENDOR'.

perform bdc_field       using 'EKPO-ZSERCOMBO'

                              '0810FIHL'.

perform bdc_field       using 'EKPO-ZDISPLOC'

                              '4285'.

perform bdc_field       using 'EKPO-ZPICKVENDOR'

                              '1615'.

perform bdc_dynpro      using 'SAPMM06E' '0320'.

perform bdc_field       using 'BDC_CURSOR'

                              'RM06E-ANFPS(01)'.

perform bdc_field       using 'BDC_OKCODE'

                              '=LS'.

perform bdc_field       using 'EKKO-ANGDT'

                              '30.07.2014'.

perform bdc_field       using 'RM06E-EBELP'

                              '1'.

perform bdc_field       using 'RM06E-TCSELFLAG(01)'

                              'X'.

perform bdc_dynpro      using 'SAPMM06E' '0140'.

perform bdc_field       using 'BDC_CURSOR'

                              'EKKO-LIFNR'.

perform bdc_field       using 'BDC_OKCODE'

                              '/00'.

perform bdc_field       using 'EKKO-LIFNR'

                              '0000037833'.

perform bdc_dynpro      using 'SAPMM06E' '0140'.

perform bdc_field       using 'BDC_CURSOR'

                              'EKKO-LIFNR'.

perform bdc_field       using 'BDC_OKCODE'

                              '=BU'.

perform bdc_field       using 'EKKO-LIFNR'

                              '37833'.

perform bdc_field       using 'ADDR1_DATA-NAME1'

                              'OFFICEWORKS - COLES'.

perform bdc_field       using 'ADDR1_DATA-SORT1'

                              'OFFICEWORK'.

perform bdc_field       using 'ADDR1_DATA-STREET'

                              '201 VICTORIA ST'.

perform bdc_field       using 'ADDR1_DATA-POST_CODE1'

                              '3003'.

perform bdc_field       using 'ADDR1_DATA-CITY1'

                              'WEST MELBOURNE'.

perform bdc_field       using 'ADDR1_DATA-COUNTRY'

                              'AU'.

perform bdc_field       using 'ADDR1_DATA-REGION'

                              'VIC'.

perform bdc_field       using 'ADDR1_DATA-TIME_ZONE'

                              'AUSVIC'.

perform bdc_field       using 'ADDR1_DATA-TRANSPZONE'

                              'Z1'.

perform bdc_field       using 'ADDR1_DATA-LANGU'

                              'EN'.

perform bdc_field       using 'SZA1_D0100-TEL_NUMBER'

                              '03/9326-5888'.

perform bdc_field       using 'SZA1_D0100-FAX_NUMBER'

                              '03 9326 8610'.

perform bdc_field       using 'SZA1_D0100-SMTP_ADDR'

                              'paul.eudey@visy.com.au'.

perform bdc_field       using 'ADDR1_DATA-DEFLT_COMM'

                              'INT'.

perform bdc_transaction using 'ME41'.

perform close_group.

But its not passing the begin and end date.

Regards,

Vadamalai A.