Fortführen der Schleife

Getting started ... Alles für einen gelungenen Start.
2 Beiträge • Seite 1 von 1
2 Beiträge Seite 1 von 1

Fortführen der Schleife

Beitrag von ichse18577 (ForumUser / 41 / 15 / 3 ) »
Hallo zusammen,
ich habe da eine kleine Aufgabe bekommen, bei der ich Formulare welche in einer Tabelle zusammengefasst sind, bzw. deren Funktionsbausteine aufrufen/testen soll.
Das ganze um die Verwendungsnachweise zu aktualisieren.
Soweit habe ich das ganze auch schon geschafft, nur mir fehlt ein Zusatz der quasi automatisch F3 "drückt" um vom einen zum nächsten Formular zu springen, bzw wieder zum Anfang meiner Schleife bringt. Ich habe schon viel mit CONTINUE, LEAVE PROGRAM oder LEAVE SCREEN bla bla versucht aber bin nicht auf die Lösung gekommen. Hier mal mein Code zum besseren Verständnis (bitte nicht zu sehr auf die Namenskonventionen achten :D). In der letzten IF-Schleife bin ich am probieren.
Am besten sollte man das ganze auch Nachts in einem JOB laufen lassen können.

Vielen Dank schonmal!

Code: Alles auswählen.

DATA: gt_forms    TYPE TABLE OF fpcontext-name,
      gf_forms    LIKE LINE OF gt_forms,
      gf_funcn       LIKE rs38l-name,
      gf_seq         LIKE rs38l-head,
      gf_trace       LIKE rs38l-head,
      gf_lines       TYPE i,
      gf_lines_c     TYPE string,
      gf_counter_c   TYPE string,
      gf_counter     TYPE i VALUE 1,
      gf_prozent     TYPE numc3,
      gf_text        TYPE string,
      gf_timer       TYPE i.

**********************************************************************
" Selektion der Tabelle mit nötigen FuBas
SELECT fpcontext~name FROM fpcontext INTO TABLE gt_forms.

**********************************************************************

DESCRIBE TABLE gt_forms LINES gf_lines.

LOOP AT gt_forms INTO gf_forms.

**********************************************************************
" Progress Indicator zur Statusanzeige des momentanen FuBa's
  gf_prozent = ( gf_counter / gf_lines ) * 100.
  gf_counter_c = gf_counter.
  gf_lines_c = gf_lines.
  CONCATENATE gf_counter_c '/' gf_lines_c 'Formulare' INTO gf_text SEPARATED BY space.

  CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
    EXPORTING
      percentage = gf_prozent
      text       = gf_text.

**********************************************************************

**********************************************************************
"Umwandlung Tabelleneintrag in Name des FuBa's
  CALL FUNCTION 'FP_FUNCTION_MODULE_NAME'
    EXPORTING
      i_name     = gf_forms
    IMPORTING
      e_funcname = gf_funcn.

**********************************************************************

**********************************************************************
" Testen des jeweiligen FuBa's
  CALL FUNCTION 'SFCS_FA_TEST_FUNCTION'
    EXPORTING
      funcname            = gf_funcn
      sequence            = gf_seq
      run_time_on         = 'X'
      trace_special_units = gf_trace
    EXCEPTIONS
      OTHERS              = 1.
  IF sy-subrc <> 0.
    IF sy-batch = space.
      IF NOT sy-msgid IS INITIAL.
        MESSAGE ID sy-msgid TYPE 'I' NUMBER sy-msgno
                WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
      ENDIF.

      SET SCREEN 0. LEAVE SCREEN.
    ENDIF.

  ELSE.
  ENDIF.

  ADD 1 TO gf_counter.

IF sy-tabix <> 0.

      wait up to 1 SECONDS.
      SET SCREEN 0.
*      LEAVE PROGRAM.
      CONTINUE.
ENDIF.

ENDLOOP. 

gesponsert
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten


Re: Fortführen der Schleife

Beitrag von ichse18577 (ForumUser / 41 / 15 / 3 ) »
Okay ich denke ich habe mein Problem gelöst.

Bei der CALL FUNCTION einfach ein IN BACKGROUND TASK hinzugefügt und mein IF schaut jetzt so aus:

Code: Alles auswählen.

  IF sy-tabix <> gf_counter.

      CONTINUE.
      LEAVE TO SCREEN 0.

ENDIF.

Seite 1 von 1

Vergleichbare Themen

2
Antw.
202
Views
Schleife, Gruppenverarbeitung
von Ingo » 08.07.2022 10:54 • Verfasst in ABAP® für Anfänger
5
Antw.
3096
Views
Fehler in Schleife????
von Aggu » 12.05.2004 18:37 • Verfasst in ABAP® für Anfänger
4
Antw.
3938
Views
feldzuweisung in schleife
von simethandreas » 01.10.2009 14:25 • Verfasst in ABAP® für Anfänger
6
Antw.
2363
Views
COND in Schleife
von SaskuAc » 18.06.2018 08:08 • Verfasst in ABAP® für Anfänger
1
Antw.
1392
Views
Dynamisierung von Schleife
von dvdh1979 » 05.06.2015 12:07 • Verfasst in ABAP® für Anfänger

Über diesen Beitrag

ichse18577
Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch

Newsletter Anmeldung

Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.
Die letzte Ausgabe findest du hier.
Details zum Versandverfahren und zu Ihren Widerrufsmöglichkeiten findest du in unserer Datenschutzerklärung.