Yes I do,

I attach the code which from a query creates a new table, whidh is then used to create a reort, and print it.
The names I gave to the different objects are more or less in french.

If you have problems to understand, ask me to comment , on the base of the line numbers.


Je la 13/09/2010 22:36-------- Origina mesag^o-------- moebius skribis (esperanto estas la unua internacia lingvo):

Bonjour,

I wonder how to generate a table from a query ; to be perhaps more
clear, I'm looking for a way to transform the result of a query in a new
table.

If someone know....

cordialement,

------------------------------------------------------------------------------
Start uncovering the many advantages of virtual appliances
and start using them to simplify application deployment and
accelerate your shift to cloud computing
http://p.sf.net/sfu/novell-sfdev2dev
_______________________________________________
Hk-classes-discuss mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/hk-classes-discuss


db=ds.database()
db.delete_table("enveloppes",0)
table = db.new_table()
table.set_name("enveloppes")
table.setmode_createtable()
col=table.new_column()
col.set_columntype(hk_column.auto_inccolumn)
col.set_name("cleunik")
col=table.new_column()
col.set_columntype(hk_column.textcolumn)
col.set_size(80)
col.set_name("exp")
col=table.new_column()
col.set_columntype(hk_column.textcolumn)
col.set_size(50)
col.set_name("sus")
col=table.new_column()
col.set_columntype(hk_column.textcolumn)
col.set_size(50)
col.set_name("adr1")
col=table.new_column()
col.set_columntype(hk_column.textcolumn)
col.set_size(50)
col.set_name("adr2")
col=table.new_column()
col.set_columntype(hk_column.textcolumn)
col.set_size(50)
col.set_name("cc")
col=table.new_column()
col.set_columntype(hk_column.textcolumn)
col.set_size(50)
col.set_name("pa")
table.create_table_now()

ds.goto_first()
sus=ds.column_by_name("civilite").asstring()+" 
"+ds.column_by_name("prenom").asstring()+" "+ds.column_by_name("nom").asstring()
adr1=ds.column_by_name("adresse1").asstring()
adr2=ds.column_by_name("adresse2").asstring()
#hk_this.show_warningmessage(str(pexp)+"/"+ds.column_by_name("pacleunik").asstring())
if pexp==ds.column_by_name("pacleunik").asinteger():
        cc=ds.column_by_name("code").asstring()+" 
"+ds.column_by_name("commune").asstring()
        pa=""
else:
        cc=ds.column_by_name("codepays").asstring()+" 
"+ds.column_by_name("code").asstring()+" 
"+ds.column_by_name("commune").asstring()
        pa=ds.column_by_name("pays").asstring()
denv=db.load_datasource("enveloppes")
denv.enable()
denv.setmode_insertrow()
denv.column_by_name("sus").set_asstring(sus)
denv.column_by_name("adr1").set_asstring(adr1)
denv.column_by_name("adr2").set_asstring(adr2)
denv.column_by_name("exp").set_asstring(cexp)
denv.column_by_name("cc").set_asstring(cc)
denv.column_by_name("pa").set_asstring(pa)
denv.store_changed_data()
avantdernier=""
dernierstocke=""
while ds.goto_next():
        if denv.max_rows()==0: 
                hk_this.show_warningmessage("nb adresses 
stock="+str(denv.max_rows())+"apres "+sus+"// dernier 
stocke="+dernierstocke+"//avantdernier="+avantdernier)
                break
        sus=ds.column_by_name("civilite").asstring()+" 
"+ds.column_by_name("prenom").asstring()+" "+ds.column_by_name("nom").asstring()
        adr1=ds.column_by_name("adresse1").asstring()
        adr2=ds.column_by_name("adresse2").asstring()
        if pexp==ds.column_by_name("pacleunik").asinteger():
                cc=ds.column_by_name("code").asstring()+" 
"+ds.column_by_name("commune").asstring()
                pa=""
        else:
                cc=ds.column_by_name("codepays").asstring()+" 
"+ds.column_by_name("code").asstring()+" 
"+ds.column_by_name("commune").asstring()
                pa=ds.column_by_name("pays").asstring()
        #denv=db.load_datasource("enveloppes")
        denv.enable()
        denv.setmode_insertrow()
        denv.column_by_name("sus").set_asstring(sus)
        denv.column_by_name("adr1").set_asstring(adr1)
        denv.column_by_name("adr2").set_asstring(adr2)
        denv.column_by_name("exp").set_asstring(cexp)
        denv.column_by_name("cc").set_asstring(cc)
        denv.column_by_name("pa").set_asstring(pa)
        denv.store_changed_data()
        avantdernier=dernierstocke
        dernierstocke=sus+" au rang "+str(denv.max_rows())
        
#hk_this.show_warningmessage("appel report nb lignes dans 
enveloppes="+str(denv.max_rows()))
myreport=hk_this.datasource().database().new_reportvisible()
myreport.load_report("enveloppe")
myreport.set_mode(myreport.viewmode)
------------------------------------------------------------------------------
Start uncovering the many advantages of virtual appliances
and start using them to simplify application deployment and
accelerate your shift to cloud computing.
http://p.sf.net/sfu/novell-sfdev2dev
_______________________________________________
Hk-classes-discuss mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/hk-classes-discuss

Reply via email to