FiveTech Software tech support forums

... lo había probado, de todos modos volví a probar, pero con el mismo resultado. En la función intercalé que mostrara whoraini así: 57 ?whoraini 58 cDato = &c en la línea 57 me devuelve el valor correcto de whoraini En la línea 58 me da el siguiente error: Error BASE/1003 No existe la variable: ...

... If the result is a result-set, it is returned as Multi-Dim array  lo mejor que puedes hacer es parametizarlo, ya que de esta forma "cDato" es tratado para evitar las sqlinjection.  LOCAL oDatos := ::oCnx:Execute( "SELECT id, nombre FROM tbdistribuidores WHERE tbdistribuidores.nombre ...

... If the result is a result-set, it is returned as Multi-Dim array  lo mejor que puedes hacer es parametizarlo, ya que de esta forma "cDato" es tratado para evitar las sqlinjection.  LOCAL oDatos := ::oCnx:Execute( "SELECT id, nombre FROM tbdistribuidores WHERE tbdistribuidores.nombre ...

Si el dato a buscar es alfanumerico, debes encerrarlo entre comillas simples.
Nombre = ' "+alltrim(cDato)+" ' ; "

resolved with @ 136,55 GET oGetArc VAR cArchiv size 150,11 PIXEL OF oDlgSalvaRpt ; VALID ValEmpty( cArchiv, oGetArc ) FUNCTION ValEmpty( cDato, oGet ) IF empty( cDato ) MsgStop( i18n( "E' obbligatorio riempire questo campo." ) ) oGet:setFocus() RETURN .F. END IF RETURN .T.

... ***********************************MOVIMIENTO DE ARTICULOS POR MESES**********************************function fMovMeses()Local cQryLocal cDato := "CORP012"TEXT INTO cQrySELECT mes,SUM(entradas) AS entradas,SUM(salidas) AS salidas FROM (SELECT MONTH(MOV.o_fechas) ...

if I have this

nInicio:= At('", ', cDato) +3
nFin:= At(', "', cDato, nInicio)

HOw I converte ?

I have an error on function AT
Error E0021 Incorrect number of arguments in AT
but it is strange because I think to make right
sample :

nInicio:= At('", ', cDato) +3
nFin:= At(', "', cDato, nInicio) <------

... 1, 0},; // S=ok, 1=aceptada con errores Cuando parseo la respuesta de la aeat si encuentro el tag IF cTag="siiR:CSV" ; cCsv:=cDato y es correcto ELSEIF cTag="siiR:EstadoRegistro" IF cDato="Correcto" ; cCorrecta :="S" Entonces actualizo esos campos ...

... ESC; si de da el caso no podras cerrar el DIALOGO a menos que se cumpla la condicion. Esto me ocurrio, sobre todo, cuando hacia: VALID !Empty(cDato) Toma ésta apreciación: 01. En un formato con cualesquier campos de llenado, las opciones proporcionadas por Windows a travéz de FWH y Xharbour ...

... ESC; si de da el caso no podras cerrar el DIALOGO a menos que se cumpla la condicion. Esto me ocurrio, sobre todo, cuando hacia: VALID !Empty(cDato) Toma ésta apreciación: 01. En un formato con cualesquier campos de llenado, las opciones proporcionadas por Windows a travéz de FWH y Xharbour ...

... ESC; si de da el caso no podras cerrar el DIALOGO a menos que se cumpla la condicion. Esto me ocurrio, sobre todo, cuando hacia: VALID !Empty(cDato) Mas aun, te consejaria que le des mayor enfasis al VALIDADOR del Dialogo. Yo lo tengo organizado asi: 1. Validar campos NULOS/VACIOS Si hay uno ...

... or use ( press) the oBrw the func valid not run http://www.eoeo.it/wp-content/uploads/2014/11/unnamed.jpg FUNCTION ValEmpty( cDato, oGet ) IF empty( cDato ) MsgStop( i18n( "E' obbligatorio riempire questo campo." ) ) oGet:setFocus() RETURN .F. END IF RETURN .T.

... una báscula Marca Torrey y no logro hacerlo funcionar, el codigo que estoy usando es el siguiente: FUNCTION TestBascula() LOCAL nComm, nError, i, cDato, nContador := 0, cPaso := "", cDcb := "" nComm := OpenComm("COM3:9600,N,8,1",2048,512) cDato := Space(80) If !BuildCommDcb( ...

... Estoy a tus órdenes. ASI QUEDO EL CODIGO //---------------------------------- Function InsGopMult(oLbx,oQuery) local cCtrl, cCad, nVal, cDato cDato := "AAAAAAA" cCtrl := ALLTRIM(STR(oQuery:ctrl)) nVal := oQuery:ctrl oQuery:Skip() If oQuery:EOF() nVal := nVal + 1 EndIf nVal ...