Arsip: Mohon bantuanya para master

more 12 years ago
drodriego
Hai para master firebird..
saya mau minta tolong ini,gini saya mau bikin stored procedure menampilkan pembelian barang. Dan dalam sp itu dipergunakan untuk report. intinya,per 10 item dari pembelian barang si report akan otomatis create hal baru dan batasnya juga 10 item begitu seterusnya..
Ini sp yang saya buat :[code:1:3ab52902d1]create or alter procedure RPT_RECEIPT_BD (
PIDBILLING varchar(50))
returns (
CIDBILLING varchar(50),
CONCATENATION varchar(50),
NQTY double precision,
NPRICE double precision,
NTAX double precision,
CCODE varchar(50),
NDISCOUNT double precision,
NSUBTOTAL double precision,
NSUBTOTALTAX double precision,
CUOM varchar(50))
as
declare variable COUNTER integer;
declare variable SISA integer;
begin
counter = 0;
for
select bd.cidbilling,
P.cdescription ||
coalesce((select first 1 ' ' || ashd.casmname from tbposbillingdetail bdt2
inner join tbimassemblyhd ashd on ashd.cidasm = bdt2.cidpackage
where
bdt2.cidbillingdtreff = bd.cidbillingdt),''),
BD.NQTY,
BD.nPrice,
BD.nPriceTax,
BD.ccode,
BD.ndiscount,
bd.nsubtotal,
(BD.nSubTotal + BD.nTax - BD.ndiscount) as nSubTotalTax,
P.cIDUnitOfMeasure as cUom
from tbposbillingdetail BD
inner join tbposproduct P on P.cidproduct = BD.cidproduct
and P.cidoutlet = BD.cidoutlet
where BD.cidbilling = :pIDBilling
and coalesce(BD.cidpackage,'') = ''
into
:cidbilling,
:concatenation,
:nqty,
:nprice,
:ntax,
:ccode,
:ndiscount,
:nsubtotal,
:nsubtotaltax,
:cuom
do
begin
counter = counter+1;
suspend;
end
if (counter > 10) then exit;
sisa = 10 - ( mod(counter,10));
while (sisa > 0) do
begin
select null, ' ', null, null, null, null, null, null, null, null
from rdb$database into
:cidbilling,
:concatenation,
:nqty,
:nprice,
:ntax,
:ccode,
:ndiscount,
:nsubtotal,
:nsubtotaltax,
:cuom;
suspend;
sisa = sisa - 1;
end
end[/code:1:3ab52902d1]

more 12 years ago
drodriego
Ini gan,tampilan reportnya.
https://mail-attachment.googleusercontent.com/attachment/?ui=2&ik=cc5456ce61&view=att&th=1372bac26fe7979e&attid=0.1&disp=inline&realattid=f_h1yq8f640&safe=1&zw&saduie=AG9B_P-5BRyQN9XJRF3uhGS47xpx&sadet=1336467592896&sads=PeQNPLnVHopE_CPYy62IBaqcqt4&sadssc=1
nah disitu itu kan ada lebih dari 10 item,yang saya maksud per halaman itu dibikin 10 item dan begitu seterusnya.

more 12 years ago
denmasdanang
@drodriego: Ini gan,tampilan reportnya. https://mail-attachment.googleusercontent.com/attachment/?ui=2&ik=cc5456ce61&view=att&th=1372bac26fe7979e&attid=0.1&disp=inline&realattid=f_h1yq8f640&safe=1&zw&saduie=AG9B_P-5BRyQN9XJRF3uhGS47xpx&sadet=1336467592896&sads=PeQNPLnVHopE_CPYy62IBaqcqt4&sadssc=1 nah disitu itu kan ada lebih dari 10 item,yang saya maksud per halaman itu dibikin 10 item dan begitu seterusnya.tampilan ga bisa dibuka mas

more 12 years ago
denmasdanang
return stored procedure tambahkan satu field lagi mas
misal counter int;
returns ( CIDBILLING varchar(50), CONCATENATION varchar(50), NQTY double precision, NPRICE double precision, NTAX double precision, CCODE varchar(50), NDISCOUNT double precision, NSUBTOTAL double precision, NSUBTOTALTAX double precision, CUOM varchar(50))counter akan diisi angka 1 sebanyak 10 kali 2 sebanyak 10 kali begitu seterusnya ( saya lihat di stored procedure masnya tinggal modif dikit lagi ) pada report buat group berdasarkan counter, dan cari option new page = true dengan cara ini group akan menampilkan sebanyak 10 item saja setiap halamannya thx

more 12 years ago
drodriego
sory mas,kalau counter saya bikin variable apa bedanya ya?
bukannya query saya uda ngitung pake counter di variable?
tapi sarannya mas,saya coba dlu deh
thx

more 12 years ago
denmasdanang
@drodriego: sory mas,kalau counter saya bikin variable apa bedanya ya? bukannya query saya uda ngitung pake counter di variable? tapi sarannya mas,saya coba dlu deh thxpada report tentu akan membaca keseluruhan data yang direturn dari stored procedure, meski di SP counter ada untuk per 10 item semoga berhasil thx

more 12 years ago
drodriego
mas setelah saya coba,spnya saya benerin dan di reportnya sudah saya group sesuai dengan counternya dan start new page tetapi hasilnya masih sama kayak tampilan pertama.
apa sebaiknya ndak bikin sp untuk menghitung sendiri lagi ya mas?
tapi saya gak tau musti mulai darimana,tolong bantuin mas.. :cry:
more ...
- Pages:
- 1
- 2
reply |
Report Obsolete
AI Forward

🚀 We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now:
https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 4 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 5 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 12 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 12 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 12 years ago
Random Topic
- list index out of bound
by rizu in Tip n Trik Pemrograman more 16 years ago - user permision dan hak akses table di access
by dinox in MsSQL more 19 years ago - Video Capture
by greatjon2002 in Multimedia & Graphic Enhancement more 18 years ago - kritik soal artikel nih
by agusmade in Kritik & Saran more 19 years ago - Surga dunia neraka akhirat
by DelphiExpert in OOT more 15 years ago - Hitung bandwidth......
by EkoIndri in Hal umum tentang Pascal Indonesia more 18 years ago - Nampilkan Data pa TDBgrid dengan tampilan select row
by Melon_Cry in MySQL more 18 years ago - Hint: Prosedur Sederhana Buat Simpen
by cyber_hecker in MsSQL more 19 years ago - Tanya Tentang Thread, mengapa bisa hang
by danieljun in Tip n Trik Pemrograman more 17 years ago - Import ke MSSQL dari database lain
by xmbohx in MsSQL more 17 years ago