FiveTech Software tech support forums

... For t = 1 To P6_AAAA->(RecCount()) // Initlize Array aAdd( aVar_AA,{ '','','','' }) aAdd( oVar_AA,{ '','','','' }) Next t t := 1 ; P6_AAAA->(DbGoTop()) // Assign variables to array Do While !Eof() // Assign variable to array If lFirst oVar_AA[t,01] := aVar_AA[t,01] := "Last Update : ...

... Now, when the xBrowse is destroyed, the filter is lost, so we can´t retrieve what exact product did the user selected, as now xBrowse goes to dbgotop(). This worked fine in FW 14.14 Thank you.

Me falta decir que yo lo tengo al inicio del reporte

PREVIEW // TO PRINTER
oReport:oDevice:SetPage(15)
oReport:bInit := { || dbGoTop() }

Saludos
Oscar

Moises

Buenas tardes, posiblemente falte esta instrucción
oReport:bInit := { || dbGoTop() }

Saludos

Oscar

... Local oLis //cBuscar:=Ctaarr->(Fieldget(3))+Str(Ctaarr->(Fieldget(6)),2)+Str(Ctaarr->(Fieldget(7)),4) Boletas->(DBGoTop()) REPORT oLis TITLE "BOLETAS DE "+cSocio,"","RUT "+cRut; HEADER "SINDICATO DE TRABAJADORES HONORARIOS",; ...

Dir Rao I did what you said me. The sample: Function ImpBoletas(cRut,cSocio) Local oLis Boletas->(DBGoTop()) REPORT oLis TITLE "BOLETAS DE "+cSocio,"","RUT "+cRut; HEADER "SINDICATO",; "Fecha: "+Dtoc(Date()),; "Hora ...

... are of that invoice? SELECT TB TB->(DbSetOrder(1)) TB->( OrdScope(0, { || oT:aDat[1] })) TB->( OrdScope(1, { || oT:aDat[1] }) ) TB->(DbGoTop()) aBrowse     :=  {{"PAITEM"      ,i18n("Codice")       ,nil                  ,50 },;            ...

... SELECT PA PA -> (DbSetOrder (1)) PA -> (OrdScope (0, {|| alltrim ((cNumCli))})) PA -> (OrdScope (1, {|| alltrim ((cNumCli))})) PA -> (DbGoTop ()) xbrowse ...

... AllTrim( cTypeRoom ) .and. RE->NUM = nElemento ; .AND. ( dDataIniziale <= RE->CHECK_OUT .AND. dDataFinale >= RE->CHECK_IN ) RE->(DbGoTop()) give me this error Application===========   Path and name: C:\Work\Errori\image_su_btnbmp\test2.Exe (32 bits)   Size: ...

... ; TOOLTIP "Correcto" BORDER REDEFINE BTNBMP oBtn ID 104 OF oDlg RESOURCE "no2" ; // NO ACTION (lGoOn:=.f.,1->(DbGotop()),oLbx:Refresh(),oDlg:End(),; olbx:setfocus()) ; TOOLTIP "Cancelar" BORDER ACTIVATE DIALOG oDlg CENTERED if lGoOn SysRefresh() sele ...

... 450 records oCust1:ORDSCOPE( 0, NIL ) // reset oCust1:ORDSCOPE( 1, NIL ) oCust1:ORDSCOPE(0, cName ) // filter oCust1:ORDSCOPE(1, cName ) oCust1:DBGOTOP() regards Uwe :D

... TAG ORDINE TO SERVIZI FOR !deleted() Now I wish see the dbf index on Ordine field If I made SERVIZI->( DbSetOrder(3 ) ) //ORDINE SERVIZI->( DBGOTOP() ) XBROWSE() then I see this https://i.postimg.cc/qqYrTd3g/bu1.png check the last column if I made SERVIZI->( DbSetOrder("ordine" ...

I found the error on my sample

TEST->( DbSetOrder( 3 ) ) // Index on Ordine field
TEST->( DBGOTOP() )

instead of

TEST->( DbSetOrder( 2 ) ) // error Index on Name field

Sorry....

... Crea_Array_listini() Local alist_temp:={} USE LISTINI ALIAS LI SHARE NEW VIA "DBFCDX" INDEX ON NAME TAG "IDXLISTINI" LI->(dbgotop()) DO While !LI->(eof()) AaDd(alist_temp,{ alltrim(LI->NAME),LI->ID }) LI->(dbskip()) ENDDO return alist_temp

... )) + "Data\" I made USE cDbfPath+SERVIZI NEW SHARED ALIAS "SINGL" SET FILTER TO FIELD->MULTIPLE=.F. SINGL->(DBGOTOP()) USE cDbfPath+SERVIZI NEW SHARED ALIAS "MULTI" SET FILTER TO FIELD->MULTIPLE=.T. MULTI->(DBGOTOP()) give me error Path and ...