Item Wise Daily Report Any Bdy Idea

Discussion in 'Free Source Codes' started by yogeshtailor, Oct 21, 2015.

    
  1. yogeshtailor

    yogeshtailor Member


    I Asking Many person TDL EXPERT But All are avoid this

    What is this

    Plz Admin

    see this code help me

    one thing not possible in Tally please send me mail this id

    yogeshjmc@gmail.com



    [#Menu: Gateway of Tally]

    Item : Item Summary : Display : RemoteSTQuery

    [Report: RemoteSTQuery]

    Form : RemoteSTQuery
    Title : "Itemwise Breakup"
    PrintSet : Report Title : "Itemwise Breakup"
    Title : "Itemwise Breakup to demonstrate Remoting Capability"

    Variable : SVFromDate,SVToDate,SVCurrentCompany
    Set : SVToDate : ##SVCurrentDate
    ColumnReport : SetAutoVariables
    Repeat : SVCurrentCompany, SVFromDate, SVToDate


    ;;Variable : ExplodeFlag
    ;;Variable : TestVariable
    Set : SVFromDate : $$MonthStart:##SVCurrentDate
    Set : SVToDate : $$MonthEnd:##SVCurrentDate

    [Form: RemoteSTQuery]

    Parts : DB Title, RemoteSTQuery
    Buttons : PrintButton
    Local : Line : DB Title : Local : Field : Name Field: Set as : "Itemwise Columnar Breakup"

    Button : Change Period ;;,ExplodeFlag
    ;; Locally altering the default Line DB Title (within the default Part DB Title) to change
    ;; the value set in the Field Name Field to "Itemwise Columnar Breakup" */

    [Part: RemoteSTQuery]

    Lines : RemoteSTQueryT, RemoteSTQuery
    Repeat : RemoteSTQuery : RemoteSItemColl
    Scroll : Vertical
    Common Borders : Yes
    ;; Total : RemoteOpQty, RemoteInQty, RemoteConsQty, RemoteProdQty, RemoteOutwQty, RemoteClosQty
    Total : RemoteOpQty, RemoteConsQty, RemoteProdQty, RemoteOutwQty, RemoteClosQty

    [Line: RemoteSTQueryT]

    Use : RemoteSTQuery
    Local : Field : Default : Type : String
    Local : Field : Default : Align : Center
    Local : Field : Default : Lines : 0
    Local : Field : RemoteItemName : Align : Left
    Local : Field : RemoteItemName : Set as: "Particulars"
    Local : Field : RemoteOpQty : Set as: "Opening Quantity"
    Local : Field : RemoteInQty : Set as: "Receipt"
    Local : Field : RemoteConsQty : Set as: "Total Receipt"
    Local : Field : RemoteProdQty : Set as: "Consumption"
    Local : Field : RemoteOutwQty : Set as: "Total Consumption"
    Local : Field : RemoteClosQty : Set as: "Closing Quantity"
    Border : Thin Top Bottom

    [Line: RemoteSTQuery]

    Fields : RemoteItemName, RemoteOpQty, RemoteInQty, RemoteConsQty, RemoteProdQty, RemoteOutwQty, RemoteClosQty
    Repeat : RemoteClosQty
    Option : AlterOnEnter


    [Field: RemoteItemName] ;; Stock Item Name

    Use : Name Field
    Style : Normal
    Width : 30
    Maximum : 30
    Set As : $Name
    Fixed : Yes

    [Field: RemoteOpQty] ;; Opening Qty

    Use : Qty Primary Field
    Style : Normal
    Format : "No Zero"
    Set as : $ItOpQty
    Border : Thin Left Right
    Scroll : Yes
    Display : Stock Summary

    [Field: RemoteInQty] ;; Receipt ;;Purchase Qty

    Use : Number Field ;;RemoteOpQty
    Set as : $TrPurcQty
    ;; Set as : $BilledQty
    Border : Thin Right
    Set always : Yes
    [Field: RemoteConsQty] ;; Total Receipt ;;Consumption of Stock journal

    Use : RemoteInQty
    Set As : $TrTranOutQty
    Border : Thin Right

    [Field: RemoteProdQty] ;; Consump ;;Production of Stock journal

    Use : Amount Field ;;RemoteInQty
    Set As : $TrSaleQty
    Border : Thin Right

    [Field: RemoteOutwQty] ;; Total Consump

    Use : Amount Field ;;
    Set As : $TrTranInQty
    Border : Thin Right

    [Field: RemoteClosQty] ;; Closing Qty

    Use : RemoteInQty
    Set As : $ItClQty
    ;;Delete : Border
    Style : Normal Bold

    ;; Collection Definition

    [Collection: RemoteVoucher Collection]

    Type : Voucher

    [Collection: RemoteSItemColl]

    Source Collection : RemoteVoucher Collection

    Walk : All Inventory Entries

    By : Name : $StockItemName ;; Grouping done by Stock Item

    ;; All Aggr Compute & Compute methods are avilabe at client side

    ;;Aggr Compute : TrPurcQty : Sum : If @@RemotePurcVr Then $BilledQty Else 0
    ;;Aggr Compute : TrSaleQty : Sum : If @@RemoteSaleVr Then $BilledQty Else 0
    ;;Aggr Compute : TrTranInQty : Sum : If @@RemoteCredVr Then $Amount Else 0

    ;;Aggr Compute : TrPurcQty : Sum : If @@RemoteRcptVr Then $$FromValue:##SVFromDate:$$ToValue:##SVToDate:$BilledQty Else 0
    Aggr Compute : TrSaleQty : Sum : If @@RemoteStockVr Then $Amount Else 0

    Aggr Compute : TrTranOutQty : Sum : If @@RemoteRcptVr Then $BilledQty Else 0
    Aggr Compute : TrTranInQty : Sum : If @@RemoteStockVr Then $Amount Else 0



    Compute : ItClQty : $StkClBalance:StockItem:$StockItemName
    Compute : ItOpQty : $StkOpBalance:StockItem:$StockItemName

    ;;Compute : TrPurcQty : $$FromValue:##SVFromDate:$$ToValue:##SVToDate:$BilledQty:##SVVoucherType:$$IsRcptNote ;;:Group:$$GroupCash
    Compute : TrPurcQty : $$ToValue:##SVFromDate:$BilledQty

    Sort : @@SortAlphaIncr : $Name


    ;; System Formula
    [#Collection: Company Receivables]
    Add:Filter:IsmyFromDt

    [System: Formula]
    ;;RemotePurc Vr : $$IsPurchase:$VoucherTypeName
    ;;RemoteCred Vr : $$IsCreditNote:$VoucherTypeName
    ;;RemoteSale Vr : $$IsSales:$VoucherTypeName

    RemoteRcpt Vr : $$IsRcptNote:$VoucherTypeName
    RemoteStock Vr : $$IsStockJrnl:$VoucherTypeName
    RemoteStock Jrnl Vr : $$IsStockJrnl:$VoucherTypeName

    IsmyFromDt:$billdate=>##SVFromDate
    ;;TrPurcQty : $$FromValue:"01-04-2015":$$ToValue:"02-04-2015":$BilledQty ;;:Group:$$GroupSales

    ;; End-of-File

    [#Object : Voucher]

    SanVchrYearMonth : $$String:mad:@mVchrYear + $$ZeroFill:mad:@mVchrMonthNo:2


    [Report: SetAutoVariables]

    [Form: SetAutoVariables]

    Part: SetAutoVariables

    [Part: SetAutoVariables]

    Line : SetAutoClmFrom,SetAutoClmTo,SetAutoClmCmp

    [Line: SetAutoClmFrom]

    Field : Short Prompt,SetAutoClmFrom
    Local : Field : Short Prompt : Set As : "From :"

    [Field: SetAutoClmFrom]

    Use : Short Date Field
    Modifies : SVFromDate

    [Line: SetAutoClmTo]

    Field : Short Prompt,SetAutoClmTo
    Local : Field : Short Prompt : Set As : "To:"

    [Field: SetAutoClmTo]

    Use : Short Date Field
    Modifies : SVToDate

    [Line: SetAutoClmCmp]

    Field : Short Prompt,SetAutoClmCmp
    Local : Field : Short Prompt : Set As : "Company:"

    [Field: SetAutoClmCmp]

    Use : Name Field
    Modifies : SVCurrentCompany
    Table : Company
     


  2. admin

    admin Administrator Staff Member


    Hi,

    Send your code to info@veenuscybersoft.com and kindly mention the issue you are facing
     


Share This Page