Author: Christian Gradolf

ProNovia Produkte Korrekturanleitung
Knowledge Base ID / Version | 9.24.5
Ausgabe Korrekturanleitung | I / CG / 28.12.2022
Farblegende Korrekturen | INSERT | REPLACE THIS | REPLACE WITH | DELETE

Funktion | /PRONOVIA/SDF_CONVT_AFT_CHKIN

FUNCTION /pronovia/sdf_convt_aft_chkin.

. . .

  DO 1 TIMES.
    "Server Applikkation bestimmen (z.B. .STO)
>>>START INSERT
    "CG/OBJ-218:
    "PS_CONV_FILE-FILENAME ist der neu Name und hat damit die falsche
    "Erweiterung. Der alte Name ist aber nicht mehr direkt im Zugriff.
    "Wir lesen alle Dateien mit der SOURCE Ws-Applikation. Theoretisch bei
    "einem Mix von alten und neuen Office Formaten, klappt das nicht sicher, aber
    "aktuell ist dies der einzige mögliche Weg. CheckIn unten ging auch schon
    "immer so.

    "<CG/OBJ-218 verschoben von unten
    "Original bestimmen für CheckIn /
    LOOP AT pt_all_files INTO ls_file
                         WHERE dappl     = ps_convert_spec-source
                           AND filename  CS lf_file.
    ENDLOOP.
    CHECK sy-subrc = 0.
    "CG/OBJ-218>
>>>END INSERT
    PERFORM get_server_application USING    ps_document_key-documenttype "CG/ID11341
                                            ps_convert_spec-source
>>>REPLACE THIS
                                            ps_conv_file-filename
>>>REPLACE WITH
                                            ls_file-filename "CG/OBJ-218
>>>END REPLACE
                                   CHANGING lf_srvdappl
                                            lf_srvapdel
                                            lf_srvsrvmo.
    CHECK NOT lf_srvdappl IS INITIAL.

>>>START DELETE
*   Original bestimmen für CheckIn
    LOOP AT pt_all_files INTO ls_file
                         WHERE dappl     = ps_convert_spec-source
                           AND filename  CS lf_file.
    ENDLOOP.
    CHECK sy-subrc = 0.
>>>END DELETE

*   Das Originale der Konvertierung auch wieder einchecken, den

. . .

ENDFUNCTION.

<ENDE>

ProNovia Produkte Korrekturanleitung		Template  Version B.00