Thursday 25 May 2017

CST Entry TDL

If you are trader. You are purchasing outside the state. if your puchase invoice have Basic Excise Duty tax then you need to calculate per item basic excice duty for purchase entry. But using following code you are not required to calculate per item basis. You can make cst purchase entry in tally by using following code.


Copy and paste following code into notepad.

;; Sri Ganeshji : Sri Krishna : Sri Ram: Sri Balaji : Sri Pitreshwarji : Sri Durgaji : Sri Venkateshwara
;;Objective(s) -
;;- This code for cst calculation in purchase invoice mode not in voucher mode
;;- Additional field added for cst calculation in actual amount automaticully

;;Last modification -

;;- Altered on 07-01-2017
;;Author:Deepak Garg


[System: UDF]

cstbill : Amount : 1001
itembill : Amount : 1002

[#Line: EI PartyLimit]

Add : Field : After : EI CreditLimit : Tin no
Add : Field : After : Tin no : sharda
Add : Field : After : sharda : ram

[Field : Tin no]

Invisible : NOT ##CurBalanceFlag
Field : Simple Prompt, Name Field
Local : Field : Simple Prompt : Info : $$LocaleString:"Tin No:"
Local : Field : name Field : Set as : $VATTINNumber:Ledger:#EIConsignee + "  " + $SalesTaxNumber:Ledger:#EIConsignee

[Field : sharda]

Local   : Field : Default           : Skip      : No
Field : Simple Prompt, sharda1
Local : Field : Simple Prompt : Info : $$LocaleString:"Item Total:"

[Field : sharda1]

Use : Amount Field
Storage : itembill
variable : sharda1 : Amount
Modifies : sharda1



[Field : ram]
Local   : Field : Default           : Skip      : No
Field : Simple Prompt, ram1
Local : Field : Simple Prompt : Info : $$LocaleString:"Before Cst Total:"

[Field : ram1]

Use : Amount Field
Storage : cstbill
variable : ram1 : Amount
Modifies : ram1

[#Field: VCH Value]

ResetVal    : If (@@NoBaseUnits OR $$IsEmpty:$BilledQty) then $$Value else if(#ram1!=0 And #sharda1!=0 And $Rate < #sharda1+1) then (($Rate * $BilledQty *#ram1)/(#sharda1*1)) else ((($Rate * $BilledQty * (100 - $Discount)) / 100))

[#Field: VCH Rate]
Notify : Deepakhighrate : #ram1!=0 And #sharda1!=0 And $Rate > #sharda1

[#Field: EI ValueSubTotal]
Skip      : No
;;Read Only: No
;;Set as: "deepak"
Notify : Deepakhightotal : #ram1!=0 And #sharda1!=0 And @VchTotalValue > #ram1
   
                        
[System: Formula]

Deepakhighrate : $$LocaleString:"Item rate must be less than or equal to total item amount"

Deepakhightotal : $$LocaleString:"Total Item Amount must be eual to total amount after cst"
   
;; End-of-File


For more info watch following youtube videos.
https://www.youtube.com/watch?v=hJUje0sQcSs
https://www.youtube.com/watch?v=z8uf6-r_Aa4&spfreload=5

3 comments:

  1. sir double discount add-on give me

    ReplyDelete
  2. and job work one item job worker 2 every job worker item name change so how to maintain stock in tally so please give me new add-on

    ReplyDelete