Detail to be update from report

Discussion in 'Requests' started by Rajsrisrimal, Apr 17, 2020.

    
  1. Rajsrisrimal

    Rajsrisrimal Member


    I like to feed transport Name, freight Value, RR no & date details and No of package after billing, but I don't want to go in invoice or edit for feed this data as its too risky. Is it possible that from report it self I can feed the same and it get updated in invoice and i can see updated directly details from report when ever required .


    ; ------TRANSPORTERS REPORT DATE WISE--------------


    [#Menu: Gateway of Tally]
    Add: Option: love:


    [!Menu:love]
    add : Key Item :before:mad:@locQuit: @@locTransp : S : Display :lovesal : $$IsAccountingOn:$$CurrentCompany


    [system : formula]

    locTransp :$$LocaleString:"Transporter Report for Sales"


    [Report :lovesal]
    Use : Dsp template
    Form : myluv TPTForm
    Title: $$LocaleString:"Transporter Details"
    Set: variable : svfromdate, svtodate
    Set : SVFromDate : $$MonthStart:##SVCurrentDate
    Set : SVToDate : $$MonthEnd:##SVCurrentDate


    ;;*******************************************

    [Form :myluv TPTForm]
    Use : Dsp template
    Height : 100% Page
    Width : 100% Page
    Parts : myluvPrttitle,myluvprtTPTDetails
    bottom parts : prtbottom
    Delete:page Break
    add:page Break : DSP ClPageBreak, myDSPOpPageBreak


    [Part : myDSPOpPageBreak]
    parts :,myluvPrttitle
    vertical : yes


    [Part :myluvPrttitle]
    Line : myluvlntitle



    [Line : myluvlntitle]
    fields : Fvchno,Fvchdate,PartyNam,ReTransportnm,FTPT ,Fvchref,FBrokerper,Ewayno
    Right fields : Servicedespatc
    local : field : default : type : string
    local : field : default : style : normal bold
    ;local : field : default : align : centre
    local : field : Fvchno : set as : "Voucher No."
    local : field : Fvchdate : set as : "Date"
    Local: Field: PartyNam : Set as: "Party name"
    Local: Field: ReTransportnm : Set as: "Transporter Name"
    local : field : FTPT : set as : "R R No."
    local : field : FBrokerper : set as : "Destination"
    local : field : Fvchref : set as : "Bilty Date"
    Local: Field: Ewayno : Set as: "EwayBill No."
    Local: Field: Servicedespatc : Set as: "Amount"
    Border : Totals


    [Part :myluvprtTPTDetails]
    Line : myluvTPTbodyln
    repeat :myluvTPTbodyln : salesVchTPTCollct
    scroll : vertical
    Total:Servicedespatc




    [Line : myluvTPTbodyln]
    fields : Fvchno,Fvchdate ,PartyNam,ReTransportnm,FTPT ,Fvchref,FBrokerper,Ewayno
    Right fields : Servicedespatc,
    local : field : Fvchno : set as : $VOUCHERNUMBER
    local : field : Fvchdate : set as : $Date
    Local: Field: PartyNam : Set as: $ledgername
    Local: Field: ReTransportnm : Set as: $BasicShippedBy
    local : field : Fvchref : set as : $BillofLadingDate
    local : field : FTPT : set as : $BillofLadingNo
    Local: Field: Ewayno : Set as: ""
    Local: Field: Ewayno : Set as:$GSTewayBillNumber
    local : field : FBrokerper : set as : $BasicFinalDestination
    Local: Field: Servicedespatc : Set as:$Amount
    Option : AlterOnEnter : $$IsVoucher
    ;


    [Part : prtbottom]
    Line :broktot

    [Line : broktot]
    fields : Fvchno,Fvchdate ,PartyNam,ReTransportnm,FTPT ,Fvchref,FBrokerper,Ewayno
    Right fields : Servicedespatc,
    local : field : Fvchno : set as :"Total"
    local : field : Fvchdate : set as : ""
    Local: Field: PartyNam : Set as: ""
    Local: Field: ReTransportnm : Set as:""
    local : field : Fvchref : set as : ""
    local : field : FTPT : set as : ""
    Local: Field: Ewayno : Set as: ""
    Local: Field: Ewayno : Set as:""
    local : field : FBrokerper : set as : ""
    Local: Field: TotServicedespatc : Set as :$$Total:Servicedespatc
    border : Totals



    [Collection:salesVchTPTCollct]
    Type : Voucher ;;s:Ledger
    Fetch : Amount,ServicetaxPaidby,Despatchmode1,Billtyno,BasicShippedBy,BillofLadingNo,BillofLadingDate,BasicFinalDestination,GSTewayBillNumber,
    Filter: salesvch
    ;

    [System: formula]
    salesvch : $$IsSales:$vouchertypename

    [Field :Fvchref]
    use : short date field
    width :.85 inch
    style : normal

    [Field : Fvchdate]
    use : short date field
    width : .85 inch
    style : normal
    align : left

    [Field :Fvchno]
    Use : Name field
    style : Normal
    width : .85 Inch
    Alter : Voucher
    [Field : FTPT]
    Use : name field
    style : Normal
    Width : 1.2 Inch

    [Field : FBrokerper]
    Use : name field
    style : normal
    width : 1.2 inch
    align : Left




    [Field: PartyNam]
    Use: name field
    Width: 2 inch
    Style: small
    Quick Search: Yes

    [Field: Ewayno]
    Use: short name field
    Width: 2 inch
    Style: small

    [Field: Servicedespatc]
    Use: Number field
    Width: .9 inch
    Style: small
    format : "no zero,decimal:2"

    [Field: ReTransportnm]
    Use: name field
    Width: 2 inch
    Style: small

    [Field: TotServicedespatc ]
    Use: Number field
    Width: 1.5 inch
    Style: small
    format : "no zero,decimal:2"
    [Button:Invoice Btn]
    Key:Alt+I
    Action:Execute:Invoice Rpt
    Title:Find Invoice

    [Report:Invoice Rpt]
    Form:FrmFindVoucher
    Use: salesvch

    [Form:Invoice Frm]
    Part:Invoice Prt
    Add : On : Form Accept : yes :Message Box

    [Part:Invoice Prt]
    Line:Invoice Ln

    [Line:Invoice Ln]
    Field:Medium Prompt, Invoice Fld
    Local:Field:Medium Prompt:Set as:"Invoice No"

    [Field:Invoice Fld]
    Use:Name Field
    Width:50
    Border:Thin Box
     

    Attached Files:




  2. Adding A Button in the FORM and call a function to Alter required fields of the invoice. Is it Possible ?
     


  3. Neeru

    Neeru Active Member


    Dear Sir

    Share your mail Id i just change or add code in your code... it work as you need...
     
    Last edited: May 4, 2020


  4. Rajsrisrimal

    Rajsrisrimal Member


    Thanks for your response my mail id is rajsrisrimal@gmail.com
     


  5. Neeru

    Neeru Active Member


    Pls check your mail Sir
     


  6. uttam100

    uttam100 Member


    Dear sir , can you please share the code .
     


  7. kishan369

    kishan369 New Member



Share This Page