FiveTech Software tech support forums

... muy rígido con el group By, recomiendo seguir la siguiente regla. SELECT CAMPO1,CAMPO2,SUM(A),SUM(B),MIN(A),MIN(B) FROM TABLA WHERE CAMPO3="XVALOR" GROUP BY CAMPO1,CAMPO2 ORDER BY CAMPOX La optimización dependerá del indices en CAMPO1,CAMPO2 y CAMPO3 Si deseas publica en formato excel ...

... = &XFORMU_VA MSGINFO(XVAL_TMP) RETURN .T. FUNCTION MIVALOR(DATO,xwid_ad,xid) ********************** * Funcion que hace el calculo LOCAL XVALOR :=0.00 XVALOR := (xwid_ad * xid) + DATO RETURN XVALOR Graciasss

... If you do not use this function, dialog LOG always remains visible - Function GetMsgLog() Return object dialog MsgLog - Function MsgLog( xValor, nRow, nCol, nHeight, nWidth ) Dialog for LOG messages - Command FWINLOG ( look Fivewin.ch for definition ) Sample: MsgLog( Seconds() ) or better ...

Armando, Una vez algo se comia mi memoria, y eran el uso de arreglos, resultaba que usaba dentro de un bucle la instruccion AADD(v_arreglo, xValor) pero me olvidaba que debia reiniciar v_arreglo:={} cada vez que reiniciaba el Blucle (dowhile) , al final me quedaba si memoria y el proceso cuando ...

... la columna que no es del query cuando estaba el query, es simplemente como lo expuse antes en una linea: oBrw:aArrayData[oBrw:nArrayAt, 5] := xValor o oBrw:aCols[5]:Value := xValor con el array funciona muy bien oBrwMnu:aArrayData[oBrwMnu:nArrayAt, 5] := oBrwIP:aCols[5]:nTotal ...

... reemplazarlos basado en operaciones posteriores, en otra funcion trato de actualizar esta 5ta. columna con oBrw:aArrayData[oBrw:nArrayAt, 5] := xValor, pero me da error, tambien intente con oBrw:aCols[5]:Value := xValor, tambien error. La pregunta de las mil lochas es: puedo o no modificar el ...

Cambia esta línea:

xValor := substr(xValor,1,10)

a

xValor := substr(TToS(xValor),1,10)

Saludos
Manu Expósito

Hola. Estoy exportando a Excel el contenido de un xBrowse y para tomar el valor del campo utilizo lo siguiente: xValor := eval(oBrw:aCols[nColumna]:bEditValue) ...pero me aborta cuando la columna en cuestión contiene un bitmap. Pregunto, ¿cómo puedo saber si una de los elementos ...

... las propiedades del mismo para que te muestre lo que quieras, en este caso seria : filter oRS:filter := "xcampo LIKE " + " " 'xvalor' " <-- para filtrar ojo con las comillas dobles y las sencillas ! oRS:filter := adFilterNone <-- Para limpiar el filtrado Para no ...

... FOR nRow := 5 TO nRows nContar = nContar + 1 oMeter:Set( nContar, sysrefresh()) APPEND BLANK FOR nCol := 1 TO nCols xValor := oHoja:Cells(nRow,nCol):Value if Valtype( oHoja:Cells( nRow,nCol ):Value ) = "N" xValor := STR(xValor) endif FieldPut(nCol,xValor) ...

Hola a todos Voy a hacer el planteamiento que hice antes y al que no le encuentro solución. Alguien ha hecho un scope a una tabla,( OrdScope(0,xValor) OrdScope(1,xValor) ), la ha presentado con Xbrowse y le ha funcionado bien? Si es así me podríais indicar como lo habeis hecho para corregir mi ...

... funcion. Gracias...!!! funcion de busqueda: // ----------------------------------------------------------------------- FUNCTION Buscaparam(xtipo, xvalor, xorden, xvta, xcododes, XUSERID) local olbx, odlg local obt1, obt2, obt3, xrta local xok LOCAL oString LOCAL XBUSCA, OBUSCA LOCAL OFNTARIAL ...

... con recursos usado Workshop , le active la casilla Multiline en el recurso.. luego he creado el Get conrrespondiente... REDEFINE GET oVALOR VAR XVALOR MEMO ID 101 OF oDlg pero al compilarlo puedo escribir pero no me funciona el Enter para pasar a otro parrafo cuando estoy editando.. alguna idea ...

Ricardo Ramirez E. wrote:Hola Foro :

Existe alguna funcion de cadenas en [x]Harbuor que transforme cadenas
asi :

ÀLVARO => ALVARO
ÃLBERTO => ALBERTO
ÁUREA => AUREA

Saludos.!

Prueba con STUFF, puedes buscar xValor en una cadena y reemplazarla por otra.

... DESPUES "85" Y "ENTER" AL FINAL ALGO ASI oBrw:bkeydown={| nkey |iif(nkey>47 .and. nkey<58,modifica(nkey),nil)} function modifica(nkey) xvalor:=cantidad if oBrw:editcol(3,@xvalor,'99,999',,,,,) cantidad:=valor endif return nil No se como hacer para que al escribir 8, aparezca el 8 en ...