Zum Hauptinhalt springen

SAP-Formulare: Druckprogramm-Vorlage für Adobe-Formulare

Diese Vorlage kann dann verwendet werden, wenn von SAP keine Nachrichtensteuerung vorgesehen ist. Ist eine Narichtensteuerung vorgesehn, so gibt es hier ein Stanrddruckprogramm. Bitte immer dieses verwenden. Diese Vorlage ist nur für die Formular auf komplett grüner Wiese vorgesehen.

In dieser Vorlage werden auch alle Übergabeparameter aufgelistet um zu sehen wofür diese verwendet werden.

*--------------------------------------------------------------------*
DATA
*--------------------------------------------------------------------*
: ls_out_params TYPE SFPOUTPUTPARAMS
, ls_doc_params TYPE SFPDOCPARAMS
, ls_output TYPE FPFORMOUTPUT
*--------------------------------------------------------------------*
, lv_form_name TYPE FPNAME
, lv_func_name TYPE FUNCNAME
.
*--------------------------------------------------------------------*
PARAMETERS:
*--------------------------------------------------------------------*
p_name TYPE FPWBFORMNAME DEFAULT 'ZCA_VORLAGE_F'.
*--------------------------------------------------------------------*

*--------------------------------------------------------------------*
START-OF-SELECTION.
*--------------------------------------------------------------------*
"Hole die Daten zum, Drucken
*--------------------------------------------------------------------*


*--------------------------------------------------------------------*
END-OF-SELECTION.
*--------------------------------------------------------------------*

"POPUP
* ls_out_params-NODIALOG = abap_false. "Benutzerdialog unterdrücken
* ls_out_params-PREVIEW = abap_false. "Vorschau
* ls_out_params-TITLE = 'Titel'. "Titel im Dialogfenster
*--------------------------------------------------------------------*

"Was bekommen wir vom ADS zurück?
* ls_out_params-GETPDF = abap_false. "Anforderung PDF Rückgabe
* ls_out_params-GETPDL = abap_false. "Anforderung PDL Rückgabe
* ls_out_params-GETXML = abap_false. "Anforderung Daten-XML-Rückgabe
*--------------------------------------------------------------------*

"In der Spool
* ls_out_params-DEST = 'LP01'. "Spool: Ausgabegerät
* ls_out_params-REQNEW = abap_true. "Neuer Spool-Auftrag
* ls_out_params-REQIMM = abap_true. "Spool-Sofortdruck
* ls_out_params-REQDEL = abap_true. "Spool-Löschung sofort
* ls_out_params-COPIES = '1'. "Anzahl Exemplare
* ls_out_params-NOPREVIEW = abap_false. "Keine Druckansicht zulassen
* ls_out_params-NOPRIBUTT = abap_false. "Keine Druckbuttons in der Druckansicht
*--------------------------------------------------------------------*

"Im PDF EInstellungen
* ls_out_params-NOPRINT = abap_false. "Keine Druckbuttons im PDF-Dokument
* ls_out_params-PDFVERSION = ''. "STRING PDF Version
* ls_out_params-PDFTAGGED = abap_false. "boolsche Variable (X=true, -=false, space=unknown)
* ls_out_params-PDFCHANGESRESTRICTED = abap_false. "Einschränkung der Änderungsmöglichkeiten des PDF-Dokuments
* ls_out_params-PDFNORM = ''. "PDF Norm
*--------------------------------------------------------------------*

"OPEN connection to ADS
CALL FUNCTION 'FP_JOB_OPEN'
CHANGING
IE_OUTPUTPARAMS = ls_out_params
EXCEPTIONS
CANCEL = 1
USAGE_ERROR = 2
SYSTEM_ERROR = 3
INTERNAL_ERROR = 4
OTHERS = 5
.
CHECK sy-subrc eQ 0.
*--------------------------------------------------------------------*

MOVE p_name TO lv_form_name.

"GET FUNC NAME
CALL FUNCTION 'FP_FUNCTION_MODULE_NAME'
EXPORTING
I_NAME = lv_form_name
IMPORTING
E_FUNCNAME = lv_func_name
.
*--------------------------------------------------------------------*

* ls_doc_params-LANGU = 'D'. "Sprachenschlüssel
* ls_doc_params-COUNTRY = 'DE'. "Länderschlüssel
* ls_doc_params-FILLABLE = abap_false. "interaktives Formular?

"CALL Formular mit Schnittstelle
CALL FUNCTION lv_func_name
EXPORTING
/1BCDWB/DOCPARAMS = ls_doc_params
* IV_BUKRS = p_bukrs
IMPORTING
/1BCDWB/FORMOUTPUT = ls_output
.

*--------------------------------------------------------------------*
"CLOSE connection
CALL FUNCTION 'FP_JOB_CLOSE'
EXCEPTIONS
USAGE_ERROR = 1
SYSTEM_ERROR = 2
INTERNAL_ERROR = 3
OTHERS = 4
.
CHECK sy-subrc eQ 0.

Letztes Update: 23.02.2022