Search found 328 matches: dbskip

Return to advanced search

Re: DBF . Commit

... and Clipper: 1. When record or table is unlocked then just before this operations RDD writes all local modifications in table and index files. 2. DBSKIP(0) just like DBGOTO( RECNO() ) writes all local modifications (if any) and then discards local record buffer so record has to be read again when ...
by Carles
Mon Oct 23, 2023 4:17 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: DBF . Commit
Replies: 39
Views: 2213

Dificultad con METERS

... DetVtaF->FecVenta<=dHasta DetVtaF->(DbGoTop()) set relation to Articulo into ArtFor while !DetVtaF->(Eof()) xTotVtas += 1 DetVtaF->(DbSkip()) end DEFINE DIALOG oDlgMed RESOURCE "Medidores" REDEFINE SAY oMensaje PROMPT cmensaje ID Med_Mensaje OF oDlgMed color colorfw->ForeSay, ...
by José Camilo
Tue Aug 22, 2023 12:22 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Dificultad con METERS
Replies: 5
Views: 233

RESUELTO ---> arreglo en BTN_ACTION

... WHILE ! PRODUCTOS->(EOF()) SysRefresh() nCodPr =nProc cBebida:= PRODUCTOS->NOME cBcod := PRODUCTOS->CODIGO PRODUCTOS->(DBSKIP(1)) *==================================================== Aadd(aBtns, { cBebida + CRLF + "REFRESCO" + CRLF + cBcod,LoadBitmap( GetResources(), ...
by Male
Wed Feb 15, 2023 4:29 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: RESUELTO ---> arreglo en BTN_ACTION
Replies: 1
Views: 217

Re: Reitero consulta para actualizar un campo con XBrowse

... _ArtFor->Pedir := ArtFor->StockMin-ArtFor->StockAct _ArtFor->Total := _ArtFor->Pedir*_ArtFor->Costo select ArtFor ArtFor->(DbSkip()) end select _ArtFor _ArtFor->(DbGoTop()) DEFINE FONT oFont NAME "TAHOMA" SIZE 0,-15 DEFINE BRUSH oBr RESOURCE "beige2" ...
by José Camilo
Sun Feb 12, 2023 4:38 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Reitero consulta para actualizar un campo con XBrowse
Replies: 6
Views: 480

Reitero consulta para actualizar un campo con XBrowse

... select _ArtFor _ArtFor->(DbGoTop()) While !_ArtFor->(Eof()) _ArtFor->Total := _ArtFor->Costo*_ArtFor->Pedir _ArtFor->(DbSkip()) end _ArtFor->(DbGoTo(regi)) return NIL //-------------------------------------------------------------------------------------------------------------------------------------------------------------// ...
by José Camilo
Sat Feb 11, 2023 3:18 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Reitero consulta para actualizar un campo con XBrowse
Replies: 6
Views: 480

DBF REDE/WEB WINDOWS 7/10/11

... aDados ) AADD( aReport, aDados )// eroni - para o relatorio // If Mod(nContador,100)==0 // ALTEREI AQUI // ThreadSleep(1) // EndIf Retido->(dbSkip()) ENDDO // SKIP -1 // oEmp := oAvu:Add( cEmpresa+"-"+RetornaNomeEmpresa( cEmpresa ),IF( lAllOk,2,3 ) ) // Item nivel 2 do tree //oEmp:Cargo ...
by wanderson8
Sun Jan 08, 2023 3:10 pm
 
Forum: All products support
Topic: DBF REDE/WEB WINDOWS 7/10/11
Replies: 0
Views: 4642

Ayuda con TGRAPH ( nuevamente )

... al pie aadd(aClientes3,{(_HsAux->Cliente),aqColores[j]}) AADD(aHoras3,xxxhstra) AADD(aLeyenda3,str(_HsAux->Cliente,4)+'x') j+=1 _HsAux->(DbSkip()) end // presento 3 graficos con los mismos datos solo de prueba DEFINE DIALOG oDlgGraf RESOURCE "GRAFICA" //OF oWnd REDEFINE GRAPH ...
by José Camilo
Fri Sep 02, 2022 6:42 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Ayuda con TGRAPH ( nuevamente )
Replies: 0
Views: 219

Help for scrollBar - Resolved -

I wish use scrollbar on a dialog @ nRow, ncol SCROLLBAR oScrollInizio HORIZONTAL SIZE 400,20 PIXEL OF oDlg ; RANGE 1,reccount() ; ON DOWN ( dbSkip(),; If( EoF(), dbGoBottom(),) ); ON UP ( dbSkip( -1 ) ) this run ok but the thmbpos is not stuck where it should be How I can set the command ON ...
by Silvio.Falconi
Sun Apr 17, 2022 10:43 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Help for scrollBar - Resolved -
Replies: 10
Views: 530

problemas al linkear

Hola. usando harbour y Fwh la ultima. Me arroja estos errores: [1]:iLink32.Exe -Gn -q -aa -Tpe -x @testMaria.bcl Error: Unresolved external 'WinMain' referenced from X:\HARB\BCC7\LIB\C0W32.OBJ Error: Unresolved external '_hb_vmProcessSymbols' referenced from X:\PROYECTOS\TEST\MARIA\OBJ\MARIA.OBJ Err...
by goosfancito
Thu Feb 04, 2021 9:56 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: problemas al linkear
Replies: 6
Views: 420

Ver Nuevo Registro Browse

... ;   FIELD->USR_TELEF,DTOC(FIELD->USR_DATE)  Para ver con 4 Botones el Principio, Retroceso Avance, Final de este Browse DbSkip() está dando Error hay otro código ? principio := oBrw:scrollToTop() //<== Ok retroceso := DbSkip(-1) // <== Error avance := DbSkip(+1) ...
by mustafa
Thu Dec 10, 2020 4:42 pm
 
Forum: FiveTouch
Topic: Ver Nuevo Registro Browse
Replies: 2
Views: 2786

Re: Cómo resetear oBrw:oseek

... SIZE 40, 10 PIXEL ACTION (lSalir:=.t., oDlg1:End()) SELE produ produ->( ordscope( 0, nProve ) ) produ->( ordscope( 1, nProve ) ) produ->( DBSKIP( 0 ) ) IF produ->( ordKeyCount() ) == 0 MsgInfo( "No se encontraron productos" ) ENDIF @ 1, 1 XBROWSE oLbx SIZE 250, 65 PIXEL; COLUMNS ...
by Ramón J.
Sat Dec 05, 2020 11:39 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Cómo resetear oBrw:oseek [SOLUCIONADO]
Replies: 9
Views: 1402

Re: Cómo resetear oBrw:oseek

... SIZE 40, 10 PIXEL ACTION (lSalir:=.t., oDlg:End()) SELE produ produ->( ordscope( 0, nProve ) ) produ->( ordscope( 1, nProve ) ) produ->( DBSKIP( 0 ) ) IF produ->( ordKeyCount() ) == 0 MsgInfo( "No se encontraron productos" ) ENDIF @ 1, 1 XBROWSE oLbx SIZE 250, 65 PIXEL; COLUMNS ...
by Ramón J.
Tue Dec 01, 2020 9:09 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Cómo resetear oBrw:oseek [SOLUCIONADO]
Replies: 9
Views: 1402

Cómo resetear oBrw:oseek [SOLUCIONADO]

... OF oFld:aDialogs[1] SIZE 40,10 PIXEL ACTION oDlg:End() sele produ produ->(ordscope(0, nProve)) produ->(ordscope(1, nProve)) produ->(DBSKIP(0)) if produ->(ordKeyCount())==0 MsgInfo("No se encontraron productos") endif @ 1,1 XBROWSE oLbx SIZE 250, 65 PIXEL; COLUMNS "CODIGO_PRO", ...
by Ramón J.
Mon Nov 30, 2020 9:08 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Cómo resetear oBrw:oseek [SOLUCIONADO]
Replies: 9
Views: 1402

TITLETEXT Refresh() Arrays...(SOLVED)

... oVar_AA[t,03] := aVar_AA[t,03] := P6_AAAA->CDay_06 oVar_AA[t,04] := aVar_AA[t,04] := P6_AAAA->CDay_05 Endif t++ ; P6_AAAA->(DbSkip()) Enddo tX := 15 ; tY := 20 nX := 225 ; nY := 0 // Header @ 0,nY TITLE oBar_AA Size 480, 28 Of oMainWnd TRANSPARENT @ 10, nY TITLETEXT OF oBar_AA ...
by RiazKhan
Sat Jun 06, 2020 7:33 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: TITLETEXT Refresh() Arrays...(SOLVED)
Replies: 2
Views: 502

How To Refresh() TITLETEXT With Arrays...???

... oVar_AA[t,03] := aVar_AA[t,03] := P6_AAAA->CDay_06 oVar_AA[t,04] := aVar_AA[t,04] := P6_AAAA->CDay_05 Endif t++ ; P6_AAAA->(DbSkip()) Enddo tX := 15 ; tY := 20 nX := 225 ; nY := 0 // Header @ 0,nY TITLE oBar_AA Size 480, 28 Of oMainWnd TRANSPARENT oBar_AA:lRound := .T. @ ...
by RiazKhan
Mon May 25, 2020 3:33 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: How To Refresh() TITLETEXT With Arrays...???
Replies: 2
Views: 682
Next

Return to advanced search