FiveTech Software tech support forums

... out of range. Correct way: for n := 1 to 20 aGet[ 1 ] := MakeGet( n * 20, 50, aVar, n, oWnd ) next n ACTIVATE WINDOW .... //-------------- static function MakeGet( nRow, nCol, aVar, n, oWnd ) local oget @ nRow, nCol GET oGet VAR aVar[ n ] of oWnd <clauses> // note this value of "n" ...

... getImage() function is called it creates an EVAL error because this function was mistakenly inserted in the easyreport files and was not assigned static, the function It is located in eritems.prg . Easyreport with all its files has been placed in the fiveh.lib library. I have already notified ...

Otto wrote:Static function changeBrw(oBrw,lmarried)
IF lmarried
oBrw:nBottomMargin -= 40
else
oBrw:nBottomMargin += 40
endif
oBrw:refresh()
return nil

use the test I published

Static function changeBrw(oBrw,lmarried)
IF lmarried
oBrw:nBottomMargin -= 40
else
oBrw:nBottomMargin += 40
endif
oBrw:refresh()
return nil

I not Know How change the height of a xbrowse I tried with

Static function changeBrw(oBrw,lmarried)
IF lmarried
oBrw:nHeight -= 40
else
oBrw:nHeight += 40
endif
oBrw:refresh()
return nil

but not happen nothing

// hb_parc(3) -> "c:\temp\salida.pdf" // la impresora por defecto no pueder ser PDF24 O PDFCREATOR (VIRTUALES) HB_FUNC_STATIC( STARTDOC ) { HDC hDC = (HDC) hb_parnl(1) ; LPDOCINFO sDoc = NULL; BOOL Result = FALSE ; if (hDC ) { sDoc = (LPDOCINFO) hb_xgrab(sizeof(DOCINFO)); sDoc->cbSiz...

... CLASSDATA lRegistered AS LOGICAL DATA oFont_6 ..... que cuando la compilo da este .ppo: _HB_CLASS TFactur_1 ; function TFactur_1 ( ... ) ; STATIC s_oClass ; LOCAL nScope, oClass, oInstance ; IF s_oClass == NIL .AND. __clsLockDef( @s_oClass ) ; BEGIN SEQUENCE ; nScope := 1 ; ( ( nScope ) ...

... // Barra de opciones //------------------------------------------------------------------------------ Static Procedure BrwbtnBar( oBrw ) local oBar, oBtn, oBold DEFINE BUTTONBAR oBar OF oBrw:oWnd SIZE 75,75 3D 2015 HEIGHT 96 oBold := oBar:oFont:Bold() ...

function ErrorDialog( e ) is static so you have to modify errsysw.prg to make it public or entirely replace FWH errsysw.prg with one of your own

nageswaragunupudi wrote:

Code: Select all  Expand view

LOCAL dDate := ddatacambio:GetDate()
 

Here is the mistake.
"ddatacambio" is a date value and date value can not have any method.

opps - corrected
STATIC FUNCTION DoSwitch( ddatacambio, oBtnGetExchange,aGet )
LOCAL dDate := aget[1]:GetDate()

... @oBrw ) al enviarlos sin @ estas enviando una copia, no el original. Otra solución sería que declares las variables aArray y oBrw de tipo Static al inicio del PRG, asi serán reconocidas en todo el prg y sus funciones y no será necesarrio pasarlas como parametros. prueba...

... //----------------------------------------------------------------------- * * funcion de WILLY * Function Blinker(oCtrl, oTmr) Static lOn := .f. oTmr:DeActivate() if lOn oCtrl:Enable() //Hide() else oCtrl:Disable() //Show() endif lOn := !lOn oTmr:Activate() oCtrl:Refresh() Return(Nil) ...

... Then, you might have some spaces on the right. Best regards, Otto If I save my res as rc: right no: CONTROL "heute", 4001, "Static", WS_GROUP, 36, 44, 100, 8 right yes: CONTROL "heute", 4001, "Static", WS_GROUP, 36, 44, 100, 8, WS_EX_RIGHT

ADD SS_RIGHT style to your STATIC resource.

Preguntas y respuestas Verifactu publicadas por hacienda después de la última ponencia:
https://www.agenciatributaria.es/static_files/AEAT_Desarrolladores/EEDD/IVA/VERI-FACTU/20240214-Preguntas-respuestas-Verifactu.pdf