Calculating Planning month

Question

Hello,
If i want to calculate planning month from a given date, using function module "week_get_first_day".
my logic is same as we see in SM37, in the job start condition.
if the days in the week are more than 4 the whole seven days are included in current month in not then in previous month.
Seeking advice and solutions.
thankyou in advance.

Answer 1

Hi Abhishek ,
Please use following code and use spaces and brackets in same way as given to avoid syntax errors.
DATA:  V_INPUT_DATE LIKE SY-DATUM ,
            V_OUTPUT_DATE LIKE SY-DATUM,
            V_WEEK(6) TYPE N,
            V_PLANMONTH(2) TYPE N.
***CALCULATE WEEK IN WHICH YOUR INPUT DATE COMES
CALL FUNCTION 'DATE_GET_WEEK'
  EXPORTING
    DATE               = V_INPUT_DATE
IMPORTING
   WEEK               = V_WEEK
EXCEPTIONS
   DATE_INVALID       = 1 .
***CALCULATE FIRST DAY OF THAT WEEK
CALL FUNCTION 'WEEK_GET_FIRST_DAY'
  EXPORTING
    week =  V_WEEK                   
  IMPORTING
    date =   V_OUTPUT_DATE           
  EXCEPTIONS
    WEEK_INVALID = 1  .        
***IF INPUT DATE AND FIRST DAY OF WEEK ARE IN SAME MONTH AND WEEK HAS 4 OR MORE DAYS LIES IN CURRENT MONTH
***OR
***IF FIRST DAY OF WEEK IS NOT IN CURRENT MONTH BUT STILL THAT WEEK HAS 4 OR MORE DAYS IN CURRENT MONTH
IF ( (  V_INPUT_DATE4(2)  =  V_OUTPUT_DATE4(2)  )  AND  (  V_INPUT_DATE6(2)  -  V_OUTPUT_DATE6(2) GE '04'  )  )  OR  (  V_INPUT_DATE+6(2)  GE  '04'  ) .
     V_PLANMONTH  =  V_INPUT_DATE+4(2).
ELSE.
***PLANNING MONTH IS LAST MONTHOTHERWISE
     V_PLANMONTH  =  (  V_INPUT_DATE+4(2)  -  1  ) .
ENDIF.
let me know if you have any other help required .I think this will fulfill your requirement.
Regards,
Jaya