TALLY.ERP9 Auto Backup for Server Users

Discussion in 'Free Source Codes' started by rekakR, Aug 9, 2016.

    
  1. rekakR

    rekakR New Member


    [Function: TSPL Smp Start Backup Timer]

    00 : START TIMER : TSPL Smp Backup Timer : 59

    [Function: TSPL Smp End Backup Timer]

    00 : STOP TIMER : TSPL Smp Backup Timer

    [System: Event]
    TSPL Start BackupTimer: System Start : Yes : CALL : TSPL Smp Start Backup Timer

    TSPL Smp Backup Timer : TIMER : Yes : CALL : BackUpCMP1
    TSPL Smp Backup Timer2 : TIMER : Yes : CALL : BackUpCMP2


    ;;=======================================================================================================
    ;;======================= Activation & Configuration====================================================
    ;;========================================================================================================

    [System: Formula]

    DestPath : @@BackUpPath + @@DateForm + "\" + @@TimeForm
    DestPath2 : @@BackUpPath2 + @@DateForm + "\" + @@TimeForm
    CoNumber : $$String:($CompanyNumber:Company:##SVCurrentCompany):5
    DateForm : $$String:$$MachineDate
    TimeForm : @@HrsForm + @@MtsForm

    HrsForm : If $$StringPart:$$MachineTime:0:2 CONTAINS ":" +
    Then $$StringPart:$$MachineTime:0:1 +
    Else $$StringPart:$$MachineTime:0:2

    MtsForm : if $$StringPart:$$MachineTime:0:2 CONTAINS ":" +
    Then $$StringPart:$$MachineTime:2:2 +
    Else $$StringPart:$$MachineTime:3:2


    ;;========================================================================================================
    ;;======================= Backup By Timer based on second===============================================
    ;;========================================================================================================



    [Function: BackUpCMP1]
    00:Set:SVBackupSrc:mad:@DataSourcePath
    Local Formula : FirstBackUpCmpName : $BackUpCmp[1].Name
    Local Formula : FirstBackUpCmpNumber : $BackUpCmp[1].CompanyNumber
    Local Formula : BackUpAllItems : $$IsSysNameEqual:mad:FirstBackUpCmpName:AllItems AND $$IsEmpty:mad:FirstBackUpCmpNumber
    000 : Set:SVBackupPath:mad:@DestPath

    ; 001 : Log:mad:@HrsForm
    101 : Do If:mad:@HrsForm=@@Hours1 and @@MtsForm=@@Mintues1: Backup Company:"":$$FullListEx:"":ListofAllBackupCompanies:##SVBackupPath:##SVBackupSrc:$Name:$CompanyNumber
    102 : Do If:mad:@HrsForm=@@Hours2 and @@MtsForm=@@Mintues2: Backup Company:"":$$FullListEx:"":ListofAllBackupCompanies:##SVBackupPath:##SVBackupSrc:$Name:$CompanyNumber
    ; 103 : Do If:mad:@HrsForm="19" and @@MtsForm="05": Backup Company:"":$$FullListEx:"":ListofAllBackupCompanies:##SVBackupPath:##SVBackupSrc:$Name:$CompanyNumber
    104 : Do If:mad:@HrsForm=@@Hours3 and @@MtsForm=@@Mintues3: Backup Company:"":$$FullListEx:"":ListofAllBackupCompanies:##SVBackupPath:##SVBackupSrc:$Name:$CompanyNumber



    [Function: BackUpCMP2]
    00:Set:SVBackupSrc:mad:@DataSourcePath
    Local Formula : FirstBackUpCmpName : $BackUpCmp[1].Name
    Local Formula : FirstBackUpCmpNumber : $BackUpCmp[1].CompanyNumber
    Local Formula : BackUpAllItems : $$IsSysNameEqual:mad:FirstBackUpCmpName:AllItems AND $$IsEmpty:mad:FirstBackUpCmpNumber
    000 : Set:SVBackupPath:mad:@DestPath2

    ; 001 : Log:mad:@HrsForm
    101 : Do If:mad:@HrsForm=@@Hours4 and @@MtsForm=@@Mintues4: Backup Company:"":$$FullListEx:"":ListofAllBackupCompanies:##SVBackupPath:##SVBackupSrc:$Name:$CompanyNumber
    102 : Do If:mad:@HrsForm=@@Hours5 and @@MtsForm=@@Mintues5: Backup Company:"":$$FullListEx:"":ListofAllBackupCompanies:##SVBackupPath:##SVBackupSrc:$Name:$CompanyNumber
    ; 103 : Do If:mad:@HrsForm="19" and @@MtsForm="05": Backup Company:"":$$FullListEx:"":ListofAllBackupCompanies:##SVBackupPath:##SVBackupSrc:$Name:$CompanyNumber
    104 : Do If:mad:@HrsForm=@@Hours6 and @@MtsForm=@@Mintues6: Backup Company:"":$$FullListEx:"":ListofAllBackupCompanies:##SVBackupPath:##SVBackupSrc:$Name:$CompanyNumber



    [System:Formula]

    Hours1 :"07"
    Mintues1 :"05"

    Hours2 :"13"
    Mintues2 :"52"

    Hours3 :"19"
    Mintues3 :"05"


    DataSourcePath :"d:\tally.erp9493\data"
    BackUpPath :"D:\tbk\" ;;;;Eg: "D:\tbk\"



    ;;============== 2nd BackUp

    Hours4 :"07"
    Mintues4 :"10"

    Hours5 :"12"
    Mintues5 :"10"

    Hours6 :"19"
    Mintues6 :"10"

    BackUpPath2 :"D:\tbk\" ;;;;Eg: "D:\tbk\"
     


  2. TCreat

    TCreat New Member


    its not working
     



  3. How to Work in Default ...///
     


Share This Page