Error in loading file

Discussion in 'Tally Developer' started by kosi, Jan 19, 2022.

    
  1. kosi

    kosi Member


    ;; please help. its given attribute 'On' is not valid for 'report' when loading this tdl file
    [#Report : Ledger]
    On : Load : Yes : Call : SetOldLedName
    Variable : OldLedName
    [System : Variable]
    OldLedName

    [Variable : OldLedName]
    Type : String
    Persist : No

    [Function : Set Old Led Name]
    10 : If : $$InAlterMode
    20 : Set : OldLedName : $Name
    30 : End If
    ;*/
    ;;modifying ledger alteration screen to add lines n fields
    [#Part : LedOtherDetails]
    Background:yellow
    Switch : LEDJKAlter : JK LED Alter : $$InAlterMode
    [!Part : JK LED Alter]
    Add : Line : At End : JK LED Alter,JKLEDOld Name,JKLedWht alt
    ;Repeat:JKLED Alter:Ledger
    ;Scroll:Vertical
    [Line : JKLED Alter]
    Field : Medium Prompt,JK LED Alter,JK LED Alter DateTime;, JK Led Old Name
    Local : Field : Medium Prompt : Setas : "Altered By:"
    Invisible : Yes
    [Field : JK LED Alter]
    Background:white
    Use : Name Field
    Setas : $$CMPUserName
    Storage : JKLEDAlteredBy
    Skip :Yes
    [Field : JK LED Alter DateTime]
    Use : Name Field
    Width : 15
    Set as : ($$String:$$MachineDate:UniversalDate + $$LocaleString:" at " + $$MachineTime)
    Storage : JKAlteredDateTime
    Skip :Yes
    [Line : JKLEDOld Name]
    Field : Medium Prompt,JK LED Old Name
    Local : Field : Medium Prompt : Setas : "Old Name:"
    ;Invisible : yes
    [Field : JK LED Old Name]
    Use : Name Field
    Storage : JKLEDOldName
    ;Set by Condition : $$InCreateMode : $$CMPUserName
    Set As : ##OldLedName;$Name
    Set Always : Yes
    ;Skip :Yes
    Background:Red
    [Line : JKLedWht alt]
    Field : Medium Prompt,JKLedWht alt
    Local : Field : Medium Prompt : Setas : "What Alteration Done:"
    Invisible : NO
    [Field : JKLedWht alt]
    Use : Name Field
    Storage : JKLedWhtalt
    Set As :""
    Control : AltEmptyerrormsg:$$IsEmpty:$$Value ;;AND $$InAltermode
    Set Always : Yes
    [System : Formula]
    AltEmptyerrormsg:$$LocaleString:"What You Altered not specified"
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;create history;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    [#Part :LedOtherDetails]
    Switch : LEDJKEnter : JK LED Enter : Not $$InAlterMode
    [!Part :JK LED Enter]
    Add :Line :At ENd :JK LED Enter
    [Line :JK LED Enter]
    Field :Medium Prompt,JK LED Enter,JK LED Enter DateTime
    Local :Field :Medium Prompt :Setas :"Entered By:"
    ;Invisible :Yes
    [Field :JK LED Enter]
    Use :Name Field
    Setas :$$CMPUserName
    Storage :JKLEDEnteredBy
    Skip :Yes
    [Field :JK LED Enter DateTime]
    Use :Name Field
    width :15
    Set as :($$String:$$MachineDate:UniversalDate + $$LocaleString:" at " + $$MachineTime)
    Storage :JKEnteredDateTime
    Skip :Yes
    ;;; ===================================================================================================
    ;;;Ledger Alteration Report
    ;;; ===================================================================================================
    [#Menu:Gate way of tally]
    Add : Item : After :Voucher creation Alteration Report : Led Creation Alteration- History : Display : Led Alter History
    [Report:Led Alter History]
    Form : Led Alter Report
    [Form : Led Alter Report]
    Part : Alter Title
    Vertical Align : Top
    Height : 100% Screen
    Width : 100% Screen
    Background :"Light Orange"
    [Part: Log formTitle]
    Lines : Alter formTitle
    Space Bottom : 0.5
    Scroll : Vertical
    [Line : Alter formTitle]
    Field : Form Sub Title
    Local : Field : Form Sub Title : Set as : "Ledger Alter Report"
    Local : Field : Form Sub Title : Align : Center
    Local : Field : Form Sub Title : Fullwidth : yes
    Local : Field : Form Sub Title : Color : Blue
    Local : Field : Form Sub Title : Border: Thin Bottom
    Local : Field : Form Sub Title : Style: Normaluser
    [Part : Alter Title]
    Line : Alter Title_A, Alter Title_B
    Break On : $$IsEmpty:$LGname
    Scroll : Vertical
    Common Borders : Yes
    Border : Thin Bottom
    Repeat : Alter Title_B:JKLEDAltered
    [Line : Alter Title_A]
    Field : LGnametit, LedgerNameOldTit, CreatedByUserTit,Usercrtdttmtit, Lgcompnametit, Lgdattit,Ledwhtalttit
    Local : Field : Default : Background : yellow
    Local : Field : Default : color : Maroon;;DarkBlue16Bit
    Local : Field : Default : Align : Left;Centre
    Local : Field : Default : Style: Normal Bold ;;Italic
    Local : Field : Default : Delete :Storage
    Border : column Titles
    [Field : LGnametit]
    Use : Name Field
    Info : "Ledger Name"
    Width : 25
    [Field : LedgerNameOldTit]
    Use : Name Field
    Set As : "Led Name(Old)"
    Width : 25
    [Field : CreatedByUserTit]
    Use : Name Field
    Info : "Created By"
    Width : 25
    [Field : Usercrtdttmtit]
    Use : Name Field
    Info : "Creation Date/Time"
    Width : 20
    [Field : Lgcompnametit]
    Use : Name Field
    Info : "Altered By"
    Width : 25
    [Field : Lgdattit]
    Use : Name Field
    Info : "Last Alteration Date/Time"
    ;Width : 25
    [Field : Ledwhtalttit]
    Use : Name Field
    Info : "What Alteration Done"
    ;Width : 25
    [Line : Alter Title_B]
    Field : LGname, LedgerNameOld, CreatedByUser,Usercrtdttm, Lgcompname, Lgdat, Ledwhtalt
    Option : AlterOnEnter : $$IsLedger
    Local : Field : Default : color : DarkBlue16Bit
    Local : Field : LedgerNameOld : color :If ($Name=$JKledOldName OR $$IsEmpty:$JKledOldName) Then "Red" Else "DarkBlue16Bit"
    Local : Field : Ledwhtalt : color :Maroon
    Local : Field : Default :Style : Small bold
    [Field : LGname]
    Set as : $name
    Use : Name Field
    Width : 25
    Border : Thin Left
    Alter:Ledger
    [Field : Lgcompname]
    Background:white
    Use : Name Field
    Set as : $JKLEDAlteredBy
    Width : 25
    Border : Thin Left
    [Field : CreatedByUser]
    Use : Name Field
    Set As : $JKLEDEnteredBy;CreatedBy
    Width : 25
    Border : Thin Left
    [Field : LedgerNameOld]
    Use : Name Field
    Width : 20
    Border : Thin Left
    Set as : If ($Name=$JKledOldName OR $$IsEmpty:$JKledOldName) Then $$String:"Same as Current Name" Else $JKledOldName
    [Field : Usercrtdttm]
    Use : Name Field
    Set as : $JKEnteredDateTime
    Width : 25
    Border : Thin Left
    [Field : Lgdat]
    Use : Name Field
    Set as : $JKAlteredDateTime
    ;Width : 25
    Border : Thin Left
    [Field : Ledwhtalt]
    Use : Name Field
    Set as : $JKLedWhtalt
    ;Width : 25
    Border : Thin Left Right
    [Collection : JKLEDALTER]
    TYPE : Ledger
    Childof : $Name
    Fetch : JKLEDAlteredBy,CreatedBy,JKAlteredDateTime,JKEnteredDateTime,Name,*.*
    [Collection : JKLEDAltered]
    Type : Ledger
    Fetch : JKLEDAlter,JKLEDAlteredBy,CreatedBy,JKAlteredDateTime,JKEnteredDateTime,Name,*.*;;JKLEDCreatedBy
    Filter : jkledAlter
    [System : Formulae]
    jkledAlter : (Not $$IsEmpty:$JKLEDAlteredby) OR (Not $$IsEmpty:$JKLEDEnteredBy)
    [System : UDF]
    JKLEDAlter : Aggregate : 8600
    JKLEDAlteredBy : String : 8601
    JKAlteredDateTime : String : 8602
    JKLedOldName : String : 8603
    JKLEDEnteredBy : String :8600
    JKEnteredDateTime : String :8650
    JKLedWhtalt : String : 8604
    [#Form : Ledger]
    Background:green
    On : Form Accept : Yes : CALL : JayLedfunc
    [Function : JayLedfunc]
    Variable : LedAltName : String
    Variable : LedAltDate : String
    Variable : LedCreateName : String
    005 : If : $$InAlterMode
    010 : Set Target
    020 : Set:LedAltName:$$CMPUserName
    050 : Set:LedAltDate:($$String:$$MachineDate:UniversalDate + $$LocaleString:" at " + $$MachineTime)
    080 : Insert Collection Object:JKLEDALTER
    090 : Set Target: (Ledger).
    110 : Set Value:JKLEDAlteredBy:##LedAltName
    120 : Set Value:JKAlteredDateTime:$$String:(##LedAltDate)
    160 : Set Target..
    170 : Set Target..
    175 : Accept Object
    180 : EndIf
     


  2. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Which Tally version??
     


  3. kosi

    kosi Member


    1.1
    Please guide me
     


  4. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    might not probably work. Certain features are introduced in newer version and might not work in older versions.
     


  5. kosi

    kosi Member


    Hmmmmm
    But tally 1.1 is able to shows us
    Entered By
    Altered on
    In day book. I went there and they use system formulas instead of function to retrieve users alteration history. Meaning in 1.1 we have to use system formulas to retrieve users alteration history.
    Wish someone can guide me using system formulas.
     


Share This Page