Gerson
as colunas batem sim. (se era a isso que voce se referia)
insert into REL_ESTOQUE(CPRODUTO , D3, L3, D5, L5, D8, L8, L10, D10)
values(:PCPRODUTO, 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0);
ja respondi de manha que com os dados do Rodrigo eu criei um banco e a
procedure sem problemas
Atenc;
Elazar
-----Mensagem original-----
De: [email protected] [mailto:[EMAIL PROTECTED]
Em nome de Gerson Machado
Enviada em: sexta-feira, 24 de fevereiro de 2006 09:58
Para: [email protected]
Assunto: Re: [delphi-br] ERRO NA SP - PRAZO DE ENTREGA EXPIRANDO !!!
Não olhei a logica... mas a mensagem informa que as colunas informadas
para atualização não batem com o número de parametros informados, algo
como:
insert into minhatabela (c1, c2, c3) values (1, 2).... erro falta o
valor para c3.
Gerson
Rodrigo - Winsoft <[EMAIL PROTECTED]> escreveu:
BOM DIA GALERA...
TENHO AS SEGUINTES TABELAS:
CREATE TABLE PRODUTO (
CPRODUTO VARCHAR(15) NOT NULL COLLATE PXW_INTL850,
NPRODUTO VARCHAR(200) NOT NULL COLLATE PXW_INTL850
);
CREATE TABLE ESTOQUE (
CPRODUTO VARCHAR(15) NOT NULL COLLATE PXW_INTL850,
CEMPRESA D_CODIGO,
EST_LOJA NUMERIC(18,3) NOT NULL,
EST_DEPO NUMERIC(18,3) DEFAULT 0 NOT NULL
);
CREATE TABLE REL_ESTOQUE (
CPRODUTO D_CODPRODUTO,
D3 D_VALOR3, /* CORRESPONDE AO ESTOQUE DEPOSITO DA EMPRESA DE
COD. 3
L3 D_VALOR3, /* CORRESPONDE AO ESTOQUE LOJA DA EMPRESA DE
COD. 3
D5 D_VALOR3, /* CORRESPONDE AO ESTOQUE DEPOSITO DA EMPRESA DE
COD. 5
L5 D_VALOR3, /* CORRESPONDE AO ESTOQUE LOJA DA EMPRESA DE
COD. 5
D8 D_VALOR3, /* CORRESPONDE AO ESTOQUE DEPOSITO DA EMPRESA DE
COD. 8
L8 D_VALOR3, /* CORRESPONDE AO ESTOQUE LOJA DA EMPRESA DE
COD. 8
D10 D_VALOR3, /* CORRESPONDE AO ESTOQUE DEPOSITO DA EMPRESA DE
COD. 10
L10 D_VALOR3 /* CORRESPONDE AO ESTOQUE LOJA DA EMPRESA DE
COD. 10
);
estou criando a store procedure abaixo
CREATE PROCEDURE GERAR_ESTOQUE_GERAL (
PEST_LOJA FLOAT,
PEST_DEPO FLOAT,
PCEMPRESA INTEGER,
PCPRODUTO VARCHAR(15))
AS
begin
/* CRIAR OS PRODUTOS NA TABELA DE REL_ESTOQUE */
for
select P.CProduto from PRODUTO P order by P.CProduto into :PCPRODUTO
do begin
insert into REL_ESTOQUE(CPRODUTO, D3, L3, D5, L5, D8, L8, L10, D10)
values(:PCPRODUTO, 0, 0, 0, 0, 0, 0, 0, 0);
end
/* select na tabela de estoque */
for
select E.* from ESTOQUE E order by E.CPRODUTO into :PCPRODUTO,
:PCEMPRESA, :PEST_LOJA, :PEST_DEPO
do begin
/* VERIFICAR SE EXISTE O PRODUTO, SEMPRE VAI EXISTIR, POIS INCLUO NA
PARTE DE CIMA */
if (exists (select RE.* from REL_ESTOQUE RE where RE.CPRODUTO =
:PCPRODUTO)) then
begin
/* VERIFICAR QUAL É A EMPRESA */
if (:PCEMPRESA = 3) then
begin
update REL_ESTOQUE set L3 = (L3 + :PEST_LOJA ), D3 = (D3 +
:PEST_DEPO) where CPRODUTO = :PCPRODUTO;
end
if (:PCEMPRESA = 5) then
begin
update REL_ESTOQUE set L5 = (L5 + :PEST_LOJA ), D5 = (D5 +
:PEST_DEPO) where CPRODUTO = :PCPRODUTO;
end
if (:PCEMPRESA = 8) then
begin
update REL_ESTOQUE set L8 = (L8 + :PEST_LOJA ), D8 = (D8 +
:PEST_DEPO) where CPRODUTO = :PCPRODUTO;
end
if (:PCEMPRESA = 10) then
begin
update REL_ESTOQUE set L10 = (L10 + :PEST_LOJA ), D10 = (D10 +
:PEST_DEPO) where CPRODUTO = :PCPRODUTO;
end
end
end
suspend;
end
ESTA ME RETORNADO O SEGUINTE ERRO:
count of column list and variable list do not match.
Dynamic SQL Error.
SQL error code = -313.
count of column list and variable list do not match.
sERÁ Q ALGUEM SABE O Q ESTÁ ACONTECENDO...
SEI Q É MEIO COMPLICADO, MAS É UM POUCO URGENTE !!!
sE ALGUEM PUDER ME AJUDAR......
Obrigado.
Rodrigo Pedroso
Winsoft Informática - (14) 3664-1586
[EMAIL PROTECTED]
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE
var lrec_target="_blank";var lrec_URL=new Array();
lrec_URL[1]="http://br.ard.yahoo.com/SIG=12f2igi9m/M=396547.7942355.8867
957.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1140792423/A=3322891/R=0/
id=flashurl/SIG=154qqv6j6/*http://lt.dell.com/lt/lt.aspx?CID=11460&LID=3
16158&DGC=BA&DGSeg=DHS&DURL=http://www1.la.dell.com/content/products/cat
egory.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs"; var
lrec_flashfile="http://br.i1.yimg.com/br.yimg.com/i/br/ads7/230206_y300x
250_feb04_dhs_dim5150.swf?clickTAG=javascript:LRECopenWindow(1)"; var
lrec_altURL="http://br.ard.yahoo.com/SIG=12f2igi9m/M=396547.7942355.8867
957.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1140792423/A=3322891/R=1/
id=altimg/SIG=154qqv6j6/*http://lt.dell.com/lt/lt.aspx?CID=11460&LID=316
158&DGC=BA&DGSeg=DHS&DURL=http://www1.la.dell.com/content/products/categ
ory.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs"; var
lrec_altimg="http://br.i1.yimg.com/br.yimg.com/i/br/ads7/230206_y300x250
_feb04_dhs_dim5150.jpg"; var
lrec_width=300;var lrec_height=250;
---------------------------------
Links do Yahoo! Grupos
Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo!.
---------------------------------
Yahoo! Search
Dê uma espiadinha e saiba tudo sobre o Big Brother Brasil.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
Links do Yahoo! Grupos
Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço
do Yahoo!.
_______________________________________________________
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!
http://br.acesso.yahoo.com
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
