FiveTech Software tech support forums

... ; oRS1Cli:Fields( "tele" ):Value ; HEADERS "Act.", "Nro.","Documento", ; // ,"Reg." "Vend", "Nombre","Apodo", ; "Direccion" , ; "C.Postal", ; "Localidad", ; ( "Telofono" ...

... "Domic",; "C.Postal",; "Localidad",; oemtoansi("Tel‚fono"),; "T.Doc.",; oemtoansi("Vend."),; "Lista",; "IVA",; "CUIT",; oemtoansi("Condici¢n de pago"); ALIAS cAlias AUTOSORT CELL LINES NOBORDER ...

... my own that compile and run OK. I have a need to do some serial communications (RS232). These are the linking errors I get when trying to compile. vend@v1:~/fivelinux/samples$ ./build.sh qibixx compiling... Harbour 3.2.0dev (r1909261630) Copyright (c) 1999-2019, https://harbour.github.io/ Compiling ...

... my own that compile and run OK. I have a need to do some serial communications (RS232). These are the linking errors I get when trying to compile. vend@v1:~/fivelinux/samples$ ./build.sh qibixx compiling... Harbour 3.2.0dev (r1909261630) Copyright (c) 1999-2019, https://harbour.github.io/ Compiling ...

Saludos

Willian me podrias facilitar la ultima libreria de Tmysql, Funciona para Harbour

Tome los fuentes de la contribuccion pe no reconoce esta sintaxis, oQuery2:vend si no de esta manera ?oQuery2:fieldget( "vend" )
segun v eo tus ejemplos,

Gracias

Mastintin para mi seria algo asi select a.idarticulo, b.nombre, sum(if(month(fecha)=1,(unidades*precio),0)) as Enero, sum(if(month(fecha)=2,(unidades*precio),0)) as Febrero, sum(if(month(fecha)=3,(unidades*precio),0)) as Marzo, sum((unidades*precio)) as Total from tabla_cant_vend as a left join tabl...

saludos al forum cldatos := {"nombre","vend"} cltitul := {"Codigo","Nombre"} clpictur := {Nil,Nil} clwinth := {40,360} clfoter := {"Codigo","Nombre"} clalidat := {"AL_LEFT","AL_LEFT"} ...

... Otra Pregunta // Esta lista de Instrucciones son propias del ODBC ?oDatrt:Fields("vend"):Value ?oDatrt:RecordCount() oDatrt:MoveFirst() Te pregunto como esta manejando ADO y maneja estas eso es propio de ADO no tiene que ver ...

Para que sirve la el commando D_SetCaseSensitive( .T. ) Otra Pregunta // Esta lista de Instrucciones son propias del ODBC ?oDatrt:Fields("vend"):Value ?oDatrt:RecordCount() oDatrt:MoveFirst() Te pregunto como esta manejando ADO y maneja estas La diferencia con la clase Tdolphin es que ...

Boa tarde Veja o exemplo abaixo. Funciona bem. Ficheiro Prg dbSelectArea("PRO") PRO->(OrdSetFocus("DDATA")) DEFINE DIALOG oDlg RESOURCE DIALOG_1 TITLE (Titulo) REDEFINE LISTBOX oLbx; FIELDS dtoc(PRO->DDATA), PRO->VENDE; FIELDSIZES 60, 70; HEADERS "Data", "...

... Space(3),; // 5 codpag Space(2),; // 6 cobdoc Ctod(""),; // 7 fecent Space(5),; // 8 codcli Space(2),; // 9 codalm Space(20),; // 10 NOM VEND Space(20),; // 11 nom fpago Space(8),; // 12 VAR BASE AYUDA Space(10),; // 13 nomcli Space(10),; // 14 dircli Space(10),; // 15 discli Space(10),; ...

... LISTBOX olbx ; FIELDS cli->clinum, cli->clinom, cli->agente ; HEAD "CLAVE", PADC("NOMBRE",35," "), "VEND" ; ALIAS "cli" ; ID 101 ; OF oDlg ; ON LEFT DBLCLICK( cCliNum := cli->clinum, oDlg:End() ) Update oLbx:bKeydown := {|nKey| IIF(nKey ...

... y los campos tipo igual : SELECT("VENTAS") IF !FLOCK() RETURN(.f.) ENDIF IF !FERASE("VENTAS.CDX") RETURN(.F.) ENDIF INDEX ON C_VENDEDOR TAG VEND TO VENTAS // C_VENDEDOR campo tipo cadena INDEX ON STR(VENTA_TOT) TAG VENT TO VENTAS // VENTA_TOT campo tipo numerico INDEX ON DTOS(FECH_VENTA) ...

Sr. Manuel, resolvi assim: ADD COLUMN TO oBrw TITLE "Vend" DATA saipro->codvend SIZE 50 EDITABLE 3DLOOK FALSE, TRUE, TRUE ALIGN DT_CENTER, DT_CENTER, DT_CENTER PICTURE "999"; COLORS CLR_BLACK, bColor MOVE DT_MOVE_NEXT; valid {|uVar| TSvalidaVend803(uVar,oBrw)}; ...

Sr. Manuel Mercado: ADD COLUMN TO oBrw TITLE "Vend" DATA FieldWBlock("codvend",select()) SIZE 50 EDITABLE 3DLOOK FALSE, TRUE, TRUE ALIGN DT_CENTER, DT_CENTER, DT_CENTER PICTURE "999"; COLORS CLR_BLACK, bColor MOVE DT_MOVE_NEXT; valid {|uvar| TSvalidaVend803(@uVar,obrw)}; ...