Gerardo, 
si mal no recuerdo puedes elegir el formato del debug. Aunque no le he podido 
probar en la 5.4.
 

Saludos. Rafael 

 

________________________________

From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Gerardo 
Santillana
Sent: 27 February 2007 19:26
To: [email protected]
Subject: Debug a programa SQLRPGLE


Saludos a todos

Al hacer un debu a uno de estos programas antes veia el codigo de esta manera

* .----------------------------------------------------------
* | Load Subfile 
* '----------------------------------------------------------
c LoadSfl Begsr 
c 
c*exec sql 
c* Fetch Next From C1 Into :PODR1PDS, :@DRRN 
c*end-exec 
C Z-ADD -4 SQLER6 
C CALL SQLROUTE 
C PARM SQLCA 
C PARM ! SQL_00018 
C SQL_00021 IFEQ '1' 
C EVAL @PDRQNO = SQL_00023 
C EVAL @PDORNO = SQL_00024 
C EVAL @PDITNO = SQL_00025 
C EVAL @PDLRDT = SQL_00063 
C EVAL @DRRN = SQL_00064 
C END 
c 
c Eval @DOPT = *Blanks 
c Eval WkFirst = *On 
c Eval *in57 = *Off 
c Eval WkCount = *Zeros 
c 
c Dow SqlCod = *Zeros 
c and WkCount <= 5 


Ahora el debug me muestra el codigo de esta forma, sin el codigo SQL que genera 
el compilador. Ademas en este programa tengo una variable caracter de longitud 
3000 en donde guardo la sentencia SQL que uso para llenar un subfile, antes 
podia ver todo el contenido de esta variable, ahora el debug solo me muestra 
1000 caracteres y trunca la sentencia, aun asi el programa funciona bien, esto 
lo empeze a ver despues que se cambio de la version V5R2 a la V5R4, no se si se 
deba a esto o solo sea algun parametro que me falta a la hora de compilar, por 
que muchos comandos se les cambio los parametros default que tenian antes

* .-----------------------------------------------
* | Load Subfile 
* '-----------------------------------------------
c LoadSfl Begsr 
c 
c/exec sql 
c+ Fetch Next From C1 Into :PODR1PDS, :@DRRN 
c/end-exec 
c 
c Eval @DOPT = *Blanks 
c Eval WkFirst = *On 
c Eval *in57 = *Off 
c Eval WkCount = *Zeros 
c 
c Dow SqlCod = *Zeros 
c and WkCount <= 5 

Gracias por la ayuda o comentario


Gerardo Santillana 

--- On Tue 02/27, =?iso-8859-1?Q?Bernab=E9_Estrada?= < [EMAIL PROTECTED] > 
wrote:



        From: =?iso-8859-1?Q?Bernab=E9_Estrada?= [mailto: [EMAIL PROTECTED]
        To: [email protected]
        Date: Tue, 27 Feb 2007 11:38:55 -0600
        Subject: Re: Convertir formato de fecha desde SQL
        
        para convertir un campo numerico a tipo fecha podrias hacerlo de la 
        siguiente forma:
        
        SELECT DATE( SUBSTR(DIGITS(camponumerico),5,4) || '-' ||
        SUBSTR(DIGITS(camponumerico),3,2) || '-' || 
        SUBSTR(DIGITS(camponumerico),1,2) )
        FROM archivo
        
        
        
        
        ----- Original Message ----- 
        From: "Jaime Villa Torres" 
        To: "forum.help400" 
        Sent: Monday, February 26, 2007 1:16 PM
        Subject: Convertir formato de fecha desde SQL
        
        
        > Otro problema mas,
        >
        > Existe un archivo que tiene un campo de 8.0 que contiene una fecha en 
        > formato ddmmyy, y necesito extraer la informaciòn que se encuentre en 
un 
        > rango de fechas, pero a partir de un sql embebido que realiza un 
create 
        > table.
        >
        > Como siempre, cualquier sugerencia, es bien venida
        >
        > Gracias
        > __________________________________________________
        > Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
        > &amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
        > http://www.help400.es
        > _____________________________________________________
        >
        > Para darte de baja visita la siguente URL:
        > http://listas.combios.es/mailman/listinfo/forum.help400 
        
        __________________________________________________
        Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
        &amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
        http://www.help400.es
        _____________________________________________________
        
        Para darte de baja visita la siguente URL:
        http://listas.combios.es/mailman/listinfo/forum.help400
        

________________________________

Join Excite! - http://www.excite.com
The most personalized portal on the Web! 
__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
&amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400

Responder a