Hola !!
 
Yo lo haría con un SQl dinámico, es decir, con sentencias PREPARE y EXECUTE, es 
decir tanto biblioteca como nombre de archivo lo podrías meter por parámetros, 
mas o menos algo así:
 
DStmIns         S            500                                                
                                            DC1               S              1  
  inz('"')                 DARRC1          S              1    DIM(1) CTDATA 
PERRCD(1)                                                                 C     
*ENTRY        PLIST                                      C                      
 PARM                    ARCHIVO          10                                    
                           C                       EXSR      @CRTFILE           
                                                                              * 
fin de programa  ------                                     C                   
   RETURN                                      *                     ------     
                                                                                
               C     @CRTFILE      BEGSR                                        
                                                             C                  
 Clear                   StmIns             
C                   Clear                   TRAMA1           25      C          
         Clear                   TRAMA2           25                            
                                               C                   EVAL      
TRAMA1 = C1+'biblioteca/'+ ARCHIVO + C1                                         
                            C                   EVAL      TRAMA2 = 
C1+'biblioteca/'+ARCHIVO+ C1                                                    
                                                                                
         C                   Eval      StmIns = 'Insert Into ' + TRAMA1 +     C 
                                     'Select * FROM ' + TRAMA2     
 *--------------------------------------------- * Inserta registros en Tablas 
Migradas         *---------------------------------------------C/Exec Sql       
                              C+  Prepare S1 from :StmIns                    
C/End-EXEC                                                                      
              C/Exec Sql                                     C+  Execute S1     
                            C/End-EXEC                                      *   
                                           *                  -----             
         C                   ENDSR                       *                  
-----                      Nota: esta quizá no sea la solucion, pero te da una 
idea de como sustituir con parámetros algunas sentencias.
 
Acá lo que tienes que hacer es meter como parámetro la biblioteca quizá en vez 
del archivo
o meter ambos como parámetros, eso queda a tu criterio.
 



From: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Thu, 31 Jul 2008 23:01:33 
-0500Subject: Ovrdbf sobre sql





Señores,
Estoy realizando un inserte al archivo MYFILE, con miembro MYMBR de la 
biblioteca MYLIB1, desde
el archivo MYFILE, con miembro MYMBR de la biblioteca MYLIB2
 
es necesario realizar el OVRDBF para trabajar SQL con miembro, esto es lo que 
tengo entendido, pero el problema es 
que es sobre le mismo archivo, lo unico diferente son las bibliotecas.
 
alguna idea, estoy algo grave con este problema.
 
_________________________________________________________________
Explore the seven wonders of the world
http://search.msn.com/results.aspx?q=7+wonders+world&mkt=en-US&form=QBRE
__________________________________________________
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