FiveTech Software tech support forums

... Indexes build normaly optimised and as a sample here a tag on BRANDID and also FABRIKAN (no index on NAAM)

Folowing typical filter :

"PRO" $ UPPER( BRANDID ) .AND. "RANGER" $ UPPER( NAAM ) .AND. "ABOUT" $ UPPER( FABRIKAN )

1. A Filter is working from left to right, processing : BrandID, Naam ...

... C'
if Empty( cFileExt( cIcon ) )
hIcon := LoadIcon( GetResources(), cIcon ) // <--------- aqui debe cargar una imagen desde recursos
elseif Upper( cFileExt( cIcon ) ) == "ICO" .and. File( cIcon )
hIcon := ExtractIcon( cIcon )
endif
elseif ValType( cIcon ) == 'N'
hIcon := cIcon
cIcon ...

... five logical records and physical records
// are added to the custome index.

REQUEST Dbfcdx

PROCEDURE Main
USE Customer VIA "DBFCDX"
INDEX ON Upper(LastName+FirstName) TAG NAME TO Cust01
INDEX ON Upper(LastName+FirstName) TAG NAMESET TO Cust01t CUSTOM

// relative navigation with non-custom ...

... Alias( 3 ) LIMIT -1 COLUMNS 2
ENDMENU
MENUITEM Alias( 2 ) + "_EXPAND"
MENU SELECT Alias( 2 ) LIMIT 06 COLUMNS 1, 2, 3 EXPAND
ENDMENU
MENUITEM Upper( "FieldNames_" ) + Alias( 1 )
MENU SELECT ( Alias( 1 ) )->( DbStruct() ) LIMIT -1 COLUMNS 2, 1, 3 //, 4
ENDMENU
MENUITEM Upper( "FieldNames ...

... HtmlToOeM(oCep:cNome)
// oCep:cNome := HB_Translate(oCep:cNome,"UTF8","PT850")

oCep:cNome := FW_UTF8PADCHAR(oCep:cNome,60)
oCep:cNome := Upper(oCep:cNome)

If At("AVENIDA",oCep:cNome) > 0

oCep:cTipo := "AV:"
oCep:cNome := StrTran(Upper(oCep:cNome),"AVENIDA ",'')

Endif

If At("RUA ...

:bKeyDown := { | nKey | FWBrowseKey( xDlg, xControl, nKey, ... ) }



CASE IsRange( nKey, 32, 127 )
cFilter += Upper( Chr( nKey ) )


If type letters ok
if type numbers from normal keyboard ok
if type numbers from numeric keyboard not
Is it expected ?

Note:
1 from normal keyboard returns ...

... con el ejemplo que viene en la documentación de la Agencia Tributaria.
Lo hago utilizando todo en una cadena continua de caracteres
FWrite( nMan, Upper( HB_SHA256( "IDEmisorFactura=89890001K&NumSerieFactura=12345678/G33&FechaExpedicionFactura=01-01-2024&TipoFactura=F1&CuotaTotal=12.35&ImporteTotal ...

upper(reflev)+upper(kleur)+upper(size)

I suggest this optimization:

upper(reflev+kleur+size)

I see that the index will be faster since upper is from 3 to 1, but is it also nessesary to change how the filter will be created ?

Current filter :

"WIC" $ UPPER( TAG ) .AND. "POLO" $ UPPER( NAAM ...

Marc Venken wrote:upper(reflev)+upper(kleur)+upper(size)

I suggest this optimization:

... snipped where you use Xbrowse Header gets and use temp index instead of filter.
You would make

local ...
Field Tag, Naam, Kleur

Filter =
"WIC" $ UPPER( TAG ) .AND. "POLO" $ UPPER( NAAM ) .AND. "WHITE" $ UPPER( KLEUR )
Index will be like
index on upper(TAG)+upper(NAAM)+upper(KLEUR) tmp (sample, not ...

I have a dbf with 380.000 records, 32 fields and 7 tags. (242 Megabite)

the filter look like :

"WIC" $ UPPER( TAG ) .AND. "POLO" $ UPPER( NAAM ) .AND. "WHITE" $ UPPER( KLEUR )

This filter is build with the above function Marc_Setfilter using Xbrowse header gets.

The active tag =

upper(reflev ...

... PRIMER APELLIDO
*** APELLIDO_2: DONDE QUEREMOS DEJAR EL SEGUNDO APELLIDO
********************************************************************
VAPET=UPPER(ALLTRIM(NOMB_APE))
VAPE2=SUBSTR(VAPET,RAT(" ",VAPET)+1)
REPLA APELLIDO_2 WITH VAPE2
VAPET=ALLTRIM(SUBSTR(VAPET,1,RAT(" ",VAPET)-1))
VAPE1=SUBSTR ...

... lBorder.>,;
<.lPixel.>, <nClrText>, <nClrBack>, <nWidth>, <nHeight>,;
<.design.>, <.update.>, <.lShaded.>, <.lBox.>, <.lRaised.>, <.adj.>,;
<.lTrans.>, [<(oSay)>], [Upper( Left( <"uni">, 1 ) ) == "U"], <.lVCenter.>, [<uCargo>], [<.relpix.>], <nClrBorder> ); [ <oSay>:SetSize( <nWidth>, <nHeight> ) ]

... nClrText>, <nClrBack>, <nWidth>, <nHeight>,;
<.design.>, <.update.>, <.lShaded.>, <.lBox.>, <.lRaised.>, <.adj.>,;
<.lTrans.>, [<(oSay)>], [Upper( Left( <"uni">, 1 ) ) == "U"], <.lVCenter.>, [<uCargo>], [<.relpix.>], <nClrBorder> ); [ <oSay>:SetSize( <nWidth>, <nHeight> ) ]

You are right and ...

Debes de añadir un Upper() al retorno del valor.
https://www.agenciatributaria.es/static_files/AEAT_Desarrolladores/EEDD/IVA/VERI-FACTU/Veri-Factu_especificaciones_huella_hash_registros.pdf
Apartado 6. Ejemplos

Además yo forzaré a guardar los datos/campos que intervienen en la huella directamente ...