Debug a programa SQLRPGLE

Tue, 27 Feb 2007 10:30:17 -0800 

 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]: [EMAIL PROTECTED]: Tue, 27 Feb 2007 11:38:55 -0600Subject: 
Re: Convertir formato de fecha desde SQLpara 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 PMSubject: 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ás de NEWS/400.> © 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ás de NEWS/400.© Publicaciones Help400, S.L. - Todos 
los derechos 
reservadoshttp://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ás de NEWS/400.
© 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