Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Adding 30 days from sysdate or any date in SAP script

Former Member
0 Likes
1,175

Ho do I add a some days to a date in SAP Scripts. I have tried using a the following procedure.

/: DEFINE NEW_dATE = ' '

/: PERFORM ADD_DATE IN PROGRAM ZREP01

/: USING &SY-DATUM&

/: CHANGING &NEW_DATE&

/: ENDPERFORM

  • New date = &NEW_DATE&

In the program ZREP01

FORM ADD_DATE TABLE INTAB STRUCTURE ITCSY

OUTTAB STRUCTURE ITCSY .

READ TABLE INTAB INDEX 1.

OUTTAB-VALUE = INTAB-VAUE.

ADD 1 TO OUTTAB-VALUE.

CONDENSE OUTTAB-VALUE.

MODIFY OUTTAB INDEX 1.

ENDFORM.

However a value 'XX.XX.XXXX' is being passed to intab istead of the system date.

An exception is being thrown.

What could be causing that and what cold be the remedy to that problem...

Ho do I add a some days to a date in SAP Scripts. I have tried using a the following procedure.

/: DEFINE NEW_dATE = ' '

/: PERFORM ADD_DATE IN PROGRAM ZREP01

/: USING &SY-DATUM&

/: CHANGING &NEW_DATE&

/: ENDPERFORM

  • New date = &NEW_DATE&

In the program ZREP01

FORM ADD_DATE TABLE INTAB STRUCTURE ITCSY

OUTTAB STRUCTURE ITCSY .

READ TABLE INTAB INDEX 1.

OUTTAB-VALUE = INTAB-VAUE.

ADD 1 TO OUTTAB-VALUE.

CONDENSE OUTTAB-VALUE.

MODIFY OUTTAB INDEX 1.

ENDFORM.

However a value 'XX.XX.XXXX' is being passed to intab istead of the system date.

An exception is being thrown.

What could be causing that and what cold be the remedy to that problem...

5 REPLIES 5
Read only

Former Member
0 Likes
882

hi try like this.

: DEFINE NEW_dATE = ' '

/: PERFORM ADD_DATE IN PROGRAM ZREP01

/: USING &SY-DATUM&

/: CHANGING &NEW_DATE&

/: ENDPERFORM

  • New date = &NEW_DATE&

In the program ZREP01

FORM ADD_DATE TABLE INTAB STRUCTURE ITCSY

OUTTAB STRUCTURE ITCSY .

READ TABLE INTAB INDEX 1.

data: old_date type sy-datum.

OUTTAB-VALUE = INTAB-VAUE.

old_date = OUTTAB-VALUE.

old_date = old_date + 30.

OUTTAB-VALUE = old_date.

CONDENSE OUTTAB-VALUE.

MODIFY OUTTAB INDEX 1.

ENDFORM.

Regs

Manas

Read only

Former Member
0 Likes
882

hi mathias,

Did you check my solution in your previous post...it should work

Read only

0 Likes
882

Hi

Thanks for the solution. It worked well and the problem is solved. I have rewarded points.

If you dont mind my email is [email protected] >> whats yours

Read only

Former Member
0 Likes
882

: DEFINE NEW_DATE = ' '

/: PERFORM ADD_DATE IN PROGRAM ZREP01

/: USING &date1&

/: CHANGING &NEW_DATE&

/: ENDPERFORM

  • New date = &NEW_DATE&

In the program ZREP01

FORM ADD_DATE TABLE INTAB STRUCTURE ITCSY

OUTTAB STRUCTURE ITCSY .

data : v_temp like sy-datum.

READ TABLE INTAB with key name = 'DATE1'.

IF SY-SUBRC = 0.

CALL FUNCTION 'RP_CALC_DATE_IN_INTERVAL'

EXPORTING

DATE = intab-date1

days = 30

importing

calc_date = v_temp.

read table outtab with key name = 'NEW_DATE'.

if sy-subrc = 0.

OUTTAB-VALUE = v_temp.

modify outtab index sy-tabix.

endif.

ENDFORM.

Regards

Vasu

Read only

Former Member
0 Likes
882

hi. thanks for your response. I have tried the code, but it is giving an error that

DEFINE NEW_DATE=' '

<b>Symbol expected</b>

on changing to DEFINE &NEW_DATE& no error is reported but no output of &new_date& is produced in the form.