Devart Forums

Discussion forums for open issues and questions concerning database tools, data access components and developer tools from Devart
https://forums.devart.com/

show create procedure

https://forums.devart.com/viewtopic.php?f=7&t=10331

Page 1 of 1

show create procedure

Posted: Wed 15 Aug 2007 18:49
by pimentel_flores
Hi, i have a problem when unsing mydac to retreive the command "show create procedure spUser", the stored procedure is about 300 lines, but when i run this command in mydac it only shows about 40 lines,
how can i solve this, im using mydac4.

here is an example

Posted: Wed 15 Aug 2007 20:55
by pimentel_flores
try with a myquery, and a dbmemo, the field for the memo is "create procedure"

create the folowin procedure, after the creation run the command
show create procedure spCrearObjeto

and see how in the dbmemo you will find the create procedure structure truncated.

this is the complete stored code

Code: Select all

DROP PROCEDURE IF EXISTS spCrearObjeto;;
CREATE PROCEDURE spCrearObjeto(
vObjeto      Varchar(40),
vTipo        Varchar(40),
vDescripcion Varchar(40),
vEmpresa     Varchar(40),
vIDOrigen    Varchar(40),
vPadre       Varchar(40),
vOrden       Varchar(255),
vInstruccion Varchar(40),
vDestino     Varchar(40)

)
BEGIN
/*se crea el objeto en constructorb*/
     IF UPPER(vInstruccion) = 'NUEVO' THEN
        BEGIN
          INSERT INTO Constructorb (oid,seccion,descripcion,tipo,orden) Values(vIDOrigen,vObjeto,vDescripcion,vTipo,vOrden);
          set @lastID :=  LAST_INSERT_ID();

           /*se crean las propiedades dependiendo del tipo de objeto*/
          /*
          IF UPPER(vTipo) = 'ACCION'            THEN                               
          IF UPPER(vTipo) = 'BOTON'             THEN                               
          IF UPPER(vTipo) = 'BOTONAYUDA'        THEN                               
          IF UPPER(vTipo) = 'BOTONBARRA'        THEN                               
          IF UPPER(vTipo) = 'BOTONMENU'         THEN                               
          IF UPPER(vTipo) = 'BOTONMENUALTERNO'  THEN                               
          IF UPPER(vTipo) = 'CAMPO'             THEN                              
          IF UPPER(vTipo) = 'CHECK'             THEN                              
          IF UPPER(vTipo) = 'COMBO'             THEN                              
          IF UPPER(vTipo) = 'ETIQUETA'          THEN                              
          IF UPPER(vTipo) = 'FORMA'             THEN                              
          IF UPPER(vTipo) = 'GRID'              THEN                              
          IF UPPER(vTipo) = 'GRUPO'             THEN                              
          IF UPPER(vTipo) = 'IMAGEN'            THEN                              
          IF UPPER(vTipo) = 'LISTA'             THEN                              
          IF UPPER(vTipo) = 'MENUALTERNO'       THEN                              
          IF UPPER(vTipo) = 'PANEL'             THEN                              
          IF UPPER(vTipo) = 'RADIOGRUPO'        THEN                              
          IF UPPER(vTipo) = 'TAB'               THEN                              
          IF UPPER(vTipo) = 'TABLA'             THEN                              
          IF UPPER(vTipo) = 'VARIABLE'          THEN

  
           
          */
          
          
           IF UPPER(vTipo)='BOTONBARRA' THEN
              BEGIN
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ACTIVO','TRUE');         
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'HINT','Default Hint'); 
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ICONO','10');            
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'INDICE','0');            
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'VISIBLE','TRUE');        
              END;        
           END IF;
              
          
           IF UPPER(vTipo)='TAB' THEN
              BEGIN
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ACTIVO','TRUE');                   
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'CONTROLACTIVO','FALSE');           
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'GRUPOS','2');                      
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'TITULOGRUPO1','General');        
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'TITULOGRUPO2','Detalle');
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'TITULOPAGINA','Default TAB');
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'VISIBLE','TRUE');
              END;
           END IF;
          
           IF UPPER(vTipo)='CAMPO' THEN
              BEGIN
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ACTIVO','TRUE');
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'BOTONAYUDA','DefaultHelp');             
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'COLORFUENTE','$00000000');    
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'CONTROLACTIVO','FALSE');     
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ETIQUETA','TRUE');           
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'GRUPOPADRE','1');            
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ITALICA','FALSE');           
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'LARGO','200');               
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'LINEANUEVA','TRUE');         
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'NEGRITA','FALSE');           
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'PADRE','DefaultPage');           
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'RENGLON','1');               
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'REQUERIDO','FALSE');         
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'SUBRAYADA','FALSE');         
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'TAMANOFUENTE','8');          
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'TITULO','DefaultField');
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'VISIBLE','TRUE');            
              END;
           END IF;
              
           IF UPPER(vTipo)='BOTON' THEN
              BEGIN
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ACTIVO','TRUE');           
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'CONTROLACTIVO','FALSE');   
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'GRUPOPADRE','1');          
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'HINT','DefaultHint');      
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'LARGO','75');              
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'PADRE','DefaultPage');         
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'TITULO','DefaultButton');      
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'VISIBLE','TRUE');          
              END;
           END IF;    
           
           IF UPPER(vTipo)='COMBO' THEN
              BEGIN
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ACTIVO','TRUE');        
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'CONTROLACTIVO','FALSE');
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'GRUPOPADRE','1');       
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'LARGO','200');          
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'PADRE','PAGINA2');      
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'TITULO','123');         
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'VISIBLE','TRUE');       
              END;
           END IF;     
 
           IF UPPER(vTipo)='CHECK' THEN
              BEGIN
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ACTIVO','T');           
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'CONTROLACTIVO','FALSE');
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'GRUPOPADRE','1');       
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'LARGO','60');           
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'PADRE','PAGINA2');      
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'TITULO','MI CHECK');    
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'VISIBLE','T');          
              END;
           END IF;     
           
           IF UPPER(vTipo)='RADIOGRUPO' THEN
              BEGIN
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ACTIVO','T');           
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'CONTROLACTIVO','FALSE');
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'GRUPOPADRE','1');       
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'LARGO','60');           
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'PADRE','PAGINA2');      
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'TITULO','MI CHECK');    
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'VISIBLE','T');          
              END; 
           END IF;     

           IF UPPER(vTipo)='PANEL' THEN
              BEGIN
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ACTIVO','T');        
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ALTO','200');        
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'GRUPOPADRE','1');    
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'LARGO','200');       
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'LINEANUEVA','T');    
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'PADRE','PAGINA2');   
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'RENGLON','1');       
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'TITULO','MI PANELI');
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'VISIBLE','T');       
              END;
           END IF;     
           
           IF UPPER(vTipo)='IMAGEN' THEN
              BEGIN
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ACTIVO','T');                             
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ALTO','400');                             
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'GRUPOPADRE','1');                         
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'IMAGEN','\192.168.1.1\IMG\UNTITLED.BMP');
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'LARGO','300');                            
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'LINEANUEVA','F');                         
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'PADRE','PAGINA2');                        
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'RENGLON','1');                            
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'VISIBLE','T');                            
              END; 
           END IF;     
                   
           IF UPPER(vTipo)='LISTA' THEN
              BEGIN
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ACTIVO','T');           
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ALTO','200');           
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'CONTROLACTIVO','FALSE');
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'GRUPOPADRE','1');       
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'LARGO','50');           
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'LINEANUEVA','F');       
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'PADRE','PAGINA2');      
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'RENGLON','1');          
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'VISIBLE','T');          
              END; 
           END IF;     
                
           IF upper(vTipo)='TABLA' THEN
              BEGIN
              /* VALORES DEFAULT */
                   INSERT INTO Constructord (oid,variable,valor) values (@lastID,'','');
                   INSERT INTO Constructord (oid,variable,valor) values (@lastID,'','');
                   INSERT INTO Constructord (oid,variable,valor) values (@lastID,'','');
                   INSERT INTO Constructord (oid,variable,valor) values (@lastID,'','');
                   INSERT INTO Constructord (oid,variable,valor) values (@lastID,'','');
                   INSERT INTO Constructord (oid,variable,valor) values (@lastID,'','');
                   INSERT INTO Constructord (oid,variable,valor) values (@lastID,'','');
                   INSERT INTO Constructord (oid,variable,valor) values (@lastID,'','');
              /* VALORES IDIOMAS */       
              END;
           END IF;
           
           IF UPPER(vTipo)='FORMA' THEN
              BEGIN
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ACTIVO','TRUE');     
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'BARRA','TRUE');      
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'COLOR','$00C3B295'); 
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'ESTADO','MAX');      
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'PAGINAS','TRUE');    
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'TIPO','MDI');        
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'TITULO','Clientes'); 
                   INSERT INTO constructord (oid,variable,valor) values(@LastID,'VISIBLE','TRUE');    
              END; 
           END IF; 
        END;       
     END IF;  -- fin instruccion NUEVO  
     
     IF upper(vInstruccion) ='BORRAR' THEN
        BEGIN
        END;
     END IF;  
/* fin procedimiento */            
END;;

-------------------------------
This is the truncate result

Code: Select all

CREATE DEFINER=`root`@`localhost` PROCEDURE `spCrearObjeto`(
vObjeto      Varchar(40),
vTipo        Varchar(40),
vDescripcion Varchar(40),
vEmpresa     Varchar(40),
vIDOrigen    Varchar(40),
vPadre       Varchar(40),
vOrden       Varchar(255),
vInstruccion Varchar(40),
vDestino     Varchar(40)

)
BEGIN
/*se crea el objeto en constructorb*/
     IF UPPER(vInstruccion) = 'NUEVO' THEN
        BEGIN
          INSERT INTO Constructorb (oid,seccion,descripcion,tipo,orden) Values(vIDOrigen,vObjeto,vDescripcion,vTipo,vOrden);
          set @lastID :=  LAST_INSERT_ID();

           /*se crean las propiedades dependiendo del tipo de objeto*/
          /*
          IF UPPER(vTipo) = 'ACCION'            THEN                               
          IF UPPER(vTipo) = 'BOTON'             THEN                               
          IF UPPER(vTipo) = 'BOTONAYUDA'        THEN                               
          IF UPPER(vTipo) = 'BOTONBARRA'        THEN                               
          IF UPPER(vTipo) = 'BOTONMENU'         THEN                               
          IF UPPER(vTipo) = 'BOTONMENUALTERNO'  THEN                               
          IF UPPER(vTipo) = 'CAMPO'             THEN                              
          IF UPPER(vTipo) = 'CHECK'             THEN                              
          IF UPPER(vTipo) = 'COMBO'             THEN                              
          IF UPPER(vTipo) = 'ETIQUETA'          THEN                              
          IF UPPER(vTipo) = 'FORMA'             THEN                              
          IF UPPER(vTipo) = 'GRID'              THEN                              
          IF UPPER(vTipo) = 'GRUPO'             THEN                              
          IF UPPER(vTipo) = 'IMAGEN'            THEN                              
          IF UPPER(vTipo) = 'LISTA'             THEN                              
          IF UPPER(vTipo) = 'MENUALTERNO'       THEN                              
          IF UPPER(vTipo)
If you run the same command in the Mysql's Query Browser you will see that this tool retreives the complete procedure,



Please HELP
Thanks in advance

Posted: Thu 16 Aug 2007 07:11
by Antaeus
Thank you for such detailed information. We have reproduced this problem and fixed it. This fix will be included in the next MyDAC build.

Thanks

Posted: Thu 16 Aug 2007 14:13
by pimentel_flores
thank you Antaeus, and about the new build. when do you plan to release this?, I'm asking because it's pretty urgent to me to have this fix.

in the other hand, i have an issue about my developer licence, who is the correct person i have to talk about this?, i have sent some messages and e-mails without response, or can you send me a phone number to call you?
this is my address. [email protected]

thanks.

Posted: Thu 16 Aug 2007 14:35
by Antaeus
We are planning to release the next build of MyDAC in about three weeks.

Please send me your registration information at evgeniyd*crlab*com.

You should forward request about your developer license to sales*crlab*com.

Licence issue

Posted: Fri 17 Aug 2007 17:21
by pimentel_flores
Hi Antaeus, I have sent an email to the addesses you gave me but havent recevied any response, do you have any news about my licence issue?

Posted: Mon 20 Aug 2007 12:45
by Devart
Please check for email message from our sales team.

New build

Posted: Tue 18 Sep 2007 17:04
by pimentel_flores
Antaeus wrote:We are planning to release the next build of MyDAC in about three weeks.

Please send me your registration information at evgeniyd*crlab*com.

You should forward request about your developer license to sales*crlab*com.
Hi Antaeus, is almost 4 weeks since i posted this issue, and i just wanted to know when are you going to release the new build for the mydac5 with this fix.

Any way if you think you will take more time, could you please send me this fix to my e-mail? [email protected] or [email protected]

thanks

Posted: Wed 19 Sep 2007 09:24
by Antaeus
We plan to make the new build available in a couple of days.

Any update about this?

Posted: Thu 27 Sep 2007 21:52
by pimentel_flores
Antaeus wrote:We plan to make the new build available in a couple of days.
Hi Antaeus, do you think this update (new build) will take longer? if it will, can you send me the fix to my e-mail? [email protected]

Thanks in advance,
Octavio.

Posted: Fri 28 Sep 2007 14:44
by Antaeus
The new build of MyDAC is already available. You can download it from our site.
All times are UTC
Page 1 of 1
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/