Problem with submit program rbdcpclr

[Former Member]

HI All,

I am using submit program statement to program rbdcpclr but the date field is not working..It is taking as 00000000...

here is my code

PARAMETERS : p_date LIKE tbdme-credate.

DATA : p_time LIKE bdfields-cretime.

data : git_rspar TYPE STANDARD TABLE OF rsparams,

gwa_rspar TYPE rsparams.

refresh : git_rspar.

wa_rspar-selname = 'TESTMODE'.

gwa_rspar-kind = 'P'.

gwa_rspar-sign = 'I'.

gwa_rspar-option = 'EQ'.

gwa_rspar-low = ''.

APPEND gwa_rspar TO git_rspar.

gwa_rspar-selname = 'P2_READY'.

gwa_rspar-kind = 'P'.

gwa_rspar-sign = 'I'.

gwa_rspar-option = 'EQ'.

gwa_rspar-low = 'X'.

APPEND gwa_rspar TO git_rspar.

gwa_rspar-selname = 'P2_MSGTY'.

gwa_rspar-kind = 'S'.

gwa_rspar-sign = 'I'.

gwa_rspar-option = 'EQ'.

gwa_rspar-low = p_msgtyp.

APPEND gwa_rspar TO git_rspar.

gwa_rspar-selname = 'P2_DATE'.

gwa_rspar-kind = 'S'.

gwa_rspar-sign = 'I'.

gwa_rspar-option = 'EQ'.

*gwa_rspar-low = ''.

*WRITE p_date TO gwa_rspar-high DD/MM/YYYY.

gwa_rspar-high = p_date.

APPEND gwa_rspar TO git_rspar.

p_time = ''.

gwa_rspar-selname = 'P2_TIME'.

gwa_rspar-kind = 'S'.

gwa_rspar-sign = 'I'.

gwa_rspar-option = 'EQ'.

gwa_rspar-low = p_time.

gwa_rspar-high = p_time.

APPEND gwa_rspar TO git_rspar.

SUBMIT zrbdcpclr WITH SELECTION-TABLE git_rspar AND RETURN.

let me know where i was wrong...

Regards,

Raj

[Former Member]

Put a break point on the statement:

gwa_rspar-high = p_date.

and see what value is present in gwa-rspar-high

I do not see how gwa-rspar is being populated?

Regards,

Ravi

[Former Member]

Hi,

I have checked and the value is there in the interbnal table in debug mode

1 SELNAME KIND SIGN OPTION HIGH

1 TESTMODE|P |I |EQ | |

2 P2_READY|P |I |EQ | |

3 P2_MSGTY|S |I |EQ | |

4 P2_DATE |S |I |EQ |20080111 |

but when i submit to the program in the program rbdcpclr its coming as 00000000.

Please help me.

Regards,

Raj

[Former Member]

Hi,

This code is tested.... and it works....

refresh : git_rspar.

wa_rspar-selname = 'TESTMODE'.
gwa_rspar-kind = 'P'.
gwa_rspar-sign = 'I'.
gwa_rspar-option = 'EQ'.
gwa_rspar-low = ''.
APPEND gwa_rspar TO git_rspar.

gwa_rspar-selname = 'P2_READY'.
gwa_rspar-kind = 'P'.
gwa_rspar-sign = 'I'.
gwa_rspar-option = 'EQ'.
gwa_rspar-low = 'X'.
APPEND gwa_rspar TO git_rspar.

gwa_rspar-selname = 'P2_MSGTY'.
gwa_rspar-kind = 'S'.
gwa_rspar-sign = 'I'.
gwa_rspar-option = 'EQ'.
gwa_rspar-low = p_msgtyp.
APPEND gwa_rspar TO git_rspar.

gwa_rspar-selname = 'P2_DATE'.
gwa_rspar-kind = 'S'.
gwa_rspar-sign = 'I'.
gwa_rspar-option = 'BT'.
 gwa_rspar-low = p_date.
 gwa_rspar-high = p_date.
APPEND gwa_rspar TO git_rspar.

p_time = ''.
gwa_rspar-selname = 'P2_TIME'.
gwa_rspar-kind = 'S'.
gwa_rspar-sign = 'I'.
gwa_rspar-option = 'EQ'.
gwa_rspar-low = p_time.
gwa_rspar-high = p_time.
APPEND gwa_rspar TO git_rspar.

SUBMIT rbdcpclr WITH SELECTION-TABLE git_rspar via selection-screen AND RETURN.

Regards,

Siddarth

[Former Member]

Hi,

Great..i have done it but after changing my code....but i will assign you points.

DATA: gv_testmode LIKE bdfields-test,

gv_ready LIKE bdfields-prcessedcp VALUE 'X'.

RANGES: gr_msgtyp FOR edmsg-msgtyp,

gr_date FOR tbdme-credate,

gr_time FOR bdfields-cretime.

gr_msgtyp-sign = 'I'.

gr_msgtyp-option = 'EQ'.

gr_msgtyp-low = 'MATMAS'.

APPEND gr_msgtyp.

CLEAR gr_msgtyp.

gr_date-sign = 'I'.

gr_date-option = 'EQ'.

gr_date-low = ''.

gr_date-high = p_date.

APPEND gr_date.

CLEAR gr_date.

gr_time-sign = 'I'.

gr_time-option = 'EQ'.

gr_time-low = ''.

gr_time-high = ''.

APPEND gr_time.

CLEAR gr_time.

SUBMIT rbdcpclr

WITH testmode = gv_testmode

WITH p2_ready = gv_ready

WITH p2_msgty IN gr_msgtyp

WITH p2_date IN gr_date

WITH p2_time IN gr_time

AND RETURN.

Regards,

Raj

[Former Member]

Its declared as select-options while passing to submit stmt and the low value is empty, only the high value gwa_rspar-high is set as P_DATE.

Even set teh low value to sumthing or P_DATE.

Regards,

Mansi.

[Former Member]

HI,

The date that you are passing to the program zrbdcpclr is in internal SAP format ( i.e YYYYMMDD )

But the field, on the selection screen of the called prog zrbdcpclr , needs date in format 'DD.MM.YYYY'

Kindly change the date format in the internal table before submitting the prog to later format ( ie dd.mm.yyyy)

Hope it helps,

RJ

[Former Member]

Hi Kumar,

just copy and paste the code given below... it should resolve your issue right away...

PARAMETERS : p_date LIKE tbdme-credate.
DATA : p_time LIKE bdfields-cretime.

data : git_rspar TYPE STANDARD TABLE OF rsparams,
gwa_rspar TYPE rsparams.

refresh : git_rspar.

wa_rspar-selname = 'TESTMODE'.
gwa_rspar-kind = 'P'.
gwa_rspar-sign = 'I'.
gwa_rspar-option = 'EQ'.
gwa_rspar-low = ''.
APPEND gwa_rspar TO git_rspar.

gwa_rspar-selname = 'P2_READY'.
gwa_rspar-kind = 'P'.
gwa_rspar-sign = 'I'.
gwa_rspar-option = 'EQ'.
gwa_rspar-low = 'X'.
APPEND gwa_rspar TO git_rspar.

gwa_rspar-selname = 'P2_MSGTY'.
gwa_rspar-kind = 'S'.
gwa_rspar-sign = 'I'.
gwa_rspar-option = 'EQ'.
gwa_rspar-low = p_msgtyp.
APPEND gwa_rspar TO git_rspar.

gwa_rspar-selname = 'P2_DATE'.
gwa_rspar-kind = 'S'.
gwa_rspar-sign = 'I'.
gwa_rspar-option = 'EQ'.
WRITE p_date TO gwa_rspar-low.   " This statement will automatically change the format and 
"  of the display date in the program according to the settings.... and it will also work fine....
" gwa_rspar-low = p_date.
APPEND gwa_rspar TO git_rspar.

p_time = ''.
gwa_rspar-selname = 'P2_TIME'.
gwa_rspar-kind = 'S'.
gwa_rspar-sign = 'I'.
gwa_rspar-option = 'EQ'.
gwa_rspar-low = p_time.
gwa_rspar-high = p_time.
APPEND gwa_rspar TO git_rspar.

SUBMIT zrbdcpclr WITH SELECTION-TABLE git_rspar AND RETURN.

Regards,

Siddarth