OK, thank you. Cristian Abarzua F.
>-----Mensaje original----- >De: Fabien Bodard <gambas...@gmail.com> >Reply-to: mailing list for gambas users ><gambas-user@lists.sourceforge.net> >Para: mailing list for gambas users <gambas-user@lists.sourceforge.net> >Asunto: Re: [Gambas-user] Using Open in Gambas 3 >Fecha: Mon, 6 Sep 2010 17:18:51 +0200 >my english is bad ... i want to say benoit have change the syntax in gb2 >2010/9/6 charlesg <char...@pearceshardware.co.uk>: > > > Fabien Bodard-4 wrote: >> >> this is new since gb2 >> > > Not sure about that. The following works even back to 2.13 > > > DIM j AS Integer = 0 > INC Application.busy > hFileOut = OPEN "/home/charles/rba/rba.csv" FOR CREATE > > sql = "select * from stmaster" > res = mdFile.$hConnStock.Exec(sql) > FOR EACH res > IF j > 100 AND j < 120 THEN > sellPriceExVat = (Round(res!st_sellprice1 / 1.175 * 100, 0)) / 100 > IF res!st_datelastsale > CDate("01/01/2000") THEN > dDate = Format(res!st_datelastsale, "dd/mm/yyyy") > ELSE > dDate = "" > ENDIF > sLine = Chr(34) & res!st_code & Chr(34) & "," & Chr(34) & res!st_desc > & Chr(34) & "," & Chr(34) & res!st_barcode & Chr(34) & "," & Chr(34) & "ZZ" > & Chr(34) & "," & "999" & "," & "0" & "," & Chr(34) & "S" & Chr(34) & "," & > Chr(34) & "Y" & Chr(34) & "," & Chr(34) & res!st_unit & Chr(34) & "," & "1" > & "," & Chr(34) & "ALDRIDGE" & Chr(34) & "," & Chr(34) & dDate & Chr(34) & > "," & res!st_minimum & "," & Chr(34) & "" & Chr(34) & "," & "1" & "," & > "0.95" & "," & "0.95" & "," & sellPriceExVat & "," & res!st_sellprice1 > PRINT #hFileOut, sLine > ENDIF > j += 1 > NEXT > #hFileOut.Close > DEC Application.Busy > > > rgds > > -- > View this message in context: > http://old.nabble.com/Using-Open-in-Gambas-3-tp29630809p29632831.html > Sent from the gambas-user mailing list archive at Nabble.com. > > > ------------------------------------------------------------------------------ > This SF.net Dev2Dev email is sponsored by: > > Show off your parallel programming skills. > Enter the Intel(R) Threading Challenge 2010. > http://p.sf.net/sfu/intel-thread-sfd > _______________________________________________ > Gambas-user mailing list > Gambas-user@lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/gambas-user > >------------------------------------------------------------------------------ >This SF.net Dev2Dev email is sponsored by: >Show off your parallel programming skills. >Enter the Intel(R) Threading Challenge 2010. >http://p.sf.net/sfu/intel-thread-sfd >_______________________________________________ >Gambas-user mailing list >Gambas-user@lists.sourceforge.net >https://lists.sourceforge.net/lists/listinfo/gambas-user ------------------------------------------------------------------------------ This SF.net Dev2Dev email is sponsored by: Show off your parallel programming skills. Enter the Intel(R) Threading Challenge 2010. http://p.sf.net/sfu/intel-thread-sfd _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user