Only First Stock Item is Displayed

Discussion in 'Tally Developer' started by AnuB, Apr 8, 2022.

    
  1. AnuB

    AnuB New Member


    Hi Experts,
    Need Help. If Voucher has more than 1 Stock Item, still only first Stock Item is displayed. Here is sample code.

    /*========================== ADD MENU ===============================*/
    [#menu : Gateway of Tally]
    Add : Item : Before : @@locQuit : Blank
    Add : Indent : Before : @@locQuit : "Cygnet"
    Add : Key Item : Before : @@locQuit : Export Sales Register : U : Display: SaleItemWiseReportXL: NOT $$IsEmpty:$$SelectedCmps

    [Report: SaleItemWiseReportXL]
    Delete: Print
    Variable : SVFromDate
    Variable : SVToDate
    SET : SVFROMDATE : $$MONTHSTART:##SVCurrentDate
    SET : SVTODATE : $$MONTHEND:##SVCurrentDate
    Form: Data

    [Form : Data]
    Part : SaleItemWiseReportXL


    [Part : SaleItemWiseReportXL]
    Line : LineExportTitle, LineExport
    Repeat : LineExport : CollItemDetails
    Scroll : Vertical
    Vertical : yes

    [Line: LineExportTitle]
    Field: VoucherNo,VoucherDate,SalesLedger, ItemName
    Local : Field : VoucherNo : Set as : "VoucherNo"
    Local : Field : VoucherDate : Set as : "VoucherDate"
    Local : Field : SalesLedger : Set as : "Sales Ledger"
    Local : Field : ItemName : Set as : "ItemName"

    [Line:LineExport]
    Field: VoucherNo,VoucherDate,SalesLedger, ItemName

    [Field: VoucherNo]
    Use : Name Field
    Set as : $VoucherNumber
    Style : SGNormal
    Border : Thin Right


    [Field: VoucherDate]
    Use : Name Field
    Set as : $Date
    Style : SGNormal
    Border : Thin Right


    [Field: SalesLedger]
    Use : Name Field
    Set as : $SalesLedger
    Style : SGNormal
    Border : Thin Right

    [Field: ItemName]
    Use : Name Field
    Set as : $StockItemName
    Style : SGNormal
    Border : Thin Right

    [Collection: CollItemDetails]
    Type: Vouchers: VoucherType
    Child of: $$VchTypeSales
    Belong To : Yes
    Filter : OnlySal
    Fetch : VoucherNumber,Date,PartyLedgerName,Amount, PartyName
    Fetch : InventoryEntries.*, LedgerEntries.*

    Compute: SalesLedger: $$FilterValue:$LedgerName:LedgerEntries:First:OnlySalesLedgers

    Walk : Inventory Entries
    By : StockItemName : $StockItemName

    [System : Formula]
    OnlySal : $$IsSales:$VoucherTypeName
    OnlySalesLedgers: $$IsLedOfGrp:$LedgerName:$$GroupSales
     
    mahbu likes this.


  2. mahbu

    mahbu Member


    Check this modified code

    [#menu : Gateway of Tally]
    Add : Item : Before : @@locQuit : Blank
    Add : Indent : Before : @@locQuit : "Cygnet"
    Add : Key Item : Before : @@locQuit : Export Sales Register : U : Display: SaleItemWiseReportXL: NOT $$IsEmpty:$$SelectedCmps
    [Report: SaleItemWiseReportXL]
    Delete: Print
    Variable : SVFromDate
    Variable : SVToDate
    SET : SVFROMDATE : $$MONTHSTART:##SVCurrentDate
    SET : SVTODATE : $$MONTHEND:##SVCurrentDate
    Form: Data
    [Form : Data]
    Part : SaleItemWiseReportXL
    [Part : SaleItemWiseReportXL]
    Line : LineExportTitle, LineExport
    Repeat : LineExport : CollItemDetails
    Scroll : Vertical
    Vertical : yes
    [Line: LineExportTitle]
    Field: VoucherNo,VoucherDate,SalesLedger, ItemName
    Local : Field : VoucherNo : Set as : "VoucherNo"
    Local : Field : VoucherDate : Set as : "VoucherDate"
    Local : Field : SalesLedger : Set as : "Sales Ledger"
    Local : Field : ItemName : Set as : "ItemName"
    [Line:LineExport]
    Field: VoucherNo,VoucherDate,SalesLedger, ItemName
    [Field: VoucherNo]
    Use : Name Field
    Set as : $VoucherNumber
    Style : SGNormal
    Border : Thin Right
    [Field: VoucherDate]
    Use : Name Field
    Set as : $Date
    Style : SGNormal
    Border : Thin Right
    [Field: SalesLedger]
    Use : Name Field
    Set as : $SalesLedger
    Style : SGNormal
    Border : Thin Right
    [Field: ItemName]
    Use : Name Field
    Set as : $StockItemName
    Style : SGNormal
    Border : Thin Right
    [Collection: CollItemDetailsColl]
    Type: Vouchers
    Filter : OnlySal
    Compute Var : Compute OnlySal Var : Logical : $$IsSales:$VoucherTypeName
    [Collection: CollItemDetails]
    Source Collection : CollItemDetailsColl
    Fetch : VoucherNumber,Date,PartyLedgerName,Amount, PartyName
    Fetch : AllInventoryEntries.*, AllLedgerEntries.*
    Compute: SalesLedger:$LedgerEntries.InventoryEntries.AccountingAllocations.LedgerName

    Walk : Inventory Entries
    By : StockItemName : $StockItemName
    [System : Formula]
    OnlySal : ##ComputeOnlySalVar;$$IsSales:$VoucherTypeName
    OnlySalesLedgers: $$IsLedOfGrp:$LedgerName:$$GroupSales
     


Share This Page