Contador power builder
Quiero hacer un programa que me genere un código correlativo(001,002,003,..) cada vez que yo apreté un botón.
Mi problema es que cada vez que apretó este botón tengo que volver a declarar la variable contador y empieza desde cero no se si es con variables globales o con funciones.
A ver si me ayudan
Mi problema es que cada vez que apretó este botón tengo que volver a declarar la variable contador y empieza desde cero no se si es con variables globales o con funciones.
A ver si me ayudan
1 Respuesta
Respuesta de achafio
1
Una aplicación que permita el ingreso de los datos personales.
Se debe ingresar el Ap. paterno, materno y nombres. Al final la aplicacion te debe mostrar: Ej. DIAZ CHOQUE RONNY DC0001
RUBEN SOSA FLOREZ SF0002
y no funciona este codigo
integer nreg // creo que es por esto pero si lo saco no funciona
integer nrow1, nrow2
string s, c1,c2
nreg=nreg+1
s=UPPER(sle_paterno.text)+" "+UPPER(sle_materno.text)+" "+UPPER(sle_nombres.text)
c1=UPPER(LEFT(sle_paterno.text,1))
c2=UPPER(LEFT(sle_materno.text,1))
nrow1=lb_clientes.additems(s)
sle_codigo.text=c1+c2+RIGHT("000"+STRING(nreg),4)
AYUDAME ACHAFIO.
Se debe ingresar el Ap. paterno, materno y nombres. Al final la aplicacion te debe mostrar: Ej. DIAZ CHOQUE RONNY DC0001
RUBEN SOSA FLOREZ SF0002
y no funciona este codigo
integer nreg // creo que es por esto pero si lo saco no funciona
integer nrow1, nrow2
string s, c1,c2
nreg=nreg+1
s=UPPER(sle_paterno.text)+" "+UPPER(sle_materno.text)+" "+UPPER(sle_nombres.text)
c1=UPPER(LEFT(sle_paterno.text,1))
c2=UPPER(LEFT(sle_materno.text,1))
nrow1=lb_clientes.additems(s)
sle_codigo.text=c1+c2+RIGHT("000"+STRING(nreg),4)
AYUDAME ACHAFIO.
Si revisas bien tu código, la variable nreg no lo inicializas en ninguna parte sin embargo le sumas uno.
Podrías hacer algo así:
SELECT MAX(LONG(nombre_campo))
INTO :nreg
FROM nombre_tabla
USING SQLCA;
nreg = nreg + 1
sle_codigo.text = c1+c2+ string(nreg,'0000')
Podrías hacer algo así:
SELECT MAX(LONG(nombre_campo))
INTO :nreg
FROM nombre_tabla
USING SQLCA;
nreg = nreg + 1
sle_codigo.text = c1+c2+ string(nreg,'0000')
