Subject | Re: Restore with Firebird 2.5 |
---|---|
Author | Michael Vilhelmsen |
Post date | 2009-02-26T13:44:10Z |
--- In firebird-support@yahoogroups.com, Dimitry Sibiryakov <sd@...>
wrote:
Furtunatly I only have 1 instanse of of this :)
Correcting this error gave me another one (later on).
gbak:restoring parameter KKOSTPRIS for stored procedure
gbak:restoring parameter KMOMS for stored procedure
gbak:restoring stored procedure GETNEXTBONNR002
gbak:restoring parameter STEP for stored procedure
gbak:restoring parameter BONNR for stored procedure
gbak:restoring stored procedure OPDAT_VAREROMSET
gbak: ERROR:Malformed string
gbak:Exiting before completion due to errors
I presume the error is in the OPDAT_VAREROMSET.
Its like this
SET TERM ^^ ;
CREATE PROCEDURE OPDAT_VAREROMSET (
VNR VarChar(30),
AFD VarChar(15),
MDR Integer,
AAR Integer,
OMSSTK Numeric(15,2),
SALGSPRIS Numeric(15,2),
KOSTPRIS Numeric(15,2),
MOMS Numeric(15,2),
RABAT Numeric(15,2),
RABATMOMS Numeric(15,2))
AS
DECLARE VARIABLE LMOMS FLOAT;
DECLARE VARIABLE LKOST FLOAT;
DECLARE VARIABLE LSALG FLOAT;
DECLARE VARIABLE LANTAL FLOAT;
BEGIN
if (not exists (select vareplu_id from Varer_Omsetning where
Vareplu_ID=:VNr and Afdeling_ID=:Afd and Aar=:Aar and Mdr=:Mdr)) then
begin
/* Henter lagerbeholdning til aktuelle varer
Og opretter efterfølgende en omsætningspost med disse tal */
select AntalStk, Beh_Salgspris, Beh_Kostpris, Beh_SalgsprisMoms
from varer_detail
where VarePlu_ID=:VNr and afdeling_ID=:Afd
into :LAntal, :LSalg, :LKost, :LMoms;
if (not (:LAntal is null)) then
insert into Varer_Omsetning (VarePlu_ID, Aar, Mdr,
Afdeling_ID,LAntal, LSalgspris, LKostpris, LMoms)
Values (:VNr,:AAr,:Mdr,:Afd,:LAntal,:LSalg, :LKost, :LMoms);
end
Update Varer_Omsetning Set Antal = Antal + :OmsStk,
Salgspris = Salgspris + :Salgspris,
Kostpris = Kostpris + :Kostpris,
Moms = Moms + :Moms,
Rabat = Rabat + :Rabat,
Rabatmoms = Rabatmoms + :Rabatmoms
Where
Vareplu_ID=:VNr and Aar=:AAr and Mdr=:Mdr and Afdeling_ID=:Afd;
END
^^
SET TERM ; ^^
Only place I can find special charaters are in a comment part of the
above procedure.
I presume Im allowed to have those there ...
Michael
wrote:
>Ok - I read it.
> > And could it be the default value which contains a danish charater?
>
> Yes. Read migration guide about metadata charset.
>
> SY, SD.
>
Furtunatly I only have 1 instanse of of this :)
Correcting this error gave me another one (later on).
gbak:restoring parameter KKOSTPRIS for stored procedure
gbak:restoring parameter KMOMS for stored procedure
gbak:restoring stored procedure GETNEXTBONNR002
gbak:restoring parameter STEP for stored procedure
gbak:restoring parameter BONNR for stored procedure
gbak:restoring stored procedure OPDAT_VAREROMSET
gbak: ERROR:Malformed string
gbak:Exiting before completion due to errors
I presume the error is in the OPDAT_VAREROMSET.
Its like this
SET TERM ^^ ;
CREATE PROCEDURE OPDAT_VAREROMSET (
VNR VarChar(30),
AFD VarChar(15),
MDR Integer,
AAR Integer,
OMSSTK Numeric(15,2),
SALGSPRIS Numeric(15,2),
KOSTPRIS Numeric(15,2),
MOMS Numeric(15,2),
RABAT Numeric(15,2),
RABATMOMS Numeric(15,2))
AS
DECLARE VARIABLE LMOMS FLOAT;
DECLARE VARIABLE LKOST FLOAT;
DECLARE VARIABLE LSALG FLOAT;
DECLARE VARIABLE LANTAL FLOAT;
BEGIN
if (not exists (select vareplu_id from Varer_Omsetning where
Vareplu_ID=:VNr and Afdeling_ID=:Afd and Aar=:Aar and Mdr=:Mdr)) then
begin
/* Henter lagerbeholdning til aktuelle varer
Og opretter efterfølgende en omsætningspost med disse tal */
select AntalStk, Beh_Salgspris, Beh_Kostpris, Beh_SalgsprisMoms
from varer_detail
where VarePlu_ID=:VNr and afdeling_ID=:Afd
into :LAntal, :LSalg, :LKost, :LMoms;
if (not (:LAntal is null)) then
insert into Varer_Omsetning (VarePlu_ID, Aar, Mdr,
Afdeling_ID,LAntal, LSalgspris, LKostpris, LMoms)
Values (:VNr,:AAr,:Mdr,:Afd,:LAntal,:LSalg, :LKost, :LMoms);
end
Update Varer_Omsetning Set Antal = Antal + :OmsStk,
Salgspris = Salgspris + :Salgspris,
Kostpris = Kostpris + :Kostpris,
Moms = Moms + :Moms,
Rabat = Rabat + :Rabat,
Rabatmoms = Rabatmoms + :Rabatmoms
Where
Vareplu_ID=:VNr and Aar=:AAr and Mdr=:Mdr and Afdeling_ID=:Afd;
END
^^
SET TERM ; ^^
Only place I can find special charaters are in a comment part of the
above procedure.
I presume Im allowed to have those there ...
Michael