Uso de la sentencia SWITCH en ABAP 7.40

La sentenica SWITCH en ABAP 7.40 se presenta con una alternativa al clasico CASE.

Veamos un simple uso de esta nueva sentencia.

Si cambiamos el valor de la variable impuation el resultado, entonces debe de ser diferente.

Ahora, veamos el resultado cuando el valor de imputation es igual a PEP

Por ultimo el resultado en caso de que el valor de imputation sea diferente de OT, CECO y PEP.

En el reporte de arriba obtenemos de manera dinamica la descripcion en base al valor de la variable imputation, de forma mas visual el resultado que obtenemos es el siguiente:

Codigo fuente del Reporte:

REPORT ytemp.

  DATA imputation  TYPE char7.
  DATA description TYPE char10.

 imputation = 'OT'.

 description = SWITCH char10( imputation
   WHEN 'OT'   THEN 'ORDERID'
   WHEN 'CECO' THEN 'COSTCENTER'
   WHEN 'PEP'  THEN 'WBS_ELEM'
   ELSE 'OTHERS' ).

WRITE description.

 imputation = 'CECO'.

 description = SWITCH char10( imputation
   WHEN 'OT'   THEN 'ORDERID'
   WHEN 'CECO' THEN 'COSTCENTER'
   WHEN 'PEP'  THEN 'WBS_ELEM'
   ELSE 'OTHERS' ).

WRITE description.

 imputation = 'PEP'.

 description = SWITCH char10( imputation
   WHEN 'OT'   THEN 'ORDERID'
   WHEN 'CECO' THEN 'COSTCENTER'
   WHEN 'PEP'  THEN 'WBS_ELEM'
   ELSE 'OTHERS' ).

WRITE description.

 imputation = 'NOTHING'.

 description = SWITCH char10( imputation
   WHEN 'OT'   THEN 'ORDERID'
   WHEN 'CECO' THEN 'COSTCENTER'
   WHEN 'PEP'  THEN 'WBS_ELEM'
   ELSE 'OTHERS' ).

WRITE description.