doni_foundation
1st April 2013, 15:02
i've a problem with my printing
this is my report source
declaration:
table tcisli901
table tcisli310
table tcisli305
table tcisli900
table ttccom000
table ttccom100
table ttccom130
table ttcmcs143
table ttccom139
table ttcibd001
extern domain tcamnt nourut
before.cisli305.idoc.1:
before.layout:
nourut = 0
select cisli305.*
from cisli305
where cisli305.tran = {:r.ih.trns.typ}
and cisli305.idoc = {:r.ih.doc.nr}
selectdo
endselect
select cisli901.*
from cisli901
where cisli901.ityp = {:r.ih.trns.typ}
and cisli901.invn = {:r.ih.doc.nr}
selectdo
endselect
select tccom000.*
from tccom000
selectdo
select tccom130.*
from tccom130
where tccom130.cadr = {:tccom000.cadr}
selectdo
select tcmcs143.*
from tcmcs143
where tcmcs143.ccty = {:tccom130.ccty}
and tcmcs143.cste = {:tccom130.cste}
selectdo
endselect
select tccom139.*
from tccom139
where tccom139.ccty = {:tccom130.ccty}
and tccom139.cste = {:tccom130.cste}
and tccom139.city = {:tccom130.ccit}
selectdo
endselect
endselect
endselect
before.cisli305.idoc.2:
before.layout:
select tccom100.*
from tccom100
where tccom100.bpid = {:cisli901.bppjk}
selectdo
select tccom130.*
from tccom130
where tccom130.cadr = {:tccom100.cadr}
selectdo
select tccom139.*
from tccom139
where tccom139.ccty = {:tccom130.ccty}
and tccom139.cste = {:tccom130.cste}
and tccom139.city = {:tccom130.ccit}
selectdo
endselect
endselect
endselect
detail.1:
before.layout:
nourut = nourut + 1
select cisli305.*
from cisli305
where cisli305.tran = {:r.ih.trns.typ}
and cisli305.idoc = {:r.ih.doc.nr}
selectdo
select cisli310.*
from cisli310
where cisli310.tran = {:cisli305.tran}
and cisli310.idoc = {:cisli305.idoc}
selectdo
select tcibd001.*
from tcibd001
where tcibd001.item = {:cisli310.item}
as set with 1 rows
selectdo
endselect
endselect
endselect
after.cisli305.idoc.10:
after.layout:
if lattr.lineno < (spool.pg.length-27) then
layout.again()
endif
after.cisli305.idoc.20:
before.layout:
select cisli901.*
from cisli901
where cisli901.ityp = {:r.ih.trns.typ}
and cisli901.invn = {:r.ih.doc.nr}
selectdo
endselect
footer.3:
before.layout:
select cisli900.*
from cisli900
selectdo
select cisli901.*
from cisli901
where cisli901.ityp = {:r.ih.trns.typ}
and cisli901.invn = {:r.ih.doc.nr}
selectdo
select tccom000.*
from tccom000
as set with 1 rows
selectdo
select tccom130.*
from tccom130
where tccom130.cadr = {:tccom000.cadr}
selectdo
select tccom139.*
from tccom139
where tccom139.ccty = {:tccom130.ccty}
and tccom139.cste = {:tccom130.cste}
and tccom139.city = {:tccom130.ccit}
selectdo
endselect
endselect
endselect
endselect
endselect
i wanna ask how can my print become 2 pages
it supposed to be just 1 page
and the detail came out in 2nd page
i want my detail come out 1st page
please help me to solve this problem
i'm sorry, my english isn't fluently
this is my report source
declaration:
table tcisli901
table tcisli310
table tcisli305
table tcisli900
table ttccom000
table ttccom100
table ttccom130
table ttcmcs143
table ttccom139
table ttcibd001
extern domain tcamnt nourut
before.cisli305.idoc.1:
before.layout:
nourut = 0
select cisli305.*
from cisli305
where cisli305.tran = {:r.ih.trns.typ}
and cisli305.idoc = {:r.ih.doc.nr}
selectdo
endselect
select cisli901.*
from cisli901
where cisli901.ityp = {:r.ih.trns.typ}
and cisli901.invn = {:r.ih.doc.nr}
selectdo
endselect
select tccom000.*
from tccom000
selectdo
select tccom130.*
from tccom130
where tccom130.cadr = {:tccom000.cadr}
selectdo
select tcmcs143.*
from tcmcs143
where tcmcs143.ccty = {:tccom130.ccty}
and tcmcs143.cste = {:tccom130.cste}
selectdo
endselect
select tccom139.*
from tccom139
where tccom139.ccty = {:tccom130.ccty}
and tccom139.cste = {:tccom130.cste}
and tccom139.city = {:tccom130.ccit}
selectdo
endselect
endselect
endselect
before.cisli305.idoc.2:
before.layout:
select tccom100.*
from tccom100
where tccom100.bpid = {:cisli901.bppjk}
selectdo
select tccom130.*
from tccom130
where tccom130.cadr = {:tccom100.cadr}
selectdo
select tccom139.*
from tccom139
where tccom139.ccty = {:tccom130.ccty}
and tccom139.cste = {:tccom130.cste}
and tccom139.city = {:tccom130.ccit}
selectdo
endselect
endselect
endselect
detail.1:
before.layout:
nourut = nourut + 1
select cisli305.*
from cisli305
where cisli305.tran = {:r.ih.trns.typ}
and cisli305.idoc = {:r.ih.doc.nr}
selectdo
select cisli310.*
from cisli310
where cisli310.tran = {:cisli305.tran}
and cisli310.idoc = {:cisli305.idoc}
selectdo
select tcibd001.*
from tcibd001
where tcibd001.item = {:cisli310.item}
as set with 1 rows
selectdo
endselect
endselect
endselect
after.cisli305.idoc.10:
after.layout:
if lattr.lineno < (spool.pg.length-27) then
layout.again()
endif
after.cisli305.idoc.20:
before.layout:
select cisli901.*
from cisli901
where cisli901.ityp = {:r.ih.trns.typ}
and cisli901.invn = {:r.ih.doc.nr}
selectdo
endselect
footer.3:
before.layout:
select cisli900.*
from cisli900
selectdo
select cisli901.*
from cisli901
where cisli901.ityp = {:r.ih.trns.typ}
and cisli901.invn = {:r.ih.doc.nr}
selectdo
select tccom000.*
from tccom000
as set with 1 rows
selectdo
select tccom130.*
from tccom130
where tccom130.cadr = {:tccom000.cadr}
selectdo
select tccom139.*
from tccom139
where tccom139.ccty = {:tccom130.ccty}
and tccom139.cste = {:tccom130.cste}
and tccom139.city = {:tccom130.ccit}
selectdo
endselect
endselect
endselect
endselect
endselect
i wanna ask how can my print become 2 pages
it supposed to be just 1 page
and the detail came out in 2nd page
i want my detail come out 1st page
please help me to solve this problem
i'm sorry, my english isn't fluently