FiveTech Software tech support forums

METHODS: RecCount(), LastRec(), KeyCount(),RecNo(), KeyNo() GoTop(),GoBottom(),GoTo(nRec),KeyGoTo(nKey),Skip(n) FCount(),FieldPos(c),FieldName(),FieldLen(),FieldDec(),FieldType() FieldGet(),FieldPut() SetOrder(cSort,,lDescend) Save() Close() or End() --------------- NOT SUPPORTED: ...

he tratado de todas las maneras y no me funciona.

1) ::oQry:requery()

2) ::oQry:refresh()

::oBrw:skip()
::oBrw:refresh()

... local cFileName := "table.rtf" local oFile := FCreate(cFileName, 0) aTable := {} Do while (!oTemp4:Eof()) * If Empty(oTemp4:Nome) oTemp4:skip() Loop Endif ....................... c1:="Cartella n."+ Trim(oTemp4:codice) c2:=alltrim(oTemp4:nome) procedure to Create atable from ...

...  .t.,oRep))    //leject the problem I have and that I can't overcome is that when I print the group header it doesn't skip a line and the records are printed below too attached to the header as you can see in this figure https://i.postimg.cc/4N8fTmD1/yyy.jpg ...

... cuestion de ir probando. Espero que te sirva For versions prior to 2307, this approach is very nice. For sending Image Files like jpg,bmp,png,etc. skip these three lines [code]   oShell:SendKeys("{DOWN}") // Presiono flecha abajo    syswait(.2)  /code]

... COLOR CLR_HBLUE Font m->oFontFis ACTIVATE DIALOG oIndex NOWAIT CENTER do while !eof() xnum:=99->numero VTA1100PE() // Genera los pdf sele 99 skip xsay:="Socio: "+strzero(99->cliente,4)+" - Fac.: "+xlet+"-"+str(xemi,1)+"-"+strzero(99->numero,6) ...

... dumpbin /exports %dll_file% > %exports_file% echo LIBRARY %lib_name% > %def_file% echo EXPORTS >> %def_file% for /f "skip=19 tokens=1,4" %%A in (%exports_file%) do if NOT "%%B" == "" (echo %%B @%%A >> %def_file%) lib /def:%def_file% /out:%lib_file% ...

... determine whether it's safe to call cWord:Quit(). d. If the document state returned from Application 1 indicates that a document is open in jWord, skip calling cWord:Quit() to avoid closing the shared document. Note that the exact implementation details may vary depending on the programming languages ...

His question was about the behavior of our library. Whether after oRs:Delete() do we need to oRs:Skip() or not. That point is clarified. The point of using sql statement DELETE FROM <table> [ WHERE <cond>] was discussed in his other post. I say this ...

Hi all when you execute the delete command is also done skip ? oRs:gotop()do while .not. oRs:eof()    oRs:delete()  <----- the pointer on next record ?enddoor old way with DBFoRs:gotop()do while .not. ...

... simple and not double lines, a test on the left and the date and page number/pages on the right bSetUp := < |oRep, Brw, n | if n == 2 oRep:bSkip := {|| (IF(!oDbf:Eof(),oDbf:Skip(),nil),; IF(oRep:nCounter % 2 =1 , oRep:lShadow :=.f.,oRep:lShadow :=.t.))} return nil endif return 2 > oBrw:Report("List", ...

... PREVIEW --> ¿ Como lo guardo ? do while !eof() oPrn:cmSay(08.90,03.30, alltrim(xnom)) oPrn:cmSay(08.90,15.00, alltrim(wbar)) l:=l+1 skip enddo ENDPRINT

example:
select products
goto top
do while .NOT. eof()
cnaam=TRIM(products->naam) to transform in his real fieldname

select sales
append blank
replace sales->fieldname with ....

select products
skip 1

enddo

... nalias=TRIM(products->alias) @ a,5 say cnaam OF oDlg FONT oFont @ b,12 get nalias OF oDlg SIZE 20,11 picture "999" FONT oFont skip 1 a=a+1 b=b+1.15 enddo

... |oRep, Brw, n | bImage := {|oRep| oRep:SayBitmap(0.5, 7, cLogo)} bStart := {|oRep| oRep:bStartPage := bImage} bInit := {|| oBrw:oDbf:GoTop()} bSkip := {|| (IF(!oBrw:oDbf:Eof(),oBrw:oDbf:Skip(),nil),IF(oRep:nCounter % 2 =1 , oRep:lShadow :=.f.,oRep:lShadow :=.t.))} if n == 2 oRep:oShdBrush := ...