ASCAN me devuelve mal o no lo estoy entendiendo...

Board index FiveWin para Harbour/xHarbour ASCAN me devuelve mal o no lo estoy entendiendo...

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

ASCAN me devuelve mal o no lo estoy entendiendo...
Posted: Wed Jan 17, 2024 02:48 PM

Tengo un array:

   LOCAL aNumeros :=  ;
                     { ;
                       "ZERO", ;
                       "UNO", ;
                       "DUE", ;
                       "TRE", ;
                       "QUATTRO", ;
                       "CINQUE", ;
                       "SEI", ;
                       "SETTE", ;
                       "OTTO", ;
                       "NOVE", ;
                       "DIECI", ;
                       "UNDICI", ;
                       "DODICI", ;
                       "TREDICI", ;
                       "QUATTORDICI", ;
                       "QUINDICI", ;
                       "SEDICI", ;
                       "DICIASSETTE", ;
                       "DICIOTTO", ;
                       "DICIANNOVE", ;
                       "VENTI", ;
                       "VENTUNO", ;
                       "VENTIDUE", ;
                       "VENTITRÉ", ;
                       "VENTIQUATTRO", ;
                       "VENTICINQUE", ;
                       "VENTISEI", ;
                       "VENTISETTE", ;
                       "VENTOTTO", ;
                       "VENTINOVE", ;
                       "TRENTA", ;
                       "TRENTUNO", ;
                       "TRENTADUE", ;
                       "TRENTATRÉ", ;
                       "TRENTAQUATTRO", ;
                       "TRENTACINQUE", ;
                       "TRENTASEI", ;
                       "TRENTASETTE", ;
                       "TRENTOTTO", ;
                       "TRENTANOVE", ;
                       "QUARANTA", ;
                       "QUARANTUNO", ;
                       "QUARANTADUE", ;
                       "QUARANTATRÉ", ;
                       "QUARANTAQUATTRO", ;
                       "QUARANTACINQUE", ;
                       "QUARANTASEI", ;
                       "QUARANTASETTE", ;
                       "QUARANTOTTO", ;
                       "QUARANTANOVE", ;
                       "CINQUANTA", ;
                       "CINQUANTUNO", ;
                       "CINQUANTADUE", ;
                       "CINQUANTATRÉ", ;
                       "CINQUANTAQUATTRO", ;
                       "CINQUANTACINQUE", ;
                       "CINQUANTASEI", ;
                       "CINQUANTASETTE", ;
                       "CINQUANTOTTO", ;
                       "CINQUANTANOVE", ;
                       "SESSANTA", ;
                       "SESSANTUNO", ;
                       "SESSANTADUE", ;
                       "SESSANTATRÉ", ;
                       "SESSANTAQUATTRO", ;
                       "SESSANTACINQUE", ;
                       "SESSANTASEI", ;
                       "SESSANTASETTE", ;
                       "SESSANTOTTO", ;
                       "SESSANTANOVE", ;
                       "SETTANTA", ;
                       "SETTANTUNO", ;
                       "SETTANTADUE", ;
                       "SETTANTATRÉ", ;
                       "SETTANTAQUATTRO", ;
                       "SETTANTACINQUE", ;
                       "SETTANTASEI", ;
                       "SETTANTASETTE", ;
                       "SETTANTOTTO", ;
                       "SETTANTANOVE", ;
                       "OTTANTA", ;
                       "OTTANTUNO", ;
                       "OTTANTADUE", ;
                       "OTTANTATRÉ", ;
                       "OTTANTAQUATTRO", ;
                       "OTTANTACINQUE", ;
                       "OTTANTASEI", ;
                       "OTTANTASETTE", ;
                       "OTTANTOTTO", ;
                       "OTTANTANOVE", ;
                       "NOVANTA", ;
                       "NOVANTUNO", ;
                       "NOVANTADUE", ;
                       "NOVANTATRÉ", ;
                       "NOVANTAQUATTRO", ;
                       "NOVANTACINQUE", ;
                       "NOVANTASEI", ;
                       "NOVANTASETTE", ;
                       "NOVANTOTTO", ;
                       "NOVANTANOVE", ;
                       "CENTO" ;
                     }

y cuando hago lo siguiente me devuelve un valor 10, que debería de no devolver ningún valor ya que "DI" no existe en el array

Code (fw): Select all Collapse

   fwdbg AScan(aNumeros, "DI"), AScan(aNumeros, "DI",,,.t.)

Lo que estoy buscando es que me devuelva la posición solo cuando es "DIECI" no "DI"

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: ASCAN me devuelve mal o no lo estoy entendiendo...
Posted: Wed Jan 17, 2024 03:55 PM

https://vivaclipper.wordpress.com/2014/01/07/ascan/

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

sysctrl2

Posts: 1144

Joined: Mon Feb 05, 2007 07:15 PM

Re: ASCAN me devuelve mal o no lo estoy entendiendo...
Posted: Wed Jan 17, 2024 04:26 PM

Code (fw): Select all Collapse

   aNumeros :=  ;
                     { ;
                       "ZERO", ;
                       "UNO", ;
                       "DUE", ;
                       "TRE", ;
                       "QUATTRO", ;
                       "CINQUE", ;
                       "SEI", ;
                       "SETTE", ;
                       "OTTO", ;
                       "NOVE", ;
                       "DIECI", ;
                       "UNDICI" }

   nAt := 0
   Ascan( aNumeros, { |c,nPos| IIF( c=="DI", nAt := nPos , 0 )  } )
   ? nAt

Cesar Cortes Cruz

SysCtrl Software

Mexico

' Sin +- FWH es mejor "

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

Re: ASCAN me devuelve mal o no lo estoy entendiendo...
Posted: Wed Jan 17, 2024 05:40 PM

es posible que tenga mal yo el help del harbour? porque siempre use ascan como lo he utilizado hoy.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

sysctrl2

Posts: 1144

Joined: Mon Feb 05, 2007 07:15 PM

Re: ASCAN me devuelve mal o no lo estoy entendiendo...
Posted: Wed Jan 17, 2024 07:54 PM

en xharbour existe

igual y exactamente igual

c=="DI" //para validar mejor la condición yo siempre uso exactamente igual ==

saludos

Cesar Cortes Cruz

SysCtrl Software

Mexico

' Sin +- FWH es mejor "

FiveTech Support Forums

Continue the discussion