How To Compute Stock Opening And Closing

Discussion in 'Free Source Codes' started by Jayashri, Oct 13, 2021.

    
  1. Jayashri

    Jayashri Member


    Hi
    Any one guide me or crt d code..
    how to get stock closing and stock opening Value ,,



    [Collection : MyCompanySalesColl]

    Type:Vouchers:VoucherType
    Child Of: $$VchTypeSales
    Walk : All Inventory Entries
    Compute : MycompanyInventryTotal:$$CollAmtTotal:InventoryEntries:$Amount
    Fetch : Amount, AllLedgerEntries.Amount,Date,AllLedgerEntries.Date,inventoryentries:$billedqty

    [Collection : MyCompanyPurchaseColl]

    Type:Vouchers:VoucherType
    Child Of: $$VchTypePurchase
    Walk : All Inventory Entries
    Compute : MycompanyInventryTotalPur:$$CollAmtTotal:InventoryEntries:$Amount
    Fetch : Amount, AllLedgerEntries.Amount,Date,AllLedgerEntries.Date,inventoryentries:$billedqty

    [Collection : MyCompanyExpIndColl]

    Type:Vouchers
    ;Child Of: $$VchTypePurchase
    Walk : All Inventory Entries
    Compute : MycompanyInventryTotalExpInd:$$FilterAmtTotal:LedgerEntries:discount:$Amount
    Fetch : Amount, AllLedgerEntries.Amount,Date,AllLedgerEntries.Date,inventoryentries:$billedqty


    [Collection : MyCompanyStockColl]

    Type : Stock Item
    ;Child Of: $$VchTypePurchase
    ;Walk : All Inventory Entries
    ;Compute : MycompanyInventryTotalExpInd:$$FilterAmtTotal:LedgerEntries:discount:$Amount
    Fetch : ClosingBalance;",";Amount, AllLedgerEntries.Amount,Date,AllLedgerEntries.Date,inventoryentries:$billedqty

    [#Part: PLHorzParts]

    Vertical : No
    Parts : PL Expenses, PL Income
    ;Add:Top Part:pL New
    Sync : Yes
    CommonBorder: Yes
    Local : Field : BSPercent : Set as : if ($$ExplodeLevel > 0) then 0 else @VertPLVal
    Local : Field : BSPercentTotal: Set as : 0

    [#Part: PLGPExpenses]

    Parts : PLDirExpenses, PLInDirExpenses
    Scroll : Vertical
    Add:Top Part:pL New

    [Part:pL New]
    Line:pl New Sales,Pl New Purchase,Pl New Stock Opeing ,Pl New Stock Closing
    Height:4

    [Line:pL New Sales]
    Field:pl New Sales T,PL New Sales
    Local:Field:Default:Color:Blue
    [Line:pL New Purchase]
    Field:pl New Purchase T,PL New Purchase
    Local:Field:Default:Color:Blue
    [Field:pL New Sales T]
    Use:Name Field
    Set as:"Total Sales"
    Full Width:Yes
    [Field:pL New Sales]
    Use:Amount Field
    Set as:$$CollAmtTotal:MyCompanySalesColl:$MycompanyInventryTotal

    [Field:pL New Purchase T]
    Use:Name Field
    Set as:"Total Purchase"
    Full Width:Yes
    [Field:pL New Purchase]
    Use:Amount Field
    Set as:$$CollAmtTotal:MyCompanyPurchaseColl:$MycompanyInventryTotalPur


    [Line:pl New Stock Opeing]
    Field:pl New Stock Opeing T,Pl New Stock Opeing
    Local:Field:Default:Color:Blue
    [Field:pl New Stock Opeing T]
    Use:Name Field
    Set as:"Total Stock Opeing"
    Full Width:Yes
    [Field:pl New Stock Opeing]
    Use:Amount Field
    Set as:""

    [Line:pl New Stock Closing]
    Field:pl New Stock Closing T,Pl New Stock Closing
    Local:Field:Default:Color:Blue
    [Field:pl New Stock Closing T]
    Use:Name Field
    Set as:"Total Stock Closing"
    Full Width:Yes
    [Field:pl New Stock Closing]
    Use:Amount Field
    Set as:""
     

    Attached Files:



Share This Page