viernes, 18 de mayo de 2012
domingo, 9 de mayo de 2010
CURSO EN ESPAÑOL DE GX 9.0
http://www2.gxtechnical.com/portal/hgxpp001.aspx?15,8,77,O,S,0,,2319;26;4;;/%20%20/;/%20%20/;M;1
Saludos, espero les sirva.
martes, 26 de enero de 2010
VALIDAR RUT (CHILE)
Primero deben crear un nuevo objeto del tipo procedimiento y poner lo siguiene
En Rules
parm(In:&Rut,In:&DvR,Out:&validado);
/*
* Asigno como no validado a la variable a devolver
*
*/
&validado=0
/*
* Rutina de validación del rut
*/
&R = &Rut
&Y = 2
&Acum = 0
&Prod = 0
do while &R <> 0
&V1 = &R
&R = int(&R / 10)
&V2 = &V1 - (&R * 10)
&Prod = &V2 * &Y
&Acum = &Acum + &Prod
&Y = &Y + 1
if &Y = 8
&Y = 2
endif
enddo
&Resto = &Acum - (int(&Acum/11) * 11)
if &Resto = 1
&Dv = 'K'
else
if &Resto = 0
&Dv = '0'
else
&Dv = str(11 - &Resto, 1)
endif
endif
/*
* Fin Rutina de validación del rut
*/
/*
* Si es valido retorno un SN.Si=1
* Si no es Valido retorno un SN.No=2
*/
if &DvR=&Dv
&validado=1
else
&validado=0
endif
DONDE
Acum N(6)
Dv CHR(1)
DVR CHR(1)
Pro N(2)
R N(8)
Resto N(6)
Rut N(8)
V1 N(8)
V2 N(8)
validadoN(1)
Y (N1)
LUEGO EN LA TRANSACCION TIENES LOS ATRIBUTOS
EmpleadoRut N(8)
EmpleadoDigitoV C(1)
EN RULES PONES
&EsValido=(PPValidarRut(EmpleadoRut,EmpleadoDigitoV));
Error('Error: Debe ingresar un Rut correcto...') IF &EsValido= 0 ;
Saludos
SUBIR IMAGEN
viernes, 13 de noviembre de 2009
GENEXUS Y YO
Manual de Genexus

GeneXus es una poderosa herramienta para el diseño y desarrollo de software multiplataforma. Permite el desarrollo incremental de aplicaciones críticas de negocio de forma independiente de la plataforma.
GeneXus genera el 100% de la aplicación. Basado en los requerimientos de los usuarios realiza el mantenimiento automático de la base de datos y del código de la aplicación, sin necesidad de programar.
Miles de empresas de mediano y gran tamaño y casas de software en todo el mundo utilizan GeneXus para desarrollar complejos sistemas de misión crítica con grandes bases de datos que comprenden desde sistemas centralizados, distribuidos hasta aplicaciones Web. Estos sistemas integran módulos de data warehouse, web services, portales corporativos y mucho más.
GeneXus soporta las plataformas y lenguajes líderes y los DBMS más populares.