hola con todos quisiera que alguien me pueda enviar un manual o un link de visualage aqui les mando su codigo fuente con el que tengo problemas de ante mano le doy las gracias a todos
*********************************************************************
* *
* ID de programa : *
* *
* Descripción . : *
* *
* Función . . . : *
* *
* Mensajes . . . : *
* *
* Archivos . . . : *
* *
* Entrada . . . : *
* *
* Salida . . . . : *
* *
*********************************************************************
*
H
H*EXE
H*NOMAIN
**************************** formato D ***********************
* VARIABLES DE TRABAJO O VARIABLES DE MEMORIA
DN1 S 4 0
DN2 S 4 0
DS S 4 0
DR S 4 0
DM S 4 0
DD S 4 0
DRE S 4 0
D*******************************************************************
* Ventana . : V1
*
* Componente : V1
*
* Evento . . : CREATE
*
* Descripción:
*
*********************************************************************
*
C V1 BEGACT CREATE V1
*POSICIONAR EL CURSOS
C EVAL %SETATR('V1':'TXTN2':'FOCUS')=1
C ENDACT
*********************************************************************
*
* Ventana . : V1
*
* Componente : BTNEVAL
*
* Evento . . : PRESS
*
* Descripción:
*
*********************************************************************
*
C BTNEVAL BEGACT PRESS V1
* VARIABLES DISEÑADAS EN LA VENTA A VAIRBLES DE TRABAJO
* DE VENTANA A MEMORIA
C EVAL N1=%GETATR('V1':'TXTN1':'TEXT')
C EVAL N2=%GETATR('V1':'TXTN2':'TEXT')
C*
C* EVAL N1=%GETATR('V1':'TEXTN1':'TEXT')
C* OPERADORES ARITMETICOS
C EVAL S=N1+N2
C EVAL R=N1-N2
C EVAL M=N1*N2
C EVAL D=N1/N2
C EVAL RE=%REM(N1:N2)
C*DE MEMORIA A VENTA
C EVAL %SETATR('V1':'LBLSUMA':'LABEL')=S
C EVAL %SETATR('V1':'LBLRESTA':'LABEL')=R
C EVAL %SETATR('V1':'LBLMULTI':'LABEL')=M
C EVAL %SETATR('V1':'LBLDIVI':'LABEL')=D
C EVAL %SETATR('V1':'LBLRESTO':'LABEL')=RE
C ENDACT
*********************************************************************
*
* Ventana . : V1
*
* Componente : BTNLIMPIA
*
* Evento . . : PRESS
*
* Descripción:
*
*********************************************************************
*
C BTNLIMPIA BEGACT PRESS V1
* INICIALIZAR CAMPOS
* BLANQUEAR CAMPOS
C EVAL %SETATR('V1':'TXTN1':'TEXT')=*ZEROS
C EVAL %SETATR('V1':'TXTN2':'TEXT')=*ZEROS
C EVAL %SETATR('V1':'LBLSUMA':'LABEL')=*ZEROS
C EVAL %SETATR('V1':'TXTN2':'FOCUS')=1
C ENDACT
*********************************************************************
*
* Ventana . : V1
*
* Componente : BTNCANCEDL
*
* Evento . . : PRESS
*
* Descripción:
*
*********************************************************************
*
C BTNCANCEDL BEGACT PRESS V1
* FINALIZAR PROCESO
C EVAL *INLR=*ON
C ENDACT
Lee los temas pegados, entre los que están normas del foro.
No tengo ni idea de qué es eso, pero para empezar parece que va en el foro de java, y para seguir lo mismo en google hay algo y lo encuentras mucho antes de que alguien te responda: http://www.google.es/search?q=visualage+java+manual
eso no parece java...
No es java, pero está relacionado con java, es decir, cualquiera que haya usado el visualage para java sabrá java, así que las probabilidades de que alguien sepa la respuesta, pase por el foro de programación general y no por el de java son mínimas.
De todas formas yo me lo encontré en el foro de C/C++ ...