Ansicht
Dokumentation

CATP0001 - Vorgabestunden ermitteln

CATP0001 - Vorgabestunden ermitteln

BAL_S_LOG - Application Log: Log header data   PERFORM Short Reference  
Diese Dokumentation steht unter dem Copyright der SAP AG.
SAP E-Book

Mit Hilfe dieser Erweiterung können Sie die Vorgabestunden individuell füllen. Dabei können Sie die im Erfassungsprofil getroffenen Angaben aus den Feldern Zeitart Vorgabestunden, Sub. HR Stunden und Add. Mehrarbeit verwenden.

Beispiele

An Tagen, die laut Werkskalender arbeitsfrei sind, werden die Vorgabestunden auf 0 Stunden, ansonsten auf 8 Stunden gesetzt.

tables: t001w.
data: is_0315 type cats_0315,
      is_target_hours type cats_hours_per_day.
data: plant like ps0315-werks,
     default_plant like ps0315-werks value '0001',
     workingday_indicator like scal-indicator,
     date like catsdb-workdate,
     working_hours like cats_hours_per_day-stdaz value 8.

* Read plant from infotype 0315
  CALL FUNCTION 'CATS_GET_INFOTYPE_0315'
       EXPORTING
            PERNR           = sap_pernr
            DATE            = sap_begda
       IMPORTING
            I0315           = is_0315
       EXCEPTIONS
            others          = 1.

  if is_0315-werks is initial.
    is_0315-werks = default_plant.
  endif.
 if t001w-werks <> is_0315-werks.
    select single * from t001w
      where werks = is_0315-werks.
  endif.

  date = sap_begda.
  while date <= sap_endda.
    clear is_target_hours.
    is_target_hours-date = date.

*   Check calendar for working days
    CALL FUNCTION 'DATE_CONVERT_TO_FACTORYDATE'
         EXPORTING
              DATE                         = date
              FACTORY_CALENDAR_ID          = T001W-FABKL
         IMPORTING
              WORKINGDAY_INDICATOR         = workingday_indicator
         EXCEPTIONS
              others                       = 1.
    if sy-subrc &lt;&gt; 0.
      raise error_in_sap_enhancement.
    endif.
   if workingday_indicator is initial.
     is_target_hours-stdaz = working_hours.
    endif.
    append is_target_hours to sap_target_hours.
    date = date + 1.
  endwhile.






Vendor Master (General Section)   PERFORM Short Reference  
Diese Dokumentation steht unter dem Copyright der SAP AG.

Length: 7041 Date: 20240420 Time: 150436     sap01-206 ( 38 ms )