Inhaltsverzeichnis

GO TO Statement

Für Syntax siehe hier.

Das GO TO Statement als solches wird (noch) nicht unterstützt. Es wird nur ein bestimmter Sonderfall erkannt.

Beispiele

  1.  
 

Sönderfälle

Wenn bei der Analyse festgestellt wird, dass das Ziel einer unconditional GO TO Anweisung lediglich ein EXIT Statement enthält, wird hierfür ein C#-return Anweisung erzeugt.

  1. ******************************************************************
  2. *LESEN KEY GEVODATEN
  3. ******************************************************************
  4. Z04K-LESENK-GVF SECTION.
  5. Z04K-10.
  6. EXEC TAA GETINFO FOR LGEVO ITEMS INTO TAB-ANZ END-EXEC
  7. IF TAB-ANZ = ZERO
  8. SET TC-STATE-NICHT-OK OF ME TO TRUE
  9. GO TO Z04K-99
  10. END-IF
  11. EXEC TAA GET FIRST LGEVO END-EXEC
  12. MOVE 1 TO ZGR-NR
  13. SET ERST TO TRUE
  14. PERFORM Z04-LESEN-GVF
  15. CONTINUE.
  16. Z04K-99.
  17. EXIT.
  18. *
  1. // *****************************************************************
  2. // LESEN KEY GEVODATEN
  3. // *****************************************************************
  4. // Z 0 4 k L e s e n k G v f
  5. // -------------------------
  6. // ORIG: Z04K-LESENK-GVF SECTION.
  7. private void Z04kLesenkGvf()
  8. {
  9. // ORIG: Z04K-10.
  10. // ORIG: EXEC TAA GETINFO FOR LGEVO ITEMS INTO TAB-ANZ END-EXEC
  11. TabAnz = this.DataLgevo?.Count ?? 0;
  12. // ORIG: IF TAB-ANZ = ZERO
  13. // ORIG: THEN
  14. if (TabAnz == 0) {
  15. this.State.Active = StateEnum.NichtOk;
  16. // ORIG: GO TO Z04K-99
  17. return;
  18. }
  19. // ORIG: END-IF
  20. // ORIG: EXEC TAA GET FIRST LGEVO END-EXEC
  21. this.DataLgevo.FirstOrDefault()?.CopyLocal(Lgevo);
  22. // ORIG: MOVE 1 TO ZGR-NR
  23. ZgrNr = 1;
  24. // ORIG: SET ERST TO TRUE
  25. SwNachlesen = NachlesenEnum.Erst;
  26. // ORIG: PERFORM Z04-LESEN-GVF
  27. Z04LesenGvf();
  28. // ORIG: CONTINUE
  29. // ORIG: Z04K-99.
  30. // ORIG: EXIT
  31. }

TODO Liste

Syntaktisch erkannt, aber von den Generatoren derzeit nicht unterstützt sind folgende Bestandteile: