Please help me i have error t-format legder

Discussion in 'Free Source Codes' started by Surendra Rajpurohit, Feb 4, 2020.

         
  1. Surendra Rajpurohit

    Surendra Rajpurohit New Member


    Error
    Internal Error . Contact tally solutions.
    Software Exception c0000005
    (Memory Access Violation)



    ;;;===============================please see code and help=========================

    [Color:mygreen]
    RGB:24,68,50


    ;;;ADDING BUTTON IN DIS-ACNTBOOK-LEDGER
    [#Form: Ledger Vouchers]
    Add:Button:tled
    [Button:tled]
    Title :"T-Ledger"
    Key :Alt+Z
    Action :Display Collection:cmpledcoll


    [#Menu:Gateway Of Tally]
    ;Add:Key Item:Ledger Statement (T-Shape):L:displaycollection:cmpledcoll



    [Collection: CMPLedCOLL]
    Title : "List of Ledger"
    Type : Ledger;: Company
    ;Childof: ##SVCurrentCompany
    Belongs To : Yes
    Variable : GroupName
    Report : Leder Statement Report
    Trigger : Ledger Statement Trigger Rep


    [Report : Ledger Statement Trigger Rep]

    Use : Collection Variable
    Local : Line : Collection Variable : Add : Field : LedgerStatementGroup
    Local : Field: MV Title : Info : "Name of Ledger"

    [Field: LedgerStatementGroup]
    Use : Name Field
    Variable : GroupName
    Modifies : GroupName
    Table : CMPLedCOLL
    Show Table : Always


    [Report : Leder Statement Report]
    Local:Field:DEFAULT:Color:YELLOW
    Variable : SVFromDate, SVToDate
    Set : SVfromDate:$BooksFrom:Company:##SVCurrentCompany
    Set : GroupName : ##GroupName
    Variable : IsMultiPage, InNewPages
    Set : IsMultiPage : yes
    Set : InNewPages : yes
    Set : SVToDate : ##SVCurrentdate
    Form : LStatement Form
    Variables : DBBillExplodeFlag, DBCostExplodeFlag, DBInvExplodeFlag, DBBankExplodeFlag
    Variable : GroupName, ShowForex, LedShowForex, ShowCreatedBy
    Variable : ShowRunBalance
    Variable : BankRecMode, ShowMarkedVouchers, AllowBackDatedRecon
    Variables : ExplodeNarrFlag
    Variables : IsDayBook, DSPWithOpening
    Variable : OnlyInVouchers, OnlyOutVouchers, OnlyDrVouchers, OnlyCrVouchers
    Variable : OnlyAccVouchers, OnlyInvVouchers
    Variable : IsMultiPage, InNewPages, ColumnarDayBook, ExtractMode, ShowQtyExtract
    Variable : Show ContactDetails, IsItemBatchReport, IsNegativeCash
    Variable : DBFilterVar
    ;;Start Fresh page for each balaning method
    Variable : BMInNewPage
    Set : BMInNewPage : No
    ;;Show Ledger's Parent
    Variable : ShowLedParent
    Variable : PrintSortingOnGrp
    Variable : VoucherTypeName
    Variables : LedStarting, LedNameStartingFrom, LedNameStartingTo ;;For alphabetical print range
    ; Set : DBFilterVar : No
    Set : IsLedBkup : No
    Set : IsGrpBkup : No

    Set : SV SortMethod : @@Default
    Set : Is Ledger Report : Yes
    Set : DSPWithOpening : Yes
    Set : DSPShowMonthly : No
    Set : DSPHasMultiLevel : No
    Set : DSPNotScaleable : Yes
    Set : DSPHasColumnTotal : No
    Set : BankRecMode : No
    Set : IsMultiPage : No
    Set : ColumnarDayBook : No
    Set : ExtractMode : No
    Set : ShowCreatedBy : No
    Set : IsItemBatchReport : No
    [Form : LStatement Form]
    Height : 100% Screen
    Width : 100% Screen
    BackGround : MYGREEN;Light yellow
    Space Top : If $$InPrintMode Then 0.5 Else 0 inches
    Button : Change Period,Report Config,Print Button,Export Button,BottomToolBarBtn1, BottomToolBarBtn8, BottomToolBarBtn9, BottomToolBarBtn10, BottomToolBarBtn11,refresh tdl
    BottomButton: InvReports, AcctReports, ReportOperations, FilterButton, ValueButton
    Buttons : PrintButton, ExportButton, UploadButton, MailButton
    Parts : LStatement Tit,LStatementinfoPart
    ;Add : Bottom Part : DBCBDetailsvmv1
    Add : Button : Refresh TDL, ExplodeFlag

    [Part : LStatement Tit]
    Space Bottom : 0.2 inch
    Line : LStatementParty; Tit Line2
    ;Line : LStatement Tit Line,LStatementAdd,LStatementGSTNo,LStatementPeriod,LStatementParty; Tit Line2

    Add:Lines:At End:partyaddL03,partyaddL04


    [Line : LStatement Tit Line]
    Field : LStatement Tit Field

    [Field : LStatement Tit Field]
    Use : Name Field
    Set as : @@CmpMailName;$Name:Company:##SVCurrentCompany
    Align : Center
    Full Width : Yes
    Style : Large Bold
    Color:red
    [Line:LStatementAdd]
    Field:LStatementAddField
    [Field:LStatementAddField]
    Use : Name Field
    Set as : $$FullList:CompanyAddress:$Address
    Align : Center
    Full Width : Yes
    ;Border : Thin Box
    Style:TINY
    [Line:LStatementGSTNo]
    Field:LStatementGSTNoField
    [Field:LStatementGSTNoField]
    Use : Name Field
    Set as : $$LocaleString:"GSTIN No:"+$GSTRegNumber:TaxUnit:mad:@CMPExcisePrimaryGodown+$$LocaleString:" PAN NO.:"+ $IncomeTaxNumber:Company:##SVCurrentCompany
    Align : Center
    Full Width : Yes
    Style:TINY
    [Line:LStatementPeriod]
    Field:LStatementPeriodField
    Space Top:0.5
    Border:thin bottom

    [Field:LStatementPeriodField]
    Use:name field
    Set as:$$LocaleString:"Ledger Statement For the period " + $$String:##SVFromDate + " to " + $$String:##SVToDate
    Align : Center
    Full Width : Yes
    Local:Style:defualt:Height:20
    Color:yellow
    Style:large bold
    [Line:LStatementParty]
    Field:LStatementPartyInfo,LStatementPartyField

    [Field:LStatementPartyInfo]
    Use :Name Field
    SetAs:"Party Name :"
    Width:14
    Style:small
    Background:DEEP COBALT BLUE
    Color:WHITE
    [Field:LStatementPartyField]
    Use :Name Field
    SetAs:##GroupName
    Width:201 mms
    ;Style:tiny
    ;Border: Thin Box
    Color : dark red
    Local:STYLE:DEFAULT:Height:14
    Full Width:Yes
    [Line:partyaddL03]
    Fields:partyaddL21,partyaddL22,partyaddL23
    border : thin top
    [Field:partyaddL21]
    Fields:Simple Prompt, Name Field
    Local:Field:simple prompt : info :$$localestring:"Address:"
    Local : Field : simple prompt : color : WHITE
    Local : Field : simple prompt : width : 14
    Local : Field : simple prompt :Background:DEEP COBALT BLUE
    Local : Field :name Field : Set as : $STPartyFullAdd:Ledger:##GroupName
    Local : Field :name Field : width : 93.5
    Local : Field :name Field :Skip:yes
    Local : Field :name Field : line : 0
    Local : Field :name Field : style :SMALL
    Color : dark red
    Local : Field :name Field : Background :RED
    Background:RED

    ;Background:LIGHT BLUE
    [Field:partyaddL22]
    Fields:Simple Prompt, Name Field
    Local:Field:simple prompt : info :$$localestring:"State:"
    Local : Field : simple prompt : color : WHITE
    Local : Field : simple prompt :Background:DEEP COBALT BLUE
    Local : Field : simple prompt : width : 8
    Local : Field : name Field : Set as : $LedStateName:Ledger:##GroupName
    Local : Field :name Field :Skip:Yes
    Local : Field :name Field : Background :RED

    Background:RED

    Color:dark red
    ;Background:LIGHT BLUE
    Local : Field :name Field : style : normal
    Local : Field :name Field : width : 14
    [Field:partyaddL23]
    Fields:Simple Prompt, Name Field
    Local:Field:simple prompt : info :$$localestring:"Pin Code:"
    Local : Field : simple prompt : color : WHITE
    Local : Field : simple prompt :Background:DEEP COBALT BLUE
    Local : Field : simple prompt : width : 8
    Local : Field : name Field :Set as : $pincode:Ledger:##GroupName
    Local : Field :name Field :Skip:Yes
    Color:dark red
    Local : Field :name Field : Background :RED

    Background:RED
    Local : Field :name Field : style : normal
    Local : Field :name Field : width : 30




    [Line:partyaddL04]
    Fields:partyaddL35,partyaddL38,partyaddL39
    border : thin top

    [Field:partyaddL35]
    Fields:Simple Prompt, Name Field
    Local:Field:simple prompt : info :$$localestring:"GSTIN No.:"
    Local : Field : simple prompt : color : WHITE
    Local : Field : simple prompt :Background:DEEP COBALT BLUE
    Local : Field : simple prompt : width : 14
    Local : Field : name Field :Set as : $PARTYGSTIN:Ledger:##GroupName
    Local : Field : name Field :Skip:Yes
    Local : Field :name Field : width : 93.5
    Local : Field :name Field : style : normal bold
    Color : blue
    border : thin bottom


    [Field:partyaddL38]
    Fields:Simple Prompt, Name Field
    Local:Field:simple prompt : info :$$localestring:"Mobile:"
    Local : Field : simple prompt : color : WHITE
    Local : Field : simple prompt :Background:DEEP COBALT BLUE
    Local : Field : simple prompt : width : 8
    Local : Field : name Field :Set as : $LedgerMobile:Ledger:##GroupName
    Local : Field :name Field :Skip:Yes
    Local : Field :name Field : style : normal
    Color:BLUE
    border : thin bottom
    [Field:partyaddL39]
    Fields:Simple Prompt, Name Field
    Local:Field:simple prompt : info :$$localestring:"E-Mail:"
    Local : Field : simple prompt : color : WHITE
    Local : Field : simple prompt :Background:DEEP COBALT BLUE
    Local : Field : simple prompt : width : 8
    Local : Field : name Field :Set as : $Email:Ledger:##GroupName
    Local : Field :name Field :Skip:Yes
    Color :BLUE
    border : thin bottom
    Local : Field :name Field : style : normal
    Local : Field :name Field : Width:21.2

    [Part:LStatementinfoPart]
    Left Part:LStatementinfoPartLeft
    Right Part:LStatementinfoPartRight

    [Part:LStatementinfoPartLeft]
    Line:LedTitleInfoLeft,LedopebalfieldLeft,LedTitleFieldLeft
    Repeat:LedTitleFieldLeft:VLedcollectionLeft
    Bottom Line:LedClbalfieldLeft,LedClbalfieldLeft2
    Scroll:Vertical
    Float:no
    Common Border:Yes
    Total:LVCHDEBITAMT

    [Part:LStatementinfoPartRight]
    Line:LedTitleInfoRight,LedopebalfieldRight,LedTitleFieldRight
    Repeat:LedTitleFieldRight:VLedcollectionRight
    Bottom Line:LedClbalfieldRight,LedClbalfieldRight1
    Scroll:Vertical
    Float:no
    Common Border:Yes
    Total:LVCHCREDITAMT


    [Line:LedopebalfieldLeft]
    Right Fields:LedopebalLT, LedopebalL
    Border: Thin BOttom

    [Field:LedopebalLT]
    info :$$localestring:"Opening Balance:"
    color : WHITE
    width : 12
    Inactive: If $$IsEmpty:#LedopebalL then Yes Else No
    Border : Thin Top
    Background: DEEP COBALT BLUE

    [Field:LedopebalL]
    Use : Amount Field
    Set as : If $$IsDr:$Openingbalance:Ledger:##GroupName then $Openingbalance:Ledger:##GroupName else ""
    Skip : Yes
    style : normal
    Color : BLUE
    Format : "Symbol,DrCr"
    Width : 16

    [Line:LedClbalfieldLeft]
    Right Fields:LedclbalLT, LedClbalL
    Border: Totals
    [Line:LedClbalfieldLeft2]
    right Field:a1,a2
    [Field:a1]
    Use:LedClbalLT
    [Field:a2]
    Use:amount field
    Set as:#ledopeball+#LedClbalL
    Skip : Yes
    style : normal
    Color : BLUE
    Format : "Symbol,DrCr"
    Width : 16
    Background:RED

    ;Local:Field:LedClbalL:Set as:#ledopeball+#LedClbalL
    [Field:LedClbalLT]
    info :$$localestring:"Clsoing Balance:"
    color : WHITE
    width : 12
    ;Inactive: If $$IsEmpty:#LedClbalL then Yes Else No
    Border : Thin Top
    Background: DEEP COBALT BLUE

    [Field:LedClbalL]
    Use : Amount Field
    ;Set as : If $$IsDr:$Closingbalance:Ledger:##GroupName then $Closingbalance:Ledger:##GroupName else ""
    Skip : Yes
    style : normal
    Color : YELLOW
    Format : "Symbol,DrCr"
    Width : 16
    Background:RED
    Set as:$$Total:LVCHDEBITAMT
    [Line:LedTitleInfoLeft]
    Field:LVchDDate,LVchDParticulars,LVchDNum,LVchDebitAmt
    Local:Field:LVchDDate:Info:"Date"
    Local:Field:LVchDParticulars:Info:"Particulars"
    Local:Field:LVchDNum:Info:"Vch.Type"
    Local:Field:LVchDebitAmt:Info:"Debit Amount"
    Border:THIN TOP BOTTOM
    Local:Field:default:Background:DEEP COBALT BLUE
    Local:Field:default:color:white
    Local:Style:Default:Height:10

    [Line:LedopebalfieldRight]
    Right Fields:LedopebalRT, LedopebalR
    Border: Thin BOttom

    [Field:LedopebalRT ]
    info : $$localestring:"Opening Balance:"
    color : WHITE
    width : 12
    Inactive: If $$IsEmpty:#LedopebalR then Yes Else No
    Border : Thin Top
    Background: DEEP COBALT BLUE

    [Field:LedopebalR]
    Use : Amount Field
    Set as : If $$IsCr:$Openingbalance:Ledger:##GroupName then $Openingbalance:Ledger:##GroupName else ""
    Skip : Yes
    style : normal
    Color : BLUE
    Format : "Symbol,DrCr"
    Width : 16

    [Line:LedClbalfieldRight]
    Right Fields:LedclbalRT, LedClbalR
    Border: Totals
    [Line:LedClbalfieldRight1]
    Use:LedClbalfieldRight
    Local:Field:default:Delete:Set as
    Local:Field:default:Delete:Info
    Local:Field:default:Delete:background

    [Field:LedClbalRT]
    info :$$localestring:"Clsoing Balance:"
    color : WHITE
    width : 12
    ;Inactive: If $$IsEmpty:#LedClbalR then Yes Else No
    Border : Thin Top
    Background: DEEP COBALT BLUE

    [Field:LedClbalR]
    Use : Amount Field
    ;Set as : If $$IsCr:$Closingbalance:Ledger:##GroupName then $Closingbalance:Ledger:##GroupName else ""
    Skip : Yes
    style : normal
    Color : BLUE
    Format : "Symbol,DrCr"
    Width : 16
    Background:RED
    Set as:$$Total:LVchCreditAmt
    [Line:LedTitleFieldLeft]
    Field:LVchDDate,LVchDParticulars,LVchDNum,LVchDebitAmt,DSPVCHMASTERIDNO
    Option : AlterVchOnEnter : Yes
    ;Explode : LedTitleFieldLeft : ##ExplodeFlag or $$KeyExplode
    [field:LVchDDate]
    Use:uni date field
    Set as : $Date
    Format : “full Date”
    Width :12
    Style : tiny
    Border : Thin bottom right

    [field:LVchDParticulars]
    Use : Name Field
    Set as:$$LocaleString:"To Bill No." + $VoucherNumber
    Width : 44
    Style : tiny
    Border : Thin bottom right
    color:geranium
    [field:LVchDNum]
    Use : Name Field
    Set as : $VoucherTypeName
    Width : 12
    Style : tiny
    Border : Thin bottom right

    [field:LVchDebitAmt]
    Use : Amount Field
    Set as : if not $$IsDr:$Amount then 0 else $Amount
    Width : 15
    color : blue
    Border : Thin bottom right
    Space Right:1
    Style:tiny
    ;Format:"DRCR"

    [Line:LedTitleInfoRight]
    Field:LVchCDate,LVchCParticulars,LVchCNum,LVchCreditAmt
    Local:Field:LVchcDate:Info:"Date"
    Local:Field:LVchcParticulars:Info:"Particulars"
    Local:Field:LVchcNum:Info:"Ch.No."
    Local:Field:LVchCreditAmt:Info:"Credit Amount"
    Border:THIN TOP BOTTOM
    Local:Field:default:Background:DEEP COBALT BLUE
    Local:Field:default:color:white
    Local:Style:Default:Height:10

    [Line:LedTitleFieldRight]
    Field:LVchCDate,LVchCParticulars,LVchCNum,LVchCreditAmt,DSPVCHMASTERIDNO
    Option : AlterVchOnEnter : Yes

    [field:LVchCDate]
    Use:uni date field
    Set as : $Date
    Format : "DD/MMM/YYYY";“Short Date”
    Width : 12
    Style : tiny
    Border : Thin bottom right
    [field:LVchCParticulars]
    Use : Name Field

    Set as:$$localestring:"By " + $AlllEDGERENTRIES[2].LedgerName

    Width : 44
    Style : tiny
    Border : Thin bottom right
    color:geranium
    [field:LVchCNum]
    Use : Name Field

    Set as : $AllLedgerEntries[-1].BankAllocations.InstrumentNumber
    Width : 12
    Style : tiny
    Border : Thin bottom right
    [field:LVchCreditAmt]
    Use : Amount Field
    ;Set as:$amount
    Set as : if $$IsDr:$Amount then 0 else $Amount
    Width : 15
    Style : tiny
    color : Red
    Border : Thin bottom right
    Space Right:1
    ;Format:"DRCR"
    [Collection : VLedcollectionLeft]
    Type : Vouchers: Ledger
    Child of :$$BaseOwner:#GroupName
    Fetch : VoucherTypeName,Date,VoucherNumber,Amount, Narration
    Sort : @@InCreasing: -$Date
    Filter:FilterDspVchDrAmt
    [Collection : VLedcollectionRight]
    Type : Vouchers: Ledger
    Child of :$$BaseOwner:#GroupName
    Fetch : VoucherTypeName,Date,VoucherNumber,Amount, Narration
    Sort : @@InCreasing: -$Date
    Filter:FilterDspVchCrAmt

    [System:formula]
    FilterDspVchDrAmt:$$IsDr:$Amount
    FilterDspVchCrAmt:not $$IsDr:$Amount
    ;[#Menu :Gate way of Tally]
    ; Add :Button :Refresh TDL
    ;
    ;[Button :Refresh TDL]
    ; Title :"Refresh TDL"
    ; Key :Alt+X
    ; Action :Refresh TDL
    ;
    ;[System :Form keys]
    ; Key :Refresh TDL
    ;
    ;[System :Menu Keys]
    ; Key :Refresh TDL
    ;
    ;[#Form :Default]
    ; Key :Refresh TDL
    ;
    ;[#Menu :Default]
    ; Key :Refresh TDL

    Error
    Internal Error . Contact tally solutions.
    Software Exception c0000005
    (Memory Access Violation)
    [​IMG]
     
    Last edited: Feb 11, 2020


  2. Nitin Tandel

    Nitin Tandel New Member



Share This Page