FiveTech Software tech support forums

... Pago" ; COLSIZES -10,60,100,100,100,100,100,100,85 OF oDlg ; SIZE 640,AltoBrw2 PIXEL ; JUSTIFY .f.,.f.,.t.,.t.,,.t.,.t.,,.t.,.t.,.f. ; ALIAS cAlias FOOTERS LINES CELL NOBORDER ; BACKGROUND aQueGrad VERTICAL oBrw:nStretchCol := 2 oBrw:nRowHeight := 30 oBrw:nMarqueeStyle := 4 oBrw:nRowDividerStyle ...

... datos que determina el número de  área de trabajo de un alias. El número devuelto puede estar comprendido entre 0 y 250. Si no se especifica <cAlias>, se devuelve el número del área de trabajo actual. Si se especifica y el alias no existe, SELECT() devuelve cero." Antes MsgInfo( Select(), ...

Hi, I have a xbrowse:

Lista40:cAlias := "ARQANO"

How I count records? I don't want the deleted ones to enter the sum.

Thanks!

... auto" call. But can I pass the object created from the hb_JsonDecode function and display it in TCBrowse. I played around with setting oBrw:cAlias := "ARRAY" but get no data. Not sure how to set the bGoTop, bGoBottom, bSkip, bLogicLen blocks. For now I am creating a dynamic recordset ...

Saved me a few keystrokes
I normally would type as (oDbf:cAlias)->(dbSeek(cSeek, nil, .t.))

If you use database objects then you can just do:

oCustomer:goBottom()

Thanks Rao,
Saved me a few keystrokes
I normally would type as (oDbf:cAlias)->(dbSeek(cSeek, nil, .t.))

... https://i.postimg.cc/Wzp12k6D/Codepage-Dialog.jpg here is my FUNCTION ChangeCodePage() possible Syntax ChangeCodePage( cPathcFile, cAlias, oBrw ) ChangeCodePage( cPathcFile, , oBrw ) ChangeCodePage( , , ::oGrid ) ChangeCodePage() later use (not need when pass cPathcFile.)   USE ...

... function AbmCorregir() local napu local aBotones := {} local oDlg, oBrw, cAlias := cGetNewAlias( "CORREGIR" ) local oBr, oFont local titgral := 'Información Sobre Correcciones' local atitcol := '' local acampos ...

... cTexSucur :="", oTexSucur static oPaci, oFlt, oBtn[ 6 ] function Paci_ABM( tUser ) local oDlg, oLbx, oBusco, cBusco := SPACE(20) //, cAlias:=cGetNewAlias('Sample') set deleted on AbrePaci( ) oPaci:SetFocus() oPaci:SetOrder( 2 ) DEFINE DIALOG oDlg RESOURCE "FONDO_PACIENTE" ...

... cTexSucur :="", oTexSucur static oPaci, oFlt, oBtn[ 6 ] function Paci_ABM( tUser ) local oDlg, oLbx, oBusco, cBusco := SPACE(20) //, cAlias:=cGetNewAlias('Sample') set deleted on AbrePaci( ) oPaci:SetFocus() oPaci:SetOrder( 2 ) DEFINE DIALOG oDlg RESOURCE "FONDO_PACIENTE" ...

... cTexSucur :="", oTexSucur static oPaci, oFlt, oBtn[ 6 ] function Paci_ABM( tUser ) local oDlg, oLbx, oBusco, cBusco := SPACE(20) //, cAlias:=cGetNewAlias('Sample') set deleted on AbrePaci( ) oPaci:SetFocus() oPaci:SetOrder( 2 ) DEFINE DIALOG oDlg RESOURCE "FONDO_PACIENTE" ...

... )} ACTIVATE WINDOW oWnd return nil Function Test() local oDlg, oBrw, oFont, nWild := 2 local cList, aFlds, aHdrs local nChoice, uDataSource local cAlias,oWndChild cList := "First,Last,Street,State,HireDate" cAlias = cGetNewAlias( cFileNoExt("CUSTOMER.DBF" ) ) USE CUSTOMER SHARED ...

... ; oBrw:Salary:nFooterType := AGGR_SUM, ; oBrw:Salary:bSumCondition := { || .NOT. FIELD->MARRIED }, ; //oBrw[6]:sel:bSumCondition := { || ( oBrw:cAlias )->selected } oBrw:chm_send:nFooterType := AGGR_COUNT oBrw:chm_send:bSumCondition := { || if ( ( oBrw:cAlias )->chm_send > 0, .t., .f. ...

(cAlias)->( FCount() )

... DBSTRUCT() ) SIZE nWidth - 20, nHeight - 90 PIXEL OF oWnd ;    FONT oFontDefault ;    COLOR BFcolor, BGcolor ;    ALIAS cAlias CELL LINES NOBORDER FASTEDIT AUTOCOLSFUNCTION ColsNumber(aDbfStruct)LOCAL aStruc := SP_aDbfStruct()  // Array from PicklistLOCAL ...