Ansicht
Dokumentation

EXIT_SAPLCOAC_001 -

BAL_S_LOG - Application Log: Log header data   General Material Data  
Diese Dokumentation steht unter dem Copyright der SAP AG.

Mit dieser SAP-Erweiterung können Sie einen Report implementieren, mit dem Sie eine eigene Druckliste (Anwenderliste) für die optische Archivierung von Chargen- und/oder Auftragsprotokollen erzeugen. Diese Druckliste ergänzt die im Standard vorgesehenen Archivierungsdaten wie folgt:

• Beim Auftragsprotokoll wird sie als eigenständige Liste erzeugt und zusammen mit den übrigen auftragsbezogenen Listen archiviert.

• Beim Chargenprotokoll wird sie an die im Standard vorgesehene Druckliste angehängt und als Bestandteil dieser Gesamtliste archiviert.

Schnittstelle der Erweiterung

Folgende Importparameter werden an den Funktionsbaustein der Erweiterung übergeben:

AUFNR	Auftragsnummer
CHARG	Chargennummer
MATNR	Materialnummer
WERKS	Werk
PROTOKOLL_ART	Art des Protokolls, das erzeugt wird:
	1 = Auftragsprotokoll
	2 = Chargenprotokoll

Hinweis zur Verarbeitung

Beim Aufruf des Listreports aus dem Include ZXCOAU01 legen Sie fest, bei welcher Protokollart (Auftrags- oder Chargenprotokoll) Ihre Druckliste archiviert wird. Prüfen Sie hierzu den Wert des Felds PROTOKOLL_ART (siehe Syntaxbeispiel):

• Wenn Ihre Druckliste nur in Auftragsprotokollen archiviert werden soll, muß das Feld PROTOKOLL_ART den Wert 1 enthalten.

• Wenn Ihre Druckliste nur in Chargenprotokollen archiviert werden soll, muß das Feld PROTOKOLL_ART den Wert 2 enthalten.

• Wenn Sie das Feld PROTOKOLL_ART nicht prüfen, wird die Druckliste sowohl in Auftragsprotokollen als auch in Chargenprotokollen archiviert.

Syntaxbeispiel

Aufruf des Listreports aus dem Include ZXCOAU01:

check PROTOKOLL_ART = '1'.  (Liste gilt nur für Auftragsprotokoll)
check PROTOKOLL_ART = '2'.  (Liste gilt nur für Chargenprotokoll)

SUBMIT Listreport
          WITH aufnr = aufnr
          WITH charg = charg
          WITH matnr = matnr
          WITH werks = werks
       EXPORTING LIST TO MEMORY AND RETURN.

Erstellen der Druckliste:

report listreport message-id 40 no standard page heading
                                line-size 132 line-count 65.

parameters: aufnr like caufv-aufnr,       "Prozeßauftrag
            charg like afpo-charg,        "Charge
            matnr like afpo-matnr,        "Material
            werks like caufv-werks.       "Werk

  ...
  ...   (Definition der Daten für die Anwenderliste)
  ...

* Daten für Chargenprotokoll-Kopf
include lpppitxt.

top-of-page.
  summary.
* Chargenprotokoll
  if h_charg_kz = 'X'.
    h_pagno = h_pagno + 1.
*   Chargenprotokoll -> Simulieren oder Archivieren
    if h_charg_simulation = 'X'.
      write: /1 text-cps. "Chargenprotokoll: Anwerderliste simulieren
    else.
      write: /1 text-cpa. "Chargenprotokoll: Anwenderliste archivieren
    endif.
    write: 69 text-pag,   "Seite:
           76 h_pagno left-justified.
  else.
*   Auftragsprotokoll -> Simulieren oder Archivieren
    if h_charg_simulation = 'X'.
      write: /1 text-aps. "Auftragsprotokoll: Anwenderliste simulieren
    else.
      write: /1 text-apa. "Auftragsprotokol: Anwenderliste archivieren
    endif.
    write: 69 text-pag,   "Seite:
           76 sy-pagno left-justified.
  endif.

  perform chargenprotokoll_kopf.

start-of-selection.
  get parameter id 'CHS' field h_charg_simulation.
  get parameter id 'CHP' field h_charg_kz.
  get parameter id 'PAG' field h_pagno.
  import ecaufv from memory id 'AUF'.

  ...
  ...   (Coding zum Aufbau der Anwenderliste)
  ...

* Include für Chargenprotokoll-Kopf
include lpppicpr.

* Ende ------------------------------------------------------------

PERFORM Short Reference   ABAP Short Reference  
Diese Dokumentation steht unter dem Copyright der SAP AG.

Length: 6839 Date: 20240420 Time: 022346     sap01-206 ( 32 ms )