remove debug info
This commit is contained in:
parent
e556d0bebb
commit
ea42aa6d79
1 changed files with 0 additions and 7 deletions
|
|
@ -208,20 +208,13 @@ $BODY$
|
|||
nCount Integer;
|
||||
nDuplicate Integer;
|
||||
begin
|
||||
raise info 'Value %',tText;
|
||||
tText := lower(trim(tav_text));
|
||||
raise info 'Value %',tText;
|
||||
tText := replace(tText,' ','');
|
||||
raise info 'Value %',tText;
|
||||
tText := translate(tText,E' $€µ£%.+-/\\!(){}(),;_&|"#''^<>*','');
|
||||
raise info 'Value %',tText;
|
||||
tText := translate(tText,E'éèêëàâäïîüûùöôç','eeeeaaaiiuuuooc');
|
||||
raise info 'Value %',tText;
|
||||
nDuplicate := 0;
|
||||
raise info 'Value %',tText;
|
||||
tBase := tText;
|
||||
loop
|
||||
raise info 'Value % duplicate %',tText,nDuplicate;
|
||||
-- take the next sequence
|
||||
select nextval('s_jnt_fic_att_value') into ns;
|
||||
if length (tText) = 0 or tText is null then
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue