FiveTech Software tech support forums

www.FiveTechSoft.com

Skip to content

Search found 90 matches: subs

Return to advanced search

COMO EVITAR Q MEMOWRIT GRABA EL FINAL UN RETORNO DE CARRO

AMIGOS TENGO UNA BASE DE DATOS Y TENGO QUE GENERAR UN ARCHIVO DE TEXTO CON SU CONTENIDO file:=ruta(4)+subs(bases[j],1,8) _t("DIG","Generando archivo "+ALLTRIM(FILE)+".TXT" ) LO HAGO USANDO EL COPY TO FILE COPY TO &file SDF PERO ME GENERAR ...
by Vladimir Zorrilla
Fri Oct 16, 2009 5:42 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: COMO EVITAR Q MEMOWRIT GRABA EL FINAL UN RETORNO DE CARRO
Replies: 4
Views: 695

error justificado de columnas con xbrowse

... oBrw:aCols[4]:nDataStrAlign:=0 oBrw:aCols[4]:nWidth:=170 if len(oBrw:aCols)<5 oBrw:AddCol() // 5 endif oBrw:aCols[5]:bStrData := { || subs((cAlias)->notas,1,60) } oBrw:aCols[5]:cHeader := "Notas" oBrw:aCols[5]:nDataStrAlign:=0 oBrw:aCols[5]:nWidth:=200 oBrw:aCols[5]:nDataStrAlign:=0 ...
by alvaro533
Sun Aug 30, 2009 6:59 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: error justificado de columnas con xbrowse
Replies: 8
Views: 1157

Re: DBF - índice no detecta un campo

... menciono: Primera forma: ============ a) establecer SET DATE TO BRITISH b) establecer SET CENTURY ON, y c) generar el ìndice mediante: INDEX ON SUBS(DTOC(CAMPOFECHA),7,4) ) + SUBS(DTOC(CAMPOFECHA),4,2) ) + SUBS(DTOC(CAMPOFECHA),1,2) ) TO lo_que_sea_tu_indice Segunda forma: ============= a) igual ...
by Armando Picon
Thu Jul 16, 2009 10:33 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: DBF - índice no detecta un campo
Replies: 14
Views: 4066

Alguien se acuerda como setear con Clipper

... reo que es con esto pero no se que representas los numeros oPrn:command("27,67,66") if UPPE(curdir())="CPSADUAN" qfor:=subs(_vg("A20_147"),1,3) do case case qfor$"NEM" oPrn:command("27,67,66") case qfor$"DS1,DS2,DF1,DF2,DF3" oPrn:command("27,67,72") ...
by Vladimir Zorrilla
Tue Jun 16, 2009 6:08 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Alguien se acuerda como setear con Clipper
Replies: 2
Views: 464

Re: graficos estilos tortas.

... For j=1 to cmd:nRowCount cmd:Goto(j);cmd:Load() IF (n:=ASCAN(mplan,cmd:FldGet(1)))=0 aadd(dplan,1 ) aadd(mplan,cmd:FldGet(1) ) aadd(nombre,subs(cmd:FldGet(2),1,15) ) sLabels+=cmd:FldGet(1)+"*" ELSE dplan[n]:=dplan[n]+1 ENDIF Next j sLabels:=subs(sLabels,1,len(sLabels)-1) For k=1 ...
by Vladimir Zorrilla
Fri Jun 05, 2009 10:03 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: graficos estilos tortas.
Replies: 12
Views: 2543

RMCHART from file TXT

... For j=1 to cmd:nRowCount cmd:Goto(j);cmd:Load() IF (n:=ASCAN(mplan,cmd:FldGet(1)))=0 aadd(dplan,1 ) aadd(mplan,cmd:FldGet(1) ) aadd(nombre,subs(cmd:FldGet(2),1,15) ) sLabels+=cmd:FldGet(1)+"*" ELSE dplan[n]:=dplan[n]+1 ENDIF Next j sLabels:=subs(sLabels,1,len(sLabels)-1) For k=1 ...
by Vladimir Zorrilla
Mon Apr 06, 2009 11:56 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: RMCHART from file TXT
Replies: 1
Views: 519

RMCHART

... For j=1 to cmd:nRowCount cmd:Goto(j);cmd:Load() IF (n:=ASCAN(mplan,cmd:FldGet(1)))=0 aadd(dplan,1 ) aadd(mplan,cmd:FldGet(1) ) aadd(nombre,subs(cmd:FldGet(2),1,15) ) sLabels+=cmd:FldGet(1)+"*" ELSE dplan[n]:=dplan[n]+1 ENDIF Next j sLabels:=subs(sLabels,1,len(sLabels)-1) For k=1 ...
by Vladimir Zorrilla
Mon Apr 06, 2009 11:48 pm
 
Forum: FiveWin para CA-Clipper
Topic: RMCHART
Replies: 0
Views: 559

RMCHART

... For j=1 to cmd:nRowCount cmd:Goto(j);cmd:Load() IF (n:=ASCAN(mplan,cmd:FldGet(1)))=0 aadd(dplan,1 ) aadd(mplan,cmd:FldGet(1) ) aadd(nombre,subs(cmd:FldGet(2),1,15) ) sLabels+=cmd:FldGet(1)+"*" ELSE dplan[n]:=dplan[n]+1 ENDIF Next j sLabels:=subs(sLabels,1,len(sLabels)-1) For k=1 ...
by Vladimir Zorrilla
Mon Apr 06, 2009 11:28 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: RMCHART
Replies: 4
Views: 738

RMCHART

... For j=1 to cmd:nRowCount cmd:Goto(j);cmd:Load() IF (n:=ASCAN(mplan,cmd:FldGet(1)))=0 aadd(dplan,1 ) aadd(mplan,cmd:FldGet(1) ) aadd(nombre,subs(cmd:FldGet(2),1,15) ) sLabels+=cmd:FldGet(1)+"*" ELSE dplan[n]:=dplan[n]+1 ENDIF Next j sLabels:=subs(sLabels,1,len(sLabels)-1) For k=1 ...
by Vladimir Zorrilla
Mon Apr 06, 2009 11:17 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: RMCHART
Replies: 0
Views: 358

Re: Necesito la funcion XOR

... ) AuxState:=aState[X+1] aState[X+1]:=aState[Y+1] aState[Y+1]:=AuxState Resto:=aState[ Mod( (aState[X+1] + aState[Y+1]) , 256 )+1 ] nMen:=XOR( ASC( Subs(cConcate,I,1) ) , Resto ) nMen:=nMen+1 Next I El error es: Error: Unresolved external '_HB_FUN_XOR' referenced from D:\SISTEMAS\TAJIBOS\FACTURAS\OBJ\PROCFACT.OBJ ...
by acuellar
Tue Mar 17, 2009 12:17 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Necesito la funcion XOR
Replies: 5
Views: 588

Problem with Editor of Source

... Local rbcc32:="c:\x\bin\bcc32" Local bat:='' If empty(cFile);retu .t.;endif //MSGALERT(cFile) cFile:=ALLTRIM(cfile) nomprog:=SUBS(cfile,RAT("\",cfile)+1) nomprog:=SUBS(nomprog,1,AT(".PRG",uppe(nomprog))-1) //MSGALERT(nomprog,"NOMPROG") nobj:=nomprog+".obj" bat+=Rharbour+' ...
by Vladimir Zorrilla
Wed Jun 18, 2008 10:37 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Problem with Editor of Source
Replies: 1
Views: 1542

Editor de Codigo con syntaxis coloreada interperte y texto i

... Local rbcc32:="c:\x\bin\bcc32" Local bat:='' If empty(cFile);retu .t.;endif //MSGALERT(cFile) cFile:=ALLTRIM(cfile) nomprog:=SUBS(cfile,RAT("\",cfile)+1) nomprog:=SUBS(nomprog,1,AT(".PRG",uppe(nomprog))-1) //MSGALERT(nomprog,"NOMPROG") nobj:=nomprog+".obj" bat+=Rharbour+' ...
by Vladimir Zorrilla
Wed Jun 18, 2008 10:29 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Editor de Codigo con syntaxis coloreada interperte y texto i
Replies: 1
Views: 2179

TSBROWSE 8 - Para Manuel Mercado

... RETURN(.F.) END END IF (nKey>=32 .AND. nKey<=255) .OR. nKey=VK_BACK IF nKey!=VK_BACK cChav+=CHR(nKey) END cres:="" (*)-> cres:=ALLTRIM(SUBS(employee->first,LEN(ALLTRIM(cChav))-1))+ Space( 1 ) + EMPLOYEE->LAST //SUBS(first,LEN(ALLTRIM(cChav))) (*)-> pega registro anterior a ...
by Sdo
Sat Apr 12, 2008 6:08 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: TSBROWSE 8 - Para Manuel Mercado
Replies: 3
Views: 1225

... maelab->descon to c:\temp\LABOR set index to c:\temp\LABOR // close data cTipo:=(maelab)->descon do while (maelab)->(!eof()) aadd(afile2,subs(maelab)->descon,1,2) (maelab)->(dbskip()) enddo USE (patres+"\maepro") ALIAS maepro INDEX ON maepro->CVENVA to c:\temp\MAEPRO set index ...
by ACC69
Thu Dec 27, 2007 10:41 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: PROBLEMAS DBCOMBO FWH 24
Replies: 6
Views: 1859

... maelab->descon to c:\temp\LABOR set index to c:\temp\LABOR // close data cTipo:=(maelab)->descon do while (maelab)->(!eof()) aadd(afile2,subs(maelab)->descon,1,2) (maelab)->(dbskip()) enddo USE (patres+"\maepro") ALIAS maepro INDEX ON maepro->CVENVA to c:\temp\MAEPRO set index ...
by JOSEMAR
Thu Dec 27, 2007 8:27 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: PROBLEMAS DBCOMBO FWH 24
Replies: 6
Views: 1859
PreviousNext

Return to advanced search

Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group