FiveTech Software tech support forums

... for creating invoices. https://mybergland.com/fwforum/rgnavigation.jpg This is the printout https://mybergland.com/fwforum/rechnung.jpg

Hello Silvio, here you have an example how you can handle IVA and Total. Best regards, Otto https://mybergland.com/fwforum/er_def.jpg https://mybergland.com/fwforum/er_rechnung.jpg METHOD RgFuss()    local cKurtaxe          := ""    local cTeilzhg          :...

... function. We need FWSavePreviewToPDF in vrd.prg. I will look into this on this weekend. Best regards Otto https://mybergland.com/FWForum/rechnung.jpg

... ; ALIGN "TOPLEFT" ; GROUP 2 ; BITMAP c_Pfad1 + "Save.bmp" ; BMPALIGN "MIDDLECENTER" ; SIZE 50, 50 ; ACTION RECHNUNG("RECH0") ; BODYTEXT "testen" ; TEXTALIGN "BOTTOMCENTER" oSBtn[60]:nClrCaption := aVal[74] oSBtn[60]:oFont := ...

... ; ALIGN "TOPLEFT" ; GROUP 2 ; BITMAP c_Pfad1 + "Save.bmp" ; BMPALIGN "MIDDLECENTER" ; SIZE 50, 50 ; ACTION RECHNUNG("RECH0") ; BODYTEXT "testen" ; TEXTALIGN "BOTTOMCENTER" oSBtn[60]:nClrCaption := aVal[74] oSBtn[60]:oFont := ...

... is printed and all the actions which are necessary are made or preview. Best regards, Otto http://www.atzwanger-software.com/fw/rechnung.jpg

Hello Antonio,
I tried to do this but with no result:

if lret = .f.
USE ( CurDir() + "\RECHNUNG" ) VIA "DBFCDX" NEW ALIAS RECHNUNG
oLbxRG:cAlias := "RECHNUNG"
oLbxRG:show()
oLbxRG:gotop()
oLbxRG:refresh()
endif

Best regards,
Otto

... database and then I send the dbf-file back to the server. In case that something goes wrong the user should return to the previous status. select rechnung use oLbxRG:lCloseArea() // if I use lCloseArea the msginfo is ok otherwise I get an error But then I find no way how to "oLbxRG:lOpenArea()" ...

... => TBTNBMP:LOADBITMAPS(0) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:NEWBAR(0) Called from: c:\develop8\WH_Fwh\xRg\RECHNUNG.PRG => EXEC_ZIRECHNUNG(1721) Called from: c:\develop8\WH_Fwh\xRg\RECHNUNG.PRG => ZIRECHNUNG(371) Called from: c:\develop8\WH_Fwh\xRg\RECHNUNG.PRG ...

... settings are stored in the file with the extension … . vrd and the printareas then as … . v01 to … . vn This is the setting vrd of the screenshot RECHNUNG I posted. You see I use 17 ! PRINTAREAS. Header, Subheader, Folio, Items, invoice endtext and so on. http://www.atzwanger-software.com/fw/easy4.jpg ...

... 102 } ; ITEMVALUES { cText1, cText2 } PAGEBREAK oVRD //Print position header cText1 := "Seite: " + ALLTRIM(str(nSeite)) cText2 := "Rechnung-NR: " + cOrderNr PRINTAREA 6 OF oVRD ; ITEMIDS { 101, 102,105 ,106} ; ITEMVALUES { cText1, cText2,"Übertrag:",ALLTRIM(transform( ...

... / disadvantages of using ARRAYS. Thanks in advance Otto With ARRAY (much faster) do while .not. eof()aadd(arr1,{ str(RECHNUNG->menge),str(RECHNUNG->vmenge), RECHNUNG->bezeichnun,str(RECHNUNG->Wert )})skipenddo   @ 0, 0 LISTBOX ...

After compiling with 8-08 iI have this error: Regards, Otto Application =========== Path and name: C:\xWINHOTEL\xRECHNUNG.exe (32 bits) Size: 2,684,928 bytes Time from start: 0 hours 0 mins 3 secs Error occurred at: 28.08.2008, 12:41:58 Error description: Error BASE/1004 Class: ...

... // //------------------------------------------------------------------// #include "TsBrowse.ch" #include "FiveWin.ch" //procedure main () // rechnung() //return //------------------------------------------------------------------ FUNCTION Rechnung () LOCAL oDlg, oBrw LOCAL nNetto := 0.0, ...

... ignore the different field-types. The field-types i can change, after the converting is done. Somebody knows a better, easy solution to do this ? Rechnung;Kundennr;Rufnummer;Netz;Art;Gesprdat;Gesprzeit;gewRufnr;gewNetz;Zeitber;Dauer;Volumen;Kennzeich;Preis;Code C813354668;1063567698;0160 / 1853735;E+;NX;07.07.08;18:58:11;01732644433;VF;;00:28;0;0,0823;0,0000;NX ...