Nica
20 de Noviembre del 2003

Que tal... a todos.

La consulta que tengo es la siguiente:
Tengo un formulario donde introduzco numero de carnet(carnet) y un combo donde se introduce la situacion del estudiante (Nuevoing,reingreso,repitente).

Ahora lo que quiero validar es que si el operador introduce el numero de carnet distinto de "04-00228-1" solo me tome los dos primeros valores, es decir "04" y si la situacion es igual "Nuevoing" envie un mensaje que el carnet debe ser "04"...

Bueno ojala me haya explicado....

Yo lo intente de esta manera...
do case
case substr(m.carnet1,2) #"04" .and. m.se = "Nuevo ing"
MESSAGEBOX("Debe poner el numero de carnet a帽o 2004...",0+48,"DATO NO INGRESADO")
ThisForm.Text11.setfocus
return (.f.)

endcase

Saludes.....

Raul
20 de Noviembre del 2003

Nica:

Si esta linea la has escrito tal y como esta en el codigo:
case substr(m.carnet1,2) #"04" .and. m.se = "Nuevo ing"

Deberias probar agregar la coma entre carnet y 1, ademas unir "Nuevoing":

case substr(m.carnet,1,2) #"04" .and. m.se = "Nuevoing"

Puede ser ese el problema.

Si no es avisame

Alex
20 de Noviembre del 2003

Que tal Nica

Cuando usas el SUBSTR para recuperar una parte de la cadena caracter, debes definir la pocisi贸n de la porci贸n que queres recuperar y el largo o cantidad de caracteres a devolver.

Tal como lo escribi贸 Raul.

substr(m.carnet,1,2) #"04" .and. m.se = "Nuevoing"
,1 && Pocisi贸n que tiene el primer caracter de la porcion a recuperar.

En tu caso necesitas los dos primeros caracteres, entonces la pocisi贸n de izquierda a derecha es la 1.
y cantidad de caracteres a recuperar es de 2.

Espero te sirva esto.


Alex Vargas