Adding 30 days from sysdate or any date in SAP script

[Former Member]

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...

[Former Member]

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

[Former Member]

hi mathias,

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

[Former Member]

Hi

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

If you dont mind my email is mathias.mbizvo@ifmis.gov.zm >> whats yours

[Former Member]

: 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

[Former Member]

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.