Berechtigungseinschränkung CO11N

Code: Alles auswählen.

* Rückmeldedaten nur prüfen, wenn Daten gegenüber dem letzten Update
* der Belegtabllen geändert wurden bzw. noch kein Belegtabelle fort-
* geschrieben wurde
  IF gs_afrud_sav IS INITIAL OR
     gs_afrud_sav <> afrud.
*   Customer-Exit mit Änderungsmöglichkeit der AFRUD
*   NAMTAB initial heißt, daß alle Prüfungen durchlaufen werden
*   ebenso bei Aufruf über Sammelrückmeldung
    IF namtab[] IS INITIAL.
      PERFORM process_customer_func_check_1 USING caufvd_in
                                                  afvgd
                                         CHANGING afrud.
    ENDIF.
*   Wenn Rückmeldung zum Auftragskopf oder zum Zählpunkt des Serien-
*   auftrags, dann fest definierte Prüflogik
*   Nicht bei Simulation der Vorgangsrückmeldung aus Kopfrückmeldung
    IF i_oper_simul IS INITIAL AND( NOT flg_order_conf IS INITIAL OR
         ( caufvd-autyp = auftragstyp-corp AND
*          nicht bei vorgangsweiser Rückmeld. zum Serienauftrag
           opr_cnf_corp IS INITIAL ) ).

...

ELSE.
      IF rc27s-aktyp = anlegen.
        IF NOT flg_activ_conf IS INITIAL.
*         Leistungsrückmeldung
*         Buchungsdatum prüfen
          PERFORM check_budat.
*         Werk und Arbeitsplatz prüfen
          PERFORM check_arbpl.