W Pub: ABAP Rut Break SAAB

Transacción SAAB

Ejemplo de USO

  1. REPORT demo_checkpoints.
  2.  
  3. PARAMETERS: subkey TYPE c LENGTH 30 LOWER CASE DEFAULT sy-uname,
  4.             field1 TYPE c LENGTH 10 LOWER CASE DEFAULT 'Field1',
  5.             field2 TYPE i DEFAULT 0.
  6.  
  7. CLASS demo DEFINITION.
  8.   PUBLIC SECTION.
  9.     CLASS-METHODS main.
  10. ENDCLASS.
  11.  
  12. CLASS demo IMPLEMENTATION.
  13.   METHOD main.
  14. *--[ Para logear parámetros
  15.     LOG-POINT ID demo_checkpoint_group
  16.                  SUBKEY subkey
  17.                  FIELDS field1 field2.
  18. *--[ El típico
  19.     BREAK-POINT ID demo_checkpoint_group.
  20.  
  21. *--[ Con condición
  22.     ASSERT ID demo_checkpoint_group
  23.               CONDITION field2 IS NOT INITIAL.
  24.  
  25.   ENDMETHOD.
  26. ENDCLASS.
  27.  
  28. START-OF-SELECTION.
  29.   demo=>main( ).
[$[Get Code]]