Ayuda comparaion con while

tema enviado por mactus en ORACLE
tema iniciado el 12/11/2009
Hola estoy trabajando en form builer necesito ayuda con un while CADENA = JESUS ayuda en la comparacion la esta cadena se supone que sustraigo de la posicion 2 el primer digito y lo paso a un while y va incrementando la posicion hasta en contrar la segunda consonante (S) ICX := 1; ICP :=SUBSTR(:PERSONA.APPAT,2,1); WHILE ICP ='B' and ICP <> 'C' and ICP <> 'D' and ICP <> 'F' and ICP <> 'G' and ICP <> 'H' and ICP <> 'J' and ICP <> 'K' and ICP <> 'L' and ICP <> 'LL' and ICP <> 'M' and ICP <> 'Ñ' and ICP <> 'N' and ICP <> 'P' and ICP <> 'Q' and ICP <> 'R' and ICP <> 'S' and ICP <> 'T' and ICP <> 'V' and ICP <> 'W' and ICP <> 'X' and ICP <> 'y' and ICP <> 'Z' LOOP ICP :=SUBSTR(:PERSONA.APPAT,ICX,1); MESSAGE('VALOR: '||ICP); -- ver que recoge ICX :=ICX+1; END LOOP; Pero no lo hace, me regresa "J" no se que le pasa estoy trabajando en form builer ayuda