Search This Blog

Wednesday, 12 July 2023

Voucher Authorisation

 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; Alt + F12  Authorisation Button Report

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


[#Form: Sales Color]

    Option    : AKVoucher    : @@IsSales


[!Form: AKVoucher]

Add    : Button    : At End    : Authorisation


[#Form: INV Buttons]

    Add    : Button    : At End    : Authorisation


[Button    : Authorisation]

    Key        : Alt+F12

    Title    : "Authorisation"

    Action    : Execute    : Authorisation

    Inactive: $$IsCmpOwner Or @@PrintAuthorised="Yes"


[Report    : Authorisation]

    Form    : Authorisation


[Form    : Authorisation]

    No Confirm      : Yes

    Space Top       : 0.5

    Space Left      : 1

    Space Right     : 1

    Full Width      : No

    Full Height     : No

    Vertical Align  : Centre

    Parts           : Authorisation


[Part    : Authorisation]

Lines        : MVTitle, AuthorisationUN, Authorisation PW, Authorisation Name

Local        : Field : MVTitle : Set as      : "Company : " + ##SVCurrentCompany

Local        : Field : MVTitle : Delete      : Border

Local        : Line  : MVTitle : Space Bottom: 1

Local        : Line  : MVTitle : Border    : Flush Totals

Option        : Small Size Part


[Line    : AuthorisationUN]

Field        : Medium Prompt, AuthorisationUN

Local        : Field : Medium Prompt : Info : "Name of User :"

Space Bottom    : 0.5


[Field    : AuthorisationUN]

Use            : Short Name Field

Set Always    : Yes

Modifies    : OlymUserName

Storage        : AKSUserName

Table        : Invoice Authorised Users

ShowTable    : Always

          

[Line    : Authorisation PW]

Field        : Medium Prompt, Authorisation Password

Local        : Field : Medium Prompt : Info : "Pass Word(if any) :"

Space Bottom    : 0.5


[Field    : Authorisation Password]

Use            : Short Name Field

Case        : Normal

Modifies    : OlympicPw   

Control        : Incorect Password : $$Value != @@CompanyPName


[Line    : Authorisation Name]

Field        : Medium Prompt, Authorisation Name, Authorisation Name1

Local        : Field : Medium Prompt : Info : "Level"

Space Bottom    : 0.5


[Field    : Authorisation Name]

Use            : Short Name Field

Set as        : #AuthorisationName1

Set Always    : Yes

Read Only    : Yes

      

[Field    : Authorisation Name1]

Use            : Short Name Field

Set as        : @@CompanySecurityName

Set Always    : Yes

Read Only    : Yes

Invisible    : Yes


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; User Level Security Setting

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


[#Line  : CUTitle]

    Add     : Fields : At End : Info Field

    Local    : Field          : Info Field       : Info    : "Vch. Authorized?"


[#Part: ComPany Users]

    Local    : Line    : Company Users    : Add    : Fields : OlyPW, OlyIsAuthorised


[Field : JLSecYesNo]  

Use         : Logical Field

Sub Form     : JL Pj Security : #JLSecYesNo

Set as         : "Yes"

Align        : Left

Width        : @@NameWidth/2

Inactive    : $$IsEmpty:$Name OR $$IsSysName:$Name


[Field  : OlyPW]

Use            : Short Name Field

Set as        : #CMPPassword

Storage        : OlyPW

Invisible    : Yes

Set Always    : Yes


[Field : OlyIsAuthorised]

Use            : Logical Field

Storage        : IsInvAuthorised

Width        : @@NameWidth/2

Set as        : No

Inactive    : $$IsSysName:$$Name


[Field : AKDuplicateAuthorized]

Use            : Logical Field

Storage        : IsDuplicateAuthorized

Width        : @@NameWidth/2+5

Set as        : No

Inactive    : $$IsSysName:$$Name


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;  User Collections

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


[Collection    : Company Users Collection]

    Type      : User List  : Company

    Child Of  : ##SVCurrentCompany


[Collection : Invoice Authorised Users]

    Type        : User List  : Company

    Child Of    : ##SVCurrentCompany

    Format        : $$Name, 20

    Filter        : FrmIsInvAuthorised

   

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; Formulas

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


[System  : Formula]

    Company Security Name        : $$FilterValue:$Security:CompanyUsersCollection:First:CompanySecurityFilter

    Company Security Filter    : $Name = #AuthorisationUN

    Company PName                : $$FilterValue:$OlyPW:CompanyUsersCollection:First:CompanySecurityFilter

    Incorect Password           : "Incorrect \n PassWord"

    FrmIsInvAuthorised            : $IsInvAuthorised

    OlyAuthorisation            : $$FilterValue:$IsInvAuthorised:CompanyUsersCollection:First:CompanyAuthorisedFilter

    CompanyAuthorisedFilter     : $Name=$$CmpUserName

    OlyVoucherAlter                : "Voucher Alteration" + $$NewLine + "is not allowed"

    NotAdminAndNotAuthorised    : Not $$IsCmpOwner And $$InAlterMode And Not $IsOptional And Not @@OlyAuthorisation And ((##OlympicPw="") AND NOT (@@OlyAuthorisation="Yes"))

    PrintAuthorised              : $$FilterValue:$IsInvAuthorised:CompanyUsersCollection:First:CompanyAuthorisedFilter

    NotPrintAuthorised             : Not $$IsCmpOwner AND @@PrintAuthorised="No"

    DuplicatePerson                : $$FilterValue:$IsDuplicateAuthorized:CompanyUsersCollection:First:CompanyAuthorisedFilter

    NotDuplicatePerson            : Not $$IsCmpOwner AND @@DuplicatePerson="No"


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; UDF Informations

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


[System    : UDF]

    OlyPW                    : String    : 33

    IsInvAuthorised            : Logical    : 99

    AKSUserName                : String    : 143

    IsDuplicateAuthorized    : Logical    : 100


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; Variables

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


[Variable  : OlymUserName]

    Type    : String


[Variable  : OlympicPw]

    Type    : String


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; Sales Invoice alter Control at Voucher Level

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


[#Report : Voucher]

    Variable    : OlymUserName, OlympicPw


[#Report : Accounting Voucher]

    Variable    : OlymUserName, OlympicPw


[#Form: Voucher]

    Control    : OlyVoucherAlter    : @@NotAdminAndNotAuthorised AND @@IsSales


[#Form : Accounting Voucher]

    Control    : OlyVoucherAlter    : @@NotAdminAndNotAuthorised AND @@IsSales


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; Disable in Print option in Create Mode

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


[#Key: Print Button]

    Inactive    : If $$IsSales:$VoucherTypeName and @@NotPrintAuthorised  Then Yes else No ;;$$InCreateMode Or @@NotAdminAndNotAuthorised


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; Border Setting

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


[Border    : Full Thin Right]

    Right    : Thin , Full Length


[Border: Full Thin Bottom Right]

    Bottom    : Thin, Full Length

    Right    : Thin, Full Length

   

   

;; End of File


Trail Balance with Group Name

 [#Menu: Gateway of Tally]

    Add    : Key Item    : Before    : @@locQuit    : Trail Balance with Group Name    : T: Display: IMFRLedReport

    Add     : Key Item :    Before    : @@locQuit :BLANK

    Item         : Blank

    Title        : "RBCR Basic Reports"


[Report: IMFRLedReport] 

    Form    : LedReportForRemote

    Title    : "Basic Report to show Group Name"

    Local    : Collection    : RBCRLedger    : Fetch    : Name, Parent, GParent,Closing Balance


[Form: LedReportForRemote]

    Parts    : LedReportForRemote

    Button: ExportButton, ChangePeriod

  

[Part: LedReportForRemote]

    Lines            : LedReportForRemoteTitle, LedReportForRemoteDetails 

    Repeat            : LedReportForRemoteDetails        : Ledger

    Scroll            : Vertical

    Common Borders    : Yes

    Border            : Thin Bottom


[Line: LedReportForRemoteTitle]

Use        : LedReportForRemoteDetails

Local    : Field    : Default            : Type    : String       

Local    : Field    : Led Name            : Set as: "Ledger Name"

Local    : Field    : Led Name            : Align: Left

Local    : Field    : Led Name: Style: Normal Serif Bold     

Local    : Field    : ParentName            : Set as: "Parent Name"

Local    : Field    : ParentName: Align: Left

Local    : Field    : ParentName: Style: Normal Serif Bold  

Local    : Field    : ParentOfName            : Set as: "Parent of Parent"

Local    : Field    : ParentOfName: Align: Left

Local    : Field    : ParentOfName: Style: Normal Serif Bold 

Local    : Field    : GParentOfName            : Set as: "G Parent of Parent"

Local    : Field    : GParentOfName: Align: Left

Local    : Field    : GParentOfName: Style: Normal Serif Bold

Local    : Field    : LedDrClosingBalance: Set as: "Dr Cl Balance"

Local    : Field    : LedDrClosingBalance: Style: Normal Serif Bold

Local    : Field    : LedCrClosingBalance: Set as: "Cr Cl Balance"

Local    : Field    : LedCrClosingBalance: Style: Normal Serif Bold

Border    : Column Titles


[Line: LedReportForRemoteDetails]

Fields        : Led Name, ParentName, ParentOfName, GParentOfName

Right Fields: LedDrClosingBalance, LedCrClosingBalance


[Field: Led Name]

Use        : Name Field

Set as    : $Name

Style    : Normal Serif

Align: Left

Width:    30

          

[Field: ParentName]

Use        : Name Field

Set as    : $Parent

Style    : Normal Serif

Align: Left

Width:    30


[Field: ParentofName]

Use        : Name Field

Set as    : $GrandParent

Style    : Normal Serif

Align: Left

Width:    30


[Field: GParentOfName]

Use        : Name Field

Set as    : $Parent:Group:$GrandParent

Style    : Normal Serif

Align: Left

Width:    30


[Field: LedDrClosingBalance]

Use        : Amount Forex Field

Set as    : if $$IsDr:$ClosingBalance then $ClosingBalance else 0

Style    : Normal Serif


[Field: LedCrClosingBalance]

Use        : Amount Forex Field

Set as    : IF Not $$Isdr:$ClosingBalance then $ClosingBalance else 0

Style    : Normal Serif

          

[Collection:RBCRLedger]

    Type: Ledger

    Fetch: Name, Parent, ClosingBalance 

    Compute: GParent : $Parent:Group:$Parent

    Filter: RBCRZero

    Is ODBC Table: Yes


[System:Formula]

RBCRZero : $$FromValue:##SvFromDate:$$ToValue:##SvToDate:$ClosingBalance > 0


Print Batch Mfg Date Expiry Date

 [#Field: default]

Add : Tooltip : $$DescName


[#Collection: Sales VoucherDetails]

Use : Print Config Tmpl

Add : Object: After : SAWithBatches:BatchNoline,MfgDateLine,ExpiryDateine


[Object: BatchNoline]

Use : Vch Output Configuration

Name : $$LocaleString:"Print Batch/Lot No."

Value : ##BatchNoline

Action : ConfigAction : Set : BatchNoline : NOT ##BatchNoline


[Object: MfgDateLine]

Use : Vch Output Configuration

Name : $$LocaleString:"Print Mfg Date"

Value : ##MfgDateLine

Action : ConfigAction : Set : MfgDateLine : NOT ##MfgDateLine


[Object: ExpiryDateine]

Use : Vch Output Configuration

Name : $$LocaleString:"Print Expiry Date"

Value : ##ExpiryDateine

Action : ConfigAction : Set : ExpiryDateine : NOT ##ExpiryDateine


[Variable: BatchNoline]

Persistent : Yes

Type : Logical

Default : No


[Variable: MfgDateLine]

Persistent : Yes

Type : Logical

Default : No


[Variable: ExpiryDateine]

Persistent : Yes

Type : Logical

Default : No


[System:UDF]

BatchNoline : Logical : 1001

MfgDateLine : Logical : 1002

ExpiryDateine : Logical : 1003


[System: Variables]

BatchNoline : No

MfgDateLine : No

ExpiryDateine : No


[#Line: EXPINV Column1]

Add : Right Fields : Before : EXPINV QtyTitle : BatchTitleFld4,MfgTitleFld4,ExpTitleFld4

Local : Field : BatchTitleFld4 : Use : Name Field

Local : Field : BatchTitleFld4 : Set as : "Batch No"

Local : Field : BatchTitleFld4 : Align : Center

Local : Field : BatchTitleFld4 : Border : Thin Left Right

Local : Field : MfgTitleFld4 : Use : Name Field

Local : Field : MfgTitleFld4 : Set as : "Mfg Date"

Local : Field : MfgTitleFld4 : Align : Center

Local : Field : MfgTitleFld4 : Border : Thin Left Right

Local : Field : ExpTitleFld4 : Use : Name Field

Local : Field : ExpTitleFld4 : Set as : "Expiry Date"

Local : Field : ExpTitleFld4 : Align : Center

Local : Field : ExpTitleFld4 : Border : Thin Left Right


[#Line: EXPINV InvDetails]

Add : Right Fields : Before : EXPINV Qty : BatchTitleFld4,MfgTitleFld4,ExpTitleFld4

Local : Field : BatchTitleFld4 : Use : Name Field

Local : Field : BatchTitleFld4 : Set as : $BatchName

Local : Field : MfgTitleFld4 : Use : Name Field

Local : Field : MfgTitleFld4 : Set as : $MfdOn

Local : Field : ExpTitleFld4 : Use : Name Field

Local : Field : ExpTitleFld4 : Set as : $ExpiryPeriod


[#Line: EXPINV AccDetails]

Add : Right Fields : Before : EXPINV AccQty : BatchTitleFld3,MfgTitleFld3,ExpTitleFld3

Local : Field : Default : Delete : Border

Local : Field : BatchTitleFld3 : Invisible : NOT (@@IsSales OR @@IsCreditNote OR @@IsDelNote)

Local : Field : BatchTitleFld3 : Width : 5.5

Local : Field : MfgTitleFld3 : Invisible : NOT (@@IsSales OR @@IsCreditNote OR @@IsDelNote)

Local : Field : MfgTitleFld3 : Width : 5.5

Local : Field : ExpTitleFld3 : Invisible : NOT (@@IsSales OR @@IsCreditNote OR @@IsDelNote)

Local : Field : ExpTitleFld3 : Width : 5.5


[Field:BatchTitleFld3]

Width : 5.5

Border : Thin Left Right


[Field:MfgTitleFld3]

Width : 5.5

Border : Thin Left Right


[Field:ExpTitleFld3]

Width : 5.5

Border : Thin Left Right


[Field:BatchTitleFld4]

Width : 5.5

Invisible : NOT ##BatchNolineVar OR NOT (@@IsSales OR @@IsCreditNote OR @@IsDelNote)

Border : Thin Left Right


[Field:MfgTitleFld4]

Width : 5.5

Invisible : NOT ##MfgDateLineVar OR NOT (@@IsSales OR @@IsCreditNote OR @@IsDelNote)

Border : Thin Left Right


[Field:ExpTitleFld4]

Width : 5.5

Invisible : NOT ##ExpiryDateineVar OR NOT (@@IsSales OR @@IsCreditNote OR @@IsDelNote)

Border : Thin Left Right


[#Line: EXPINV Totals]

Add : Right Fields : Before : EXPINV ActualQtyTotal : BatchTitleFld4,MfgTitleFld4,ExpTitleFld4

Voucher type wise Printer Selection

 [System:UDF]   

    VCHPrinter:String:02345


[System    : Formula]

    VCHPrinter    : $VCHPrinter:VoucherType:##SVVoucherType

 

[#Part: VTYP BehaviourMain]    

    Add:Lines:At End:VCH Printer LINE

    

[Line:VCH PRinter LINE]

    Space Top:1% page

    Field:Medium prompt,VCH Printer Line

    Local:Field:Medium prompt:Info:"Select Printer for This Voucher"

    

[Field:VCH Printer Line]

    Use        : Name Field

    Storage : VCHPrinter

    Color    : BLue

    Table       : List of Printers

    Show Table  : Always

    Background    : WHite

    

            


[#Form: Contra Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Payment Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Receipt Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Journal Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Payroll Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Debit Note Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Credit Note Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Purchase Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Memorandum Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Reversing Journal Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Delivery Note Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Receipt Note Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Rejection Inward  Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Rejection Outward Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Sales Order Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Purc Order Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: Attendance Color]

    Set    : SVPrinterName    : @@VCHPrinter


[#Form: POS Invoice Color]

    Set    : SVPrinterName    : @@VCHPrinter

DOCUMENT LINKING SYSTEM

 [#Part: VCH Narration] 

    Add : Line    : Attc    

     

[Button : Open File]

    Key    : Ctrl + O

    Action : Exec Command: $Fullpath


[Line: Attc]

    Field: Medium Prompt, Attinfo

    Local: Field: Medium Prompt: Info: "Want to Attach File  ? "

    Space Top: 1


[Field: Attinfo]

    Use    : Logical Field

    Storage : Enableprenarration

    Set as    : If $$IsEmpty:$$Value then "No" else $$Value

    Sub Form: Attchdet Rep    : $$Value = "Yes"


[Report : Attchdet Rep]

    Form : Attchdet Form


[Form : Attchdet Form]

    Parts     : Attchdet Part

    Height  : 15% Page

    Width   : 90% Page

    Add    : Button      : Upload File

    Add     : Button      : Open File


[Part : Attchdet Part]

    Line :  attachfile



[Line: attachfile]  

    Fields  : Short Prompt, Dirpath, Filnam, Savefile

    Local   : Field : Short Prompt : Info: $$LocaleString:"File Path"


[System: UDF]

    Dirpath        : String    : 11101

    Filnam        : String    : 11102

    Fullpath    : String    : 11103

    

[Button : Upload File]

    Key : Ctrl + S

    Action : CopyFile : "H:\TDL" : ##Fullpath


[Field: Dirpath]

    Use : Name Field

    Color : Blue

    Border : Thin Bottom

    Set As : ##TSPLSmpDirectoryPath

    Modifies: TSPLSmpDirectoryPath    : True

Tooltip : "Enter the folder path from where the files are to be listed"

    Storage : Dirpath

    On : Accept    : Yes :Call: Modifies : #dirpath

    


[Field: Filnam]

Use          : Name Field

Table        : List of Files, Not Applicable , End of list

Set Always   : Yes

Show Table   : Always

Align        : Center

Width        : 40% Page

Tooltip      : "Select a file from the Table"

Storage      :    Filnam

Modifies     : Pathupdate   : True


[Field: savefile]

Use          : Name Field

Set As          : ($$LocaleString:$Dirpath)+"\"+($$LocaleString:$Filnam)

Storage      :    Fullpath

Set Always   : Yes


[Field: openfile]

Use          : Name Field

Set As          : "Open"

Key           : Open File

Color        : Black

Print FG     : Pale Leaf Green

Border          : TQ

Width        : 5

    

[Border: TQ]

    Top          : Thick, Double

    Bottom           : Thick, Double

    Left          : Thick, Double

    Right           : Thick, Double



[Collection: List of Files]

Title         : $$LocaleString:"List of Files"

    Data Source   : Directory    : #TSPLSmpDirectoryPath

Filter          : TSPLSmpTextFiles

Format        : $Name, 25

    Format        : $FileSize, 15

    Format        : $LastModifiedDate, 15

    Format        : $LastModifiedTime, 15


[Collection: AttchPath]   

    Variable      : Filnam

    Filter        : TSPLSmpAttchFiles


[System: Variable]

    TSPLSmpDirectoryPath    : "C:\TDL"


[System: Formula]

TSPL Smp Directory Path  : ##TSPLSmpDirectoryPath

TSPL Smp File Name       : ##TSPLFilename

TSPL Smp Text Files     : $$TSPLSmpRefreshTable:#TSPLSmpDirectoryPath

Filnam              : $$TSPLSmpRefreshfile:#TSPLFilename


[Function: TSPLSmpRefreshTable]

    Parameter        : pTempVar    : String

    00    : RETURN    : True

 

[Function: TSPLSmpRefreshFile]

    Parameter        : attchfile    : String

    OO    : RETURN    : True


[Variable: TSPLSmpDirectoryPath]

    Type    : String

    Persist    : Yes


[Variable: Pathupdate]

    Type    : String

    Persist    : Yes

Print User Name in All the Default Reports And Vouchers

 [#Part: CMP TallyShop F11]

    Add : Part : After : CMP TallyShopFeaturesTitle : CMP UsrName

[Part: CMP UsrName]

Line : CMP UsrName

Space Top : .30

[Line: CMP UsrName]

Fields     : Medium Prompt, CMP UsrNameFld

Local     : Field : Medium Prompt : Info : "Print Company User Name ?"

Invisible : NOT $IsSecurityOn

Space Top : 0.4


[Field: CMP UsrNameFld]

Use         : Logical Field

Type         : Logical:Forced

Storage     : IsUserPrintOn

Set always     : Yes


;;----------------------------------ADDED PART AT THE END OF EVERY REPORT------------------------------------------


[Part: CmpUserNamePart]

    Line     : CmpUserNameLine

   

[Line: CmpUserNameLine]

Field : Short Prompt, Name Field

Local : Field : Short Prompt : Info         : "User Name"

Local : Field : Short Prompt : Invisible    : NOT $$InPrintMode

Local : Field : Short Prompt : Inactive     : If @@checkUser OR NOT @@IsCmpUserOn Then Yes Else No

Local : Field : Name Field      : Set As         : $$CmpUserName

Local : Field : Name Field      : Invisible    : NOT $$InPrintMode

Local : Field : Name Field      : Inactive     : If @@checkUser OR NOT @@IsCmpUserOn Then Yes Else No

Local : Field : Default         : Style         : Normal Bold Italic


;;----------------------------------Trial Balance----------------------------------------------------------


[#Report: Trial Balance]

    Local : Form : Group Summary : Add : Part : At End : CmpUserNamePart


;;----------------------------------Day Book----------------------------------------------------------


[#Report: Day Book]

    Local : Form : Day Book : Add : Part : At End : CmpUserNamePart


;;------------------------Accounts Books Reports------------------------------------------------

[#Report: Bank Group Summary]

    Local : Form : Group Summary : Add : Part : At End : CmpUserNamePart


[#Report: Ledger Vouchers]

    Local : Form : Ledger Vouchers : Add : Part : At End : CmpUserNamePart


[#Report: Group Summary]

    Local : Form : Group Summary : Add : Part : At End : CmpUserNamePart


[#Report: Group Vouchers]

    Local : Form : Group Vouchers : Add : Part : At End : CmpUserNamePart


[#Report: Sales Register]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


[#Report: Voucher Register]

    Local : Form : Day Book : Add : Part : At End : CmpUserNamePart


[#Report: Purchase Register]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


[#Report: Journal Register]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


[#Report: Debit Note Register]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


[#Report: Credit Note Register]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


;;------------------------------Cost Centre Reports-------------------------------------------------


[#Report: Cost Category Summary]

    Local : Form : Cost Category Summary : Add : Part : At End : CmpUserNamePart


[#Report: Cost Centre Summary]

    Local : Form : Cost Centre Summary : Add : Part : At End : CmpUserNamePart


[#Report: CC Monthly Summary]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


[#Report: CC Vouchers]

    Local : Form : Day Book : Add : Part : At End : CmpUserNamePart


[#Report: CC Vouchers]

    Local : Form : CC Vouchers : Add : Part : At End : CmpUserNamePart


[#Report: Cost Centre BreakUp]

    Local : Form : Group Summary : Add : Part : At End : CmpUserNamePart


[#Report: Ledger Monthly Summary]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


[#Report: Ledger Cost Breakup]

    Local : Form : Cost Category Summary : Add : Part : At End : CmpUserNamePart


[#Report: Group Cost Breakup]

    Local : Form : Cost Category Summary : Add : Part : At End : CmpUserNamePart


;;--------------------------------------OutStanding------------------------------------------------


[#Report: Bills Receivable]

    Local : Form : Bills Outstanding : Add : Part : At End : CmpUserNamePart


[#Report: Bills Payable]

    Local : Form : Bills Outstanding : Add : Part : At End : CmpUserNamePart


[#Report: Ledger Outstandings]

    Local : Form : Ledger Outstandings : Add : Part : At End : CmpUserNamePart


[#Report: Group Outstandings]

    Local : Form : Group Outstandings : Add : Part : At End : CmpUserNamePart


;;------------------------Inventory Books Reports-------------------------------------------------


[#Report: Item Monthly Summary]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


[#Report: Stock Vouchers]

    Local : Form : Stock Vouchers : Add : Part : At End : CmpUserNamePart


[#Report: Stock Summary]

    Local : Form : Stock Summary : Add : Part : At End : CmpUserNamePart


[#Report: Movement Analysis]

    Local : Form : Movement Analysis : Add : Part : At End : CmpUserNamePart


[#Report: Item Movement Analysis]

    Local : Form : Item Movement Analysis : Add : Part : At End : CmpUserNamePart


[#Report: Item Voucher Analysis]

    Local : Form : Item Voucher Analysis : Add : Part : At End : CmpUserNamePart


[#Report: Category Analysis]

    Local : Form : Movement Analysis : Add : Part : At End : CmpUserNamePart


[#Report: Group Analysis]

    Local : Form : Movement Analysis : Add : Part : At End : CmpUserNamePart


[#Report: Ledger Analysis]

    Local : Form : Movement Analysis : Add : Part : At End : CmpUserNamePart


[#Report: Transfer Analysis]

    Local : Form : Movement Analysis : Add : Part : At End : CmpUserNamePart


[#Report: Stock Ageing]

    Local : Form : StockAge : Add : Part : At End : CmpUserNamePart


[#Report: Stock Journal Register]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


[#Report: Voucher Register]

    Local : Form : Voucher Register : Add : Part : At End : CmpUserNamePart


[#Report: Physical Stock Register]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


;;-----------------------------Inventory Statements---------------------------------------------


[#Report: Godown Summary]

    Local : Form : Godown Summary : Add : Part : At End : CmpUserNamePart


[#Report: Stock Category Summary]

    Local : Form : Stock Category Summary : Add : Part : At End : CmpUserNamePart


[#Report: Stock Query]

    Local : Form : Stock Query : Add : Part : At End : CmpUserNamePart


[#Report: BOM Estimate]

    Local : Form : BOM Estimate : Add : Part : At End : CmpUserNamePart


[#Report: Sales Order Summary]

    Local : Form : Stock Summary : Add : Part : At End : CmpUserNamePart


[#Report: Purchase Order Summary]

    Local : Form : Stock Summary : Add : Part : At End : CmpUserNamePart


[#Report: ReOrder Status]

    Local : Form : ReOrder Status : Add : Part : At End : CmpUserNamePart


[#Report: ROItem Movement Analysis]

    Local : Form : Item Movement Analysis : Add : Part : At End : CmpUserNamePart


[#Report: Inward Tracking Details]

    Local : Form : Tracking Details : Add : Part : At End : CmpUserNamePart


[#Report: Item Outward Track]

    Local : Form : Tracking Details : Add : Part : At End : CmpUserNamePart


[#Report: Outward Tracking Details]

    Local : Form : Tracking Details : Add : Part : At End : CmpUserNamePart


[#Report: Statistics]

    Local : Form : Statistics : Add : Part : At End : CmpUserNamePart


;;-----------------------------------Cash/Fund Flow----------------------------------------------


[#Report: Cash Flow]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


[#Report: Cash Flow BreakUp]

    Local : Form : Cash Flow BreakUp : Add : Part : At End : CmpUserNamePart


[#Report: Funds Flow]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


[#Report: Funds Flow BreakUp]

    Local : Form : Funds Flow BreakUp : Add : Part : At End : CmpUserNamePart


[#Report: List of Accounts]

    Local : Form : List of Accounts : Add : Part : At End : CmpUserNamePart


;;------------------------------Exception Reports-----------------------------------------------


[#Report: Negative Stock]

    Local : Form : Stock Summary : Add : Part : At End : CmpUserNamePart


[#Report: Negative Ledgers]

    Local : Form : Group Summary : Add : Part : At End : CmpUserNamePart


[#Report: Overdue Receivables]

    Local : Form : Bills Outstanding : Add : Part : At End : CmpUserNamePart


[#Report: Overdue Payables]

    Local : Form : Bills Outstanding : Add : Part : At End : CmpUserNamePart


[#Report: Memorandum Register]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


[#Report: Rev Jrnl Register]

    Local : Form : Monthly Summary : Add : Part : At End : CmpUserNamePart


[#Report: Optional Vouchers]

    Local : Form : Day Book : Add : Part : At End : CmpUserNamePart


[#Report: Post Dated Vouchers]

    Local : Form : Day Book : Add : Part : At End : CmpUserNamePart


[#Report: Balance Sheet]

    Local : Form : Balance Sheet : Add : Part : At End : CmpUserNamePart


[#Report: Profit and Loss]

    Local : Form : Profit and Loss : Add : Part : At End : CmpUserNamePart


[#Report: Ratio Analysis]

    Local : Form : Ratio Analysis : Add : Part : At End : CmpUserNamePart


[#Report: Multi Voucher Print]

    Local : Form : Multi Voucher Print : Add : Part : At End : CmpUserNamePart


;;-----------------------------------Multi Acc Printing---------------------------------------


[#Report: All Ledgers]

    Local : Form : Ledger Vouchers : Add : Part : At End : CmpUserNamePart


[#Report: Cash Ledger Vouchers]

    Local : Form : Ledger Vouchers : Add : Part : At End : CmpUserNamePart


[#Report: Bank Ledger Vouchers]

    Local : Form : Ledger Vouchers : Add : Part : At End : CmpUserNamePart


[#Report: Cash Multi Columnar]

    Local : Form : Cash Multi Columnar : Add : Part : At End : CmpUserNamePart


[#Report: Group Ledger Vouchers]

    Local : Form : Ledger Vouchers : Add : Part : At End : CmpUserNamePart


[#Report: Sales Vouchers]

    Local : Form : Day Book : Add : Part : At End : CmpUserNamePart


[#Report: Purchase Vouchers]

    Local : Form : Day Book : Add : Part : At End : CmpUserNamePart


[#Report: Journal Vouchers]

    Local : Form : Day Book : Add : Part : At End : CmpUserNamePart


[#Report: Debit Note Vouchers]

    Local : Form : Day Book : Add : Part : At End : CmpUserNamePart


[#Report: Credit Note Vouchers]

    Local : Form : Day Book : Add : Part : At End : CmpUserNamePart


[#Report: Stock Journal Vouchers]

    Local : Form : Day Book : Add : Part : At End : CmpUserNamePart


[#Report: Physical Stock Vouchers]

    Local : Form : Day Book : Add : Part : At End : CmpUserNamePart


;;-------------------------UserName in Vouchers Printing-------------------------------------------


[#Part: PPR Sign]

    Add : Line : At End : CmpUserNameLine


[#Part: PJR Sign]

    Add : Line : At End : CmpUserNameLine


[#Part: PJR Sign]

    Add : Line : At End : CmpUserNameLine


[#Part: PSV Sign]

    Add : Line : At End : CmpUserNameLine


[#Part: EXPINV Jurisdiction]

    Invisible : No

    Add : Line : At End : CmpUserNameLine


[#Line: EXPINV Jurisdiction]

    Invisible : $$IsEmpty:@@Jurisdiction


[#Form: Normal INV Voucher]

    Local : Part : VCH Narration : Add : Line : At End : CmpUserNameLine


;;-------------------------For Payroll Reports and vouchers-------------------------------------------


[#Report: Attd Print]

    Local : FORM : Voucher: Add : Part : At End : CmpUserNamePart


[#Report: Payslip]

    Local : FORM : Payslip : Add : Part : At End : CmpUserNamePart


[#Report: PaySheet]

    Local : FORM : DSP PaySheet : Add : Part : At End : CmpUserNamePart


[#Report: Payroll Statement]

    Local : FORM : DSP PaySheet : Add : Part : At End : CmpUserNamePart


[#Form: CC Vouchers]

    Add : Part : At End : CmpUserNamePart


[#Report: Payment Advice]

    Local : FORM : Payment Advice    : Add : Part : At End : CmpUserNamePart


[#Report: Payroll Register]

    Local : FORM : Monthly Summary    : Add : Part : At End : CmpUserNamePart


[#Report: Emp Ledger Breakup]

    Local : FORM : Emp Ledger Breakup    : Add : Part : At End : CmpUserNamePart


[#Report: Employee Summary]

    Local : FORM : Employee Summary    : Add : Part : At End : CmpUserNamePart


[#Report: EMP Monthly Summary]

    Local : FORM : Monthly Summary    : Add : Part : At End : CmpUserNamePart


[#Report: Attendance Sheet]

    Local : FORM : Attendance Sheet : Add : Part : At End : CmpUserNamePart


[#Report: Payroll Attd Vouchers]

    Local    :  Form   : Attd Vouchers : Add : Part : At End : CmpUserNamePart


[#Report: Attendance Register]

    Local : FORM : Monthly Summary    : Add : Part : At End : CmpUserNamePart   


[#Report: PassportExpiry]

    Local : FORM : Payroll EmpCatTemplate : Add : Part : At End : CmpUserNamePart   


[#Report: GratuitySummary]

    Local : FORM :  GratuitySummary : Add : Part : At End : CmpUserNamePart   


[#Report: GratuityDetails]

    Local : FORM :  GratuityDetails : Add : Part : At End : CmpUserNamePart   


;;------------------------------------System Formulas--------------------------------------------------


[System: Formula]

    CheckUser     : $$CmpUserName = 'Tally User'

    IsCmpUserOn : $IsUserPrintOn:Company:##SVCurrentCompany


[System: UDF]

    IsUserPrintOn : Logical : 10005


Customer- Item Rate fixed

 [#Part: MST LED Explode Sundry]

    Add : Line : At end : ItemRateSetings

[Line :  ItemRateSetings]

  Field : Medium Prompt, ItemRateSetings

  Local : Field : Medium Prompt : Set As : "Set/Alter Item Rates :"


[Field :  ItemRateSetings]

use : Logical Field

Set aS : No

Sub form : ItemRateSF : $$Value

[Report : ItemRateSF]

    Form :ItemRateSF


[Form :ItemRateSF]

Part :ItemRateSF


[Part :ItemRateSF]

Line : ItemRateSF

Repeat : ItemRateSF : ItemRatesAggregate

Scroll : Vertical

Break on : $$Isend:$MSTSFItemName


[Line :ItemRateSF]

Field : MSTSFItemName,MSTSFItemRate


[Field : MSTSFItemName]

Use : Name Field

Storage :MSTSFItemName

Table : MyStockitems,End of List


[Field : MSTSFItemRate] 

Use  : Amount Field

Storage :MSTSFItemRate

Inactive : $$IsEnd:$MSTSFItemName

[System : UDF] 

ItemRatesAggregate    : Aggregate : 21000

MSTSFItemName        : String    : 21001

MSTSFItemRate        : Amount    : 21002

 

[Collection : MyStockitems]

    Title : "List of Items"

    Type : StockItem

    Format : $Name,25

 

[#Field: VCH NrmlRate]

    Control : MyRateControl : $(Ledger,$PartyLedgerName).ItemRatesAggregate[1,@@IsSameItem].MSTSFItemRate < $$Value And $$IsSales:##SVVoucherType

 

[System : Formula]

MyRateControl : "Rate Control"

IsSameItem : $$ReqObject:$StockitemName = $MSTSFItemName

Voucher Authorisation

 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Alt + F12  Authorisation Button Re...