FoxPro/Visual FoxPro - ayuda plese ayuda necesito ayuda

 
Vista:

ayuda plese ayuda necesito ayuda

Publicado por jazmin (1 intervención) el 10/03/2006 22:34:21
me preguntanba si alguien me podra ayudar o darme un idea en lo que tengo que hacer en este programa:

tengo que insertar un optiongroup y si doy click en la primera opcion MONETARIO en un text tiene que aparecer "03-0000000000" pero si doy click en la segunda debe de aparecer "01-0000000000" luego se tiene que grabar en una tabla el problema es que despues de grabar y limpiar el text si le vuelvo a dar click en monetario me tiene que aparecer "03-0000000001" y asi sucesivamete lo mismo con el ahorro "03-0000000001" .
pero no tengo ni la menor idea de como hacerlo. si me ayudan se los agradecere un monton.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

RE:ayuda plese ayuda necesito ayuda

Publicado por Manuel (344 intervenciones) el 11/03/2006 00:19:49
Prográmale en el click lo siguiente:
If this.value=1
Thisform.Text1.Value="03-0000000000"
else
Thisform.Text1.Value="01-0000000000"
endif
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:ayuda plese ayuda necesito ayuda

Publicado por Foxshin (34 intervenciones) el 17/03/2006 18:42:39
Hi
yo supongo que usas el optiongroup para seleccionar los dos primeros digitos que aparecerán en el textbox (01 ó 03) y el resto de los digitos representan a un contador de esos primeros dos digitos (que se supone tienes en una tabla).
Pues bien si es asi lo único que debes hacer es calcular el número maximo dependiendo de los 2 primeros digitos elegidos en el optiongroup. Osea algo como esto:

Evento click del Optiongroup

if this.value = 1
cserie = "01"
else
cserie = "03"
endif

select max(substr(ncampo,4)) from ntabla where left(ncampo,2) = cserie into array amaxvalue
thisform.text1.value = cserie+"-"+padl( int( val(iif( type("amaxvalue")="C",amaxvalue(1),"0"))+1 ),10,"0" )

*donde:
*ncampo = nombre del campo donde tienes los datos grabados
*ntabla = nombre de la tabla


...creo que eso es todo... espero que sea lo que necesitabas.
Salu2
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar