topic Regarding ABAP program in Application Development and Automation Discussions

Regarding ABAP program

Former Member — Fri, 23 Nov 2007 05:59:45 GMT

Hi,

i want to write a program such tht it executes only a limited times a day

plz help me regarding this

Re: Regarding ABAP program

Former Member — Fri, 23 Nov 2007 06:01:19 GMT

Hi,

suresh try this code it may solve u r problem..

DATA:count,date LIKE sy-datum.

GET PARAMETER ID 'MAX' field count.

GET PARAMETER ID 'DAT' FIELD date.

IF date is initial.

date = sy-datum.

ENDIF.

IF date = sy-datum.

count = count + 1.

else.

message e000(zmsgtab)."u con't execute it more than once in a day.

endif.

set PARAMETER ID 'MAX' field count.

IF count > 5.

count = 0.

set PARAMETER ID 'MAX' field count.

date = date + 1.

set PARAMETER ID 'DAT' field date.

message e000(zmsgtab)."u con't execute it more than once in a day.

ENDIF.

write:/ 'this is my program'.

Re: Regarding ABAP program

Former Member — Fri, 23 Nov 2007 06:01:24 GMT

Hi,

try this code

REPORT YCL118_RESTICT_EXECUTION.

DATA:count,date LIKE sy-datum.

GET PARAMETER ID 'MAX' field count.

GET PARAMETER ID 'DAT' FIELD date.

IF date is initial.

date = sy-datum.

ENDIF.

IF date = sy-datum.

count = count + 1.

else.

message e000(zmsgtab)."u con't execute it more than once in a day.

endif.

set PARAMETER ID 'MAX' field count.

IF count > 5.

count = 0.

set PARAMETER ID 'MAX' field count.

date = date + 1.

set PARAMETER ID 'DAT' field date.

message e000(zmsgtab)."u con't execute it more than once in a day.

ENDIF.

write:/ 'this is my program'.