Tally Chapter 131 TDL for Debtor Discount History By Rajiv Mishra Computer Class


 Few lines of the code is missing here. Pls watch the full lesson Video.


[System : Formula]

    MStk      : $StockItemName = $$BaseOwner:#VCHStockItem

    SalesFilt : $$IsSales:$VoucherTypeName




[#Field : VCH StockItem]

    Key : mKeyF1

Tooltip : "Press F1 to See Item Discount History"

    

 

[Key : mKeyF1]

    Key : D

    Action : Display : RptViewHistory


[Report : RptViewHistory]

    Form : FrmViewHistory

      

[Form : FrmViewHistory]

Part : PrtViewHistory

Height : 50 % Screen

Background : Yellow


[Part : PrtViewHistory]

Line   : LnViewHistoryTitle, LnViewHistoryHD, LnViewHistoryData

Repeat : LnViewHistoryData : ClnSaleInfo

Scroll : Vertical


[Line : LnViewHistoryTitle]

Field : FldVwStkItem

Fixed : Yes


[Field : FldVwStkItem]

Use        : Long Name Field

Set As     : "Previous Discount Details For : " + #VCHStockItem

Align      : Centre           


[Line : LnViewHistoryHD]

Use : LnViewHistoryData

Local : Field : Default : Type : String

Local : Field : Default : Align : Centre

Local : Field : FldViewHistoryDt: Set As : "Date"

Local : Field : FldViewHistory2 : Set As : "Party Name"

Local : Field : FldViewHistory5 : Set As : "Discount"

Border : Column Titles

Fixed : Yes



[Line : LnViewHistoryData]

Field :   FldViewHistoryDt, FldViewHistory2

Left Field :  FldViewHistory5 

Local : Field : FldViewHistoryDt: Set As : $Date

Local : Field : FldViewHistory2 : Set As : $PartyLedgerName

$Rate:InventoryEntries:1:mStk

Local : Field : FldViewHistory2 : Align : Centre

Local : Field : FldViewHistory5 : Set As : $$FilterValue:$discount:InventoryEntries:1:mStk

Local : Field : FldViewHistory5 : Align : Centre



;;  Empty If : NOT $$IsSalesOrder:$VoucherTypeName

Explode : PrtViewHistoryData : $$FilterCount:InventoryEntries:mStk -1 > 0


[Part : PrtViewHistoryData]

Line : LnViewHistoryData1

Repeat : LnViewHistoryData1 : InventoryEntries


[Line : LnViewHistoryData1]

Field :  FldViewHistoryDt, FldViewHistory2 

Right Field : FldViewHistory5



Local : Field : FldViewHistoryDt: Set As : $$Owner:$Date

Local : Field : FldViewHistory2 : Set As : $$Owner:$PartyLedgerName


Local : Field : FldViewHistory5 : Set As : $Discount


Empty if : NOT @@mStk  OR $$ItemSerial=0



[Field : FldViewHistoryDt]

    Use : Short Date Field    


[Field : FldViewHistory2]

    Use : Name Field




[Field : FldViewHistory5]

    Use : Number Field

    Align : Right

    Format : "Percentage"





;; The code ends here-------





टिप्पणियाँ

इस ब्लॉग से लोकप्रिय पोस्ट

Tally Chapter 153 TDL for Custom List of Stock Item By Rajiv Mishra Computer Class

Tally Chapter 130 TDL for Stamp & Signature By Rajiv Mishra Computer Class

Tally Chapter 105 TDL for Receipt contra Payment BULK Entry by Rajiv Mishra Computer Class