Table of contents
No headings in the article.
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:
| imputation | description |
| OT | ORDERID |
| CECO | COSTCENTER |
| PEP | WBS_ELEM |
| Cualquiera distinto de OT, CECO y PEP | OTHERS |
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.