Case im PL/SQL

CASE r_pos.POS_KOSTST
   WHEN 1 THEN r_fa.LS_GT_GELIEFERT := r_fa.LS_GT_GELIEFERT + 1;
   WHEN 2 THEN r_fa.LE_LE_GELIEFERT := r_fa.LE_LE_GELIEFERT + 1;
   WHEN 3 THEN r_fa.LS_GT_BESTELLT  := r_fa.LS_GT_BESTELLT  + 1; 
   WHEN 4 THEN r_fa.LS_ERSATZ       := r_fa.LS_ERSATZ       + 1;                             
END CASE;