Jika ingin memunculkan Expired Date suatu barang/item pada template Item Transfer, maka untuk langkahnya adalah sbb :
1. Masuk dari menu Setup | Form Template | klik 2x pada nama template Item Transfer yang dimaksud |
2. Masuk ke tab Detail, dan centang box Print untuk salah satu Reserved nya.
3. Lalu ke Design as FRF | Masuk ke page 2, klik kotak di IBX ketiga lalu tekan F11
4. Klik kotak dengan titik tiga pada bagian SQL, lalu sebelum baris “from WTranDet w” tambahkan baris-baris ini :
2. Masuk ke tab Detail, dan centang box Print untuk salah satu Reserved nya.
3. Lalu ke Design as FRF | Masuk ke page 2, klik kotak di IBX ketiga lalu tekan F11
4. Klik kotak dengan titik tiga pada bagian SQL, lalu sebelum baris “from WTranDet w” tambahkan baris-baris ini :
,(
select list (distinct ‘(‘||EXTRACT(day FROM SERIALNUMBERS.EXPIREDDATE)||’/’|| EXTRACT(month FROM SERIALNUMBERS.EXPIREDDATE)||’/’|| EXTRACT(year FROM SERIALNUMBERS.EXPIREDDATE)||’)’) from SERIALNUMBERS
left outer join SNHISTORY on SNHISTORY.itemhistid=w.itemhistid
where SERIALNUMBERS.snid=SNHISTORY.snid
) EXPDATELIST
select list (distinct ‘(‘||EXTRACT(day FROM SERIALNUMBERS.EXPIREDDATE)||’/’|| EXTRACT(month FROM SERIALNUMBERS.EXPIREDDATE)||’/’|| EXTRACT(year FROM SERIALNUMBERS.EXPIREDDATE)||’)’) from SERIALNUMBERS
left outer join SNHISTORY on SNHISTORY.itemhistid=w.itemhistid
where SERIALNUMBERS.snid=SNHISTORY.snid
) EXPDATELIST
Sehingga keseluruhan SQL-nya menjadi seperti ini :
Select w.*, I.ItemDescription ItemOvDesc,
I.Unit1, I.Unit2, I.Unit3, I.Ratio2, I.Ratio3, I.Notes, I.ItemType, sn.SNLine, sn.ExpDateLine
,(
select list (distinct ‘(‘||EXTRACT(day FROM SERIALNUMBERS.EXPIREDDATE)||’/’|| EXTRACT(month FROM SERIALNUMBERS.EXPIREDDATE)||’/’|| EXTRACT(year FROM SERIALNUMBERS.EXPIREDDATE)||’)’) from SERIALNUMBERS
left outer join SNHISTORY on SNHISTORY.itemhistid=w.itemhistid
where SERIALNUMBERS.snid=SNHISTORY.snid
) EXPDATELIST
from WTranDet w
INNER Join Item I On w.ItemNo=I.ItemNo
Left Outer Join View_SN_ByItemHist( w.ItemHistID, 0) sn on sn.ItemHistID=w.ItemHistID
WHERE w.TransferID=:TransferID
ORDER BY w.Seq
I.Unit1, I.Unit2, I.Unit3, I.Ratio2, I.Ratio3, I.Notes, I.ItemType, sn.SNLine, sn.ExpDateLine
,(
select list (distinct ‘(‘||EXTRACT(day FROM SERIALNUMBERS.EXPIREDDATE)||’/’|| EXTRACT(month FROM SERIALNUMBERS.EXPIREDDATE)||’/’|| EXTRACT(year FROM SERIALNUMBERS.EXPIREDDATE)||’)’) from SERIALNUMBERS
left outer join SNHISTORY on SNHISTORY.itemhistid=w.itemhistid
where SERIALNUMBERS.snid=SNHISTORY.snid
) EXPDATELIST
from WTranDet w
INNER Join Item I On w.ItemNo=I.ItemNo
Left Outer Join View_SN_ByItemHist( w.ItemHistID, 0) sn on sn.ItemHistID=w.ItemHistID
WHERE w.TransferID=:TransferID
ORDER BY w.Seq
5. Setelah itu, masuk ke menu File | Data Dictionary | Buat New Variable pada folder “Invoice Item” dengan nama, misalnya “Expired Date” yang value-nya kita dapatkan dengan memilih tulisan “EXPDATELIST” dari “DialogForm.WTranDet” (Seperti pada gambar berikut).
6. Jika sudah dibuat, klik OK lalu masuk ke Designer
7. Kemudian gunakan variable yang sudah dibuat tadi misal dengan nama “Exp Date” dan munculkan di tempat/kolom yang di inginkan.
7. Kemudian gunakan variable yang sudah dibuat tadi misal dengan nama “Exp Date” dan munculkan di tempat/kolom yang di inginkan.
(Available for V4 & V5)
Tidak ada komentar:
Posting Komentar