Menampilkan “Inventory Account” di Preview Purchase Invoice

  • Setup | Form Template, double klik rancangan Purchase Invoice yang dimaksud, lalu klik Desain As FRF.
  • Ke Page 2, klik sekali di IBX ke 2 dari kanan, kemudian tekan F11 di keyboard, ditampilan Object Inspector double klik SQL.
  • Edit SQL dari IBX ke-2 dari kanan (qryAPItmDet: TfrIBXQuery) :
  • Sebelum baris “From TEMPLATE_APITMDET(:APInvoiceID) a” tambahkan : “g.ACCOUNTNAME
  • Sesudah baris “From TEMPLATE_APITMDET(:APInvoiceID) a” tambahkan :

Left outer join ITEM i on i.ITEMNO=a.ITEMNO
Left outer join GLACCNT g on g.GLACCOUNT=i.INVENTORYGLACCNT

  • Sehingga semuanya menjadi :

Select a.APINVOICEID, a.SEQ, a.BILLID,
a.INVOICENO PINO,
a.ITEMNO, a.ITEMOVDESC, a.QUANTITY,
a.ITEMDISCPC, a.BRUTOUNITPRICE, a.UNITPRICE,
a.ITEMHISTID, a.ITEMCOST, a.ITEMCOSTBASE,
a.ITEMUNIT, a.UNITRATIO,
a.ITEMTYPE, a.UNIT1, a.UNIT2, a.UNIT3, a.RATIO2, a.RATIO3, a.NOTES,
a.INVENTORYGLACCNT, a.COGSGLACCNT, a.SALESGLACCNT, a.UNBILLEDACCOUNT,
a.TAXCODES, a.TAXABLEAMOUNT1, a.TAXABLEAMOUNT2,
a.ITEMRESERVED1, a.ITEMRESERVED2, a.ITEMRESERVED3, a.ITEMRESERVED4,
a.ITEMRESERVED5, a.ITEMRESERVED6, a.ITEMRESERVED7, a.ITEMRESERVED8,
a.ITEMRESERVED9, a.ITEMRESERVED10,
a.POID, a.POSEQ, a.PONO,
a.DEPTID, a.DEPTNO, a.DEPTNAME,
a.PROJECTID, a.PROJECTNO, a.PROJECTNAME,
a.WAREHOUSEID, a.NAME WPIName, a.ReqNo RequestNo, a.SNLine, a.SNExpDate,
a.QTYCONTROL, g.ACCOUNTNAME
From TEMPLATE_APITMDET(:APInvoiceID) a
Left outer join ITEM i on i.ITEMNO=a.ITEMNO
Left outer join GLACCNT g on g.GLACCOUNT=i.INVENTORYGLACCNT
Where 1=1
Order by A.APInvoiceID, a.SEQ

  • File | Data Dictionary, buat New Variable pada folder “Invoice Item” dengan nama “INVACCNT”yang value-nya kita isi dengan cara memilih tulisan “ACCOUNTNAME” dari “DialogForm.qryAPItmDet”.
  • Munculkan variable [INVACCNT] di memo yang dinginkan.

Notes : Cara diatas bisa digunakan untuk memunculkan Expense Account untuk item Non Inventory Part.

Untuk lebih lanjut bisa menghubungi saya :

Doni Irvan
0812-1967-0101 (WA/SMS)
doni@myabcshop.com

PENAWARAN
By |2017-09-05T18:28:30+00:00September 5th, 2017|Tutorial|0 Comments

About the Author:

Expert di bidang IT. Anak muda yang penuh semangat, optimis dan bermotivasi tinggi. Selalu berkomitmen pada pekerjaan.

Leave A Comment

%d blogger menyukai ini: