Author: Christian Gradolf
Last saved by: Michael Kahl

ProNovia Produkte Korrekturanleitung
Knowledge Base ID / Version | CFM-209 / V8.0.4
Ausgabe Korrekturanleitung | I / MK / 11.01.2023
Farblegende Korrekturen | INSERT | REPLACE THIS | REPLACE WITH | DELETE

Include | /PRONOVIA/LPRMOBDF01
Form | DRAW_GET

FORM draw_get

. . .

    IF lf_refnr IS INITIAL.                                 "CG/ID9249
      "{CG/ID6384
      IF NOT ps_info-new_aennr IS INITIAL.
        LOOP AT lt_work ASSIGNING <work>.
>>>START INSERT
          CHECK <work>-datuv <= /pronovia/cl_obj_def=>cust_mai-datuv_chngstart. "MK/CFM-209
>>>END INSERT
          IF <first> IS ASSIGNED
          AND <work>-dokar = <first>-dokar
          AND <work>-doknr = <first>-doknr
          AND <work>-doktl = <first>-doktl.
            IF <work>-aennr = ps_info-new_aennr.
              <work>-existing  = '-'.
              <first>-existing = true.
            ENDIF.
          ELSE.
            ASSIGN <work> TO <first>.
          ENDIF.
        ENDLOOP.
      ENDIF.
      "CG/ID6384}
    ENDIF.    

. . .

ENDFORM.                    " draw_get

<ENDE>

ProNovia Produkte Korrekturanleitung		Template  Version B.00