Tally Chapter 144 TDL for Search by Description By Rajiv Mishra Computer Class

 Few lines are missing here. Watch the full video for full coding.

[#Menu: Gateway of Tally]

Add : Item : Blank

Add : Key Item :  Search Description: H : Alter : FindVoucherRajiv

Title : $$LocaleString:"Description Search "

[Form: FrmFindVoucher]

Part : PrtFindVoucher

Full Width : Yes

Space Right : 2

Space Left : 2

Option : Small Size Form

Background : @@SV_CMPCONFIG

On: Form Accept : Yes : Form Accept

On: Form Accept : Yes : Display : FindVoucherRajiv Entries in Daybook

[Part: PrtFindVoucher]

Line :LinImpReceiptV

[Line: LinImpReceiptV]

Fields : Medium Prompt, Name Field;

Local: Field: Medium Prompt : Set As : " Search String (Contains)"

Local: Field: Name Field : Modifies : xlsFilePath : Yes

[Report: FindVoucherRajiv Entries in Daybook]

Use : Daybook

; Title:Search Contain data

Set : SVFromDate : $$FinYearBeg:##StartDate:$StartingFrom:Company:##SVCurrentCompany

Set : SVToDate : $$FinYearEnd:##StartDate:$StartingFrom:Company:##SVCurrentCompany

Set : ExplodeNarrFlag : Yes

Set :DSPShowAdditionalDescription:Yes

Local : Collection : Default : Add : Filter : Dup Filter

; FetchValues : Date, VoucherTypeName, Narration

[System: Formula]

;Dup Filter : $Narration CONTAINS "Duplicated"

Dup Filter :if NOT $$IsEmpty:##xlsFilePath then $VoucherNumber CONTAINS ##xlsFilePath or $$CollectionField:$BasicDesc:1:InventoryEntries CONTAINS ##xlsFilePath else $$CollectionField:$BasicDesc:2:InventoryEntries CONTAINS "Duplicated"

[Function: Voucher Duplication]

10 : WALK COLLECTION : TSPL Smp Company Vch

20 : SET : SVViewName : $$SysName:AcctgVchView

30 : NEW OBJECT : Voucher

40 : SET VALUE : Date : $Date

50 : SET VALUE : VoucherTypeName : $VoucherTypeName

60 : SET VALUE : Description : $$CollectionField:$BasicDesc:1:InventoryEntries; + " Duplicated"

70 : SET VALUE : PersistedView : ##SVViewName

80 : WALK COLLECTION : InventoryEntries

90 : INSERT COLLECTION OBJECT : InventoryEntries

100 : SET VALUE : Ledger Name : $LedgerName

110 : SET VALUE : IsDeemedPositive : $IsDeemedPositive

120 : SET VALUE : Amount : $Amount

130 : SET TARGET : ..

140 : END WALK

150 : CREATE TARGET

160 : END WALK

170 : DISPLAY : FindVoucherRajiv Entries in Daybook

180 : RETURN

[Collection: TSPL Smp Company Vch]

Source Collection : Voucher; Vouchers

Fetch : Date, VoucherTypeName, Narration, LedgerEntries.*

[#Object : InventoryEntry]

;BasicDesc : $$CollectionField:$BasicUserDescription:1:BasicUserDescription

BasicDesc : $$FullList:BasicUserDescription:$BasicUserDescription

[System: Variable]

xlsFilePath: ""

[Variable:xlsFilePath]

Type : String

Default : ""

Persistent : Yes

;; End-of-File

Tally Chapter 143 TDL for Broker Transpoter details By Rajiv Mishra Computer Class

 

Few lines are missing here. watch the video for Full Code

[Field:CMP EnableBrokerLine]

Use : Logical Field

Storage : EnableBroker

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

Sub Form: CMP BrokerNameReport: $$Value = "Yes"

[Report: CMP BrokerNameReport]

Form : CMP BrokerNameForm

Object : Company

[Form: CMP BrokerNameForm]

Part : CMPBrokerDetails

Background : White, Petal Pink

[Field:CMPName Field]

Use : Name Field

Skip : Yes

Align : Center

Border : Thin Bottom

[Part:CMPBrokerDetails]

Part : CMP BrokerNamePart,CMP TransportPart,CMP LoadManPart

Vertical : No

Common Border : Yes

[Part: CMP BrokerNamePart]

Line : CMP BrokerNamePartTit,CMP BrokerName LineDetails

Repeat : CMP BrokerName LineDetails: BrokerNameList

BreakOn : $$IsEmpty:$BrokerNameList

Height : 10

Scroll : Vertical

CommonBorder: Yes

Space Left : 2 mms

Space Right : 2 mms

Border : Thin Right

[Line:CMP BrokerNamePartTit]

Field : CMPName Field

Local : Field : CMPName Field : Set as : "Boker Name"

[Line: CMP BrokerName LineDetails]

Field : CMP BrokerNameList;,CMP TransportList,CMP LoadmanList;,CMP Broker CommissionField

[Field: CMP BrokerNameList]

Use : Name Field

Storage : BrokerNameList

Style : Small Bold

[Part:CMP TransportPart]

Line : CMP TransportPartTit,CMP TransportPart

Repeat : CMP TransportPart: TransportList

BreakOn : $$IsEmpty:$TransportList

Height : 10

Scroll : Vertical

CommonBorder: Yes

Space Left : 2 mms

Space Right : 2 mms

Border : Thin Right

[Line:CMP TransportPartTit]

Field : CMPName Field

Local : Field : CMPName Field : Set as : "Transport Name"

[Line:CMP TransportPart]

Field : CMP TransportList

[Field: CMP TransportList]

Use : Name Field

Storage : TransportList

Style : Small Bold

[Part:CMP LoadManPart]

Line : CMP LoadmanListTit,CMP LoadmanList

Repeat : CMP LoadmanList: LoadmanList

BreakOn : $$IsEmpty:$LoadmanList

Height : 15

Scroll : Vertical

CommonBorder: Yes

Space Left : 2 mms

Space Right : 2 mms

[Line:CMP LoadmanListTit]

Field : CMPName Field

Local : Field : CMPName Field : Set as : "Loadman Name"

[Line:CMP LoadmanList]

Field : CMP LoadmanList

[Field: CMP LoadmanList]

Use : Name Field

Storage : LoadmanList

Style : Small Bold

[#Part:DBLLINE Narration]

Add : Line : Before : VCH NarrPrompt : VCHBrokerLine

[Line:VCHBrokerLine]

Invisible : NOT $EnableBroker:Company:##SVCurrentCompany OR NOT $$IsSales:##SVVoucherType

Field : VCHBrokerNameTit,VCHBrokerName,VCHTransportTit,VCHTransport,VCHLoadManTit,VCHLoadMan

[Field:VCHBrokerNameTit]

Use : Meduim Prompt

Set as : "Broker Name :"

Skip : Yes

[Field:VCHTransportTit]

Use : VCHBrokerNameTit

Set as : "Transport Name :"

[Field:VCHLoadManTit]

Use : VCHBrokerNameTit

Set as : "Loadman Name :"

[Field:VCHBrokerName]

Use : Name Field

Storage : BrokerName

Table : BrokerNameColl,EndofList

Show Table : Always

Key : CreateBroker

[Field:VCHTransport]

Use : Name Field

Storage : TransportName

Table : TransportNameColl,EndofList

Show Table : Always

Key : CreateBroker

[Field:VCHLoadMan]

Use : Name Field

Storage : LoadmanName

Table : LoadmanNameColl,EndofList

Show Table : Always

Key : CreateBroker

[Key:CreateBroker]

Key : Alt + C

Action : Alter : CMP BrokerNameReport

[#Menu: Gateway of Tally]

Add : Key Item : After : @@locSalesRegister : "Broker wise Sales" : W : Display : BrokerReport

;Control : BrokerReport : $EnableBroker:Company:##SVCurrentCompany

[Report:BrokerReport]

Use : DSP Template

Title : "Broker Report"

Variable: SVFromDate, SVToDate

Repeat : PARTYNAME1

Form : BrokerReport

Set : SVFromDate : $$MonthStart:##SVCurrentDate

Set : SVToDate : $$MonthEnd:##SVCurrentDate

Set : FilterBroker : ""

Set : FilterTransport : ""

Set : FilterLoadman : ""

[Form:BrokerReport]

Button : PrintButton, StockItemhotkey

Button : ExplodeFlag,ChangePeriod,BtnBroker

Bottom Toolbar Buttons : EnterToEdit, BottomToolBarBtn8,BottomToolBarBtn9,BottomToolBarBtn10

Part : BWRTitle,BWRPeriod,BWRFilter,BWRDetails

Bottom Part :BWRTotals

Width : 95% Page

Space Left : 2 mms

Space Right : 2 mms

[Key: EnterToEdit]

Key : Enter

Title : $$LocaleString:"Explode"

Type : BottomToolBarBtn2

Action : Explode

[Part:BWRTitle]

Line : BWRTitle

Horizontal Align : Center

[Part:BWRPeriod]

Line : BWRPeriod

[Line:BWRTitle]

Field : Simple Field

Local : Field : Simple Field : Style : Large Bold

Local : Field : Simple Field : Info : "Broker wise Sales"

Local : Field : Simple Field : Border: Thin Bottom

Local : Field : Simple Field : Align : Center

[Line:BWRPeriod]

Right Field : Name Field

Left Field : Short Prompt,RPTBrokerFilter

Local : Field : Name Field : Info : @@DSPDateStr

Local : Field : Name Field : Width : 50

Local : Field : Name Field : Align : Right

Local : Field : Short Prompt : Set as: "Broker:"

Local : Field : Short Prompt : Inactive: Not $EnableBroker:Company:##SVCurrentCompany

[Part:BWRFilter]

Line : BWRTranFilter,BWRLMFilter

Invisible : Not $EnableBroker:Company:##SVCurrentCompany

[Line:BWRTranFilter]

Field : Short Prompt,RPTTransportFilter

Space Top : 1 mms

Local : Field : Default : Use : Simple Field

Local : Field : Short Prompt : Set as : "Transport:"

[Line:BWRLMFilter]

Field : Short Prompt,RPTLoadManFilter

Space Top : 1 mms

Local : Field : Default : Use : Simple Field

Local : Field : Short Prompt : Set as : "Loadman:"

[Field:RPTBrokerFilter]

Inactive : Not $EnableBroker:Company:##SVCurrentCompany

Use : Simple Field

Style : Normal Bold

Set as : @VCHBrokerName

Set Always : Yes

VCHBrokerName : If $$IsEndOfList:##FilterBroker or ##FilterBroker="" Then "Display" Else ##FilterBroker

[Field:RPTTransportFilter]

Use : RPTBrokerFilter

Set as : @VCHTransport

VCHTransport : if ##FilterTransport="" or $$IsEndOfList:##FilterTransport Then "Display" Else ##FilterTransport

[Field:RPTLoadManFilter]

Use : RPTBrokerFilter

Set as : @VCHLoadMan

VCHLoadMan : if ##FilterLoadman="" or $$IsEndOfList:##FilterLoadman Then "Display" Else ##FilterLoadman

[Line:BWRHead]

Use : BWRDetails

Border : Column Titles

Local : Field : Default : Type : String

Local : Field : Default : Align : Center

Local : Field : Default : Border : Thin Left

Local : Field : Default : Style : Normal Bold

Local : Field : SWSno : Set as : "Sno"

Local : Field : SWSno : Border : Thin Left Right

Local : Field : BWRPARTYNAME1 : Set as : "Party Name"

Local : Field : BWRPARTYNAME1 : Align : Center

Local : Field : BWRActulQty : Set as : "Actual Qty"

Local : Field : BWRActulQty : Align : Center

Local : Field : BWRBilledQty : Set as : "Billed Qty"

Local : Field : BWRBilledQty : Align : Center

Local : Field : BWRAmount : Set as : "Amount"

Local : Field : BWRAmount : Border : Thin Left Right

Space Top : 1.5 mms

Space Bottom: 1.5 mms

[Part:BWRDetails]

Line : BWRHead,BWRDetails

Repeat : BWRDetails:BWRPartyWise

Scroll : Vertical

Total : BWRActulQty,BWRBilledQty,BWRAmount

Common Border : Yes

[Line:BWRDetails]

Field : SWSno,BWRPARTYNAME1

Right Field : BWRActulQty,BWRBilledQty,BWRAmount

Option : AlterOnEnter : $$IsVoucher

Space Bottom: 0.5 mms

Space Top : 0.5 mms

Border : Thin Top

Explode : BWRExplode : ($$KeyExplode OR ##ExplodeFlag)

[Field:BWRDefault]

Use : Name Field

Style : Normal Bold

[Field:SWSno]

Use : BWRDefault

Set as : $$Line

Width : 1.5 cm

Align : Center

Border : Thin Left Right

[Field:BWRPARTYNAME1]

Use : BWRDefault

Set as : $PARTYNAME1

Width : 60

Quick Search: Yes

Space Left : 2 mms

[Field:BWRPARTYVATNo]

Use : BWRDefault

Set as : "" ;;$stockitemclosingbalance ;;"VAT No"

Width : 12

Quick Search: Yes

Space Left : 2 mms

[Field:BWRPARTYGSTNo]

Use : BWRDefault

Set as : $PartyGSTIn ;;"GST No"

Width : 15

Quick Search: Yes

Space Left : 2 mms

[Field:BWRActulQty]

Use : Qty Field

Type : Number

Set as : $TotActQty;VoucherTypeName

Width : 16

Space Left : 2 mms

Border : Thin Left Right

[Field:BWRBilledQty]

Use : BWRActulQty

Set as : $TotBillQty

Width : 16

Space Left : 2 mms

Border : Thin Right

[Field:BWRAmount]

Use : BWRDefault

Set as : $TotAmount

Type : Amount

Width : @@AmountWidth

Format : "No Zero, Symbol," + ##ShowForex

Align : Right

Key : Calculator

Max : @@MaxNumberWidth

Width : 16

Space Right : 2 mms

Border : Thin Right

Tooltip : "Amount Without TAX"

[Part:BWRTotals]

Line : BWRTotal

[Line:BWRTotal]

Border : Totals

Use : BWRDetails

Local : Field : Default : Type : String

Local : Field : Default : Align : Right

Local : Field : Default : Style : Large Bold

Local : Field : Default : Border : Thin Left

Local : Field : SWSno : Set as : ""

Local : Field : BWRPARTYNAME1 : Set as : "Grand Total"

Local : Field : BWRPARTYVATNo : Set as : ""

Local : Field : BWRPARTYGSTNo : Set as : ""

Local : Field : BWRActulQty : Set as : $$Total:BWRActulQty

Local : Field : BWRBilledQty : Set as : $$Total:BWRBilledQty

Local : Field : BWRAmount : Set as : $$Total:BWRAmount

Local : Field : BWRAmount : Border : Thin Left Right

Local : Field : BWRAmount : Align : Right

[Part:BWRExplode]

Line : BWRExplode

Repeat : BWRExplode:BWRPartyExplode

Border : Thin Bottom

[Line:BWRExplode]

Use : BWRDetails

Delete : Border

Local : Field : SWSno : Set as : ""

Local : Field : Default : Style : Normal Italic

Local : Field : BWRPARTYNAME1 : Set as : $ItemName

Local : Field : BWRPARTYNAME1 : Align : Right

Local : Field : BWRPARTYVATNo : Set as : "TAX Rate"

Local : Field : BWRPARTYVATNo : Align : Right

Local : Field : BWRPARTYGSTNo : Set as : "HSN Code"

Local : Field : BWRPARTYGSTNo : Align : Right

Local : Field : BWRActulQty : Type : Quantity

Local : Field : BWRActulQty : Set as : $SubActQty

Local : Field : BWRBilledQty : Type : Quantity

Local : Field : BWRBilledQty : Set as : $SubBillQty

Local : Field : BWRAmount : Set as : $SubAmount

[Button:BtnBroker]

Key : F6

Action : Execute : BrokerReportWise

Title : Broker Wise

Inactive: Not $EnableBroker:Company:##SVCurrentCompany

[Report:BrokerReportWise]

Form : BrokerReportWise

[Form:BrokerReportWise]

Part : BrokerReportWise

Space Left : 2 mms

Space Right : 2 mms

[Part:BrokerReportWise]

Line : BrokerReportWise,FilterTransport,FilterLoadman

[Line:BrokerReportWise]

Field : Medium Prompt,BrokerReportWise

Local : Field : Medium Prompt : Set as : "Select Broker Name:"

Space Bottom : 2 mms

[Field:BrokerReportWise]

Table : BrokerNameColl,EndOfList

ShowTable : Always

Use : Name Field

Width : 20

Border : Thin Box

Variable : FilterBroker

Modifies : FilterBroker

[Line:FilterTransport]

Field : Medium Prompt,FilterTransport

Local : Field : Medium Prompt : Set as : "Select Transport Name:"

Space Bottom : 2 mms

[Field:FilterTransport]

Table : TransportNameColl,EndOfList

ShowTable : Always

Use : Name Field

Width : 20

Border : Thin Box

Variable : FilterTransport

Modifies : FilterTransport

[Line:FilterLoadman]

Field : Medium Prompt,FilterLoadman

Local : Field : Medium Prompt : Set as : "Select Loadman Name:"

Space Bottom : 2 mms

[Field:FilterLoadman]

Table : LoadmanNameColl,EndOfList

ShowTable : Always

Use : Name Field

Width : 20

Border : Thin Box

Variable : FilterLoadman

Modifies : FilterLoadman

[System:UDF]

EnableBroker : Logical : 4566

BrokerNameList : String : 4567

TransportList : String : 4568

LoadmanList : String : 4569

BrokerName : String : 4570

TransportName : String : 4571

LoadmanName : String : 4572

[System:Formula]

BWRFilter : $BrokerName=@@BrokerWise AND $TransportName=@@TransportWise AND $LoadmanName=@@LoadmanWise

BrokerWise : If $$IsEndOfList:##FilterBroker or ##FilterBroker="" Then $BrokerName Else ##FilterBroker

TransportWise : If $$IsEndOfList:##FilterTransport or ##FilterTransport="" Then $TransportName Else ##FilterTransport

LoadmanWise : If $$IsEndOfList:##FilterLoadman or ##FilterLoadman="" Then $LoadmanName Else ##FilterLoadman

BWRExplodeFilter: $PARTYNAME1=#BWRPARTYNAME1

[Collection: BWR Voucher]

Type : Vouchers : VoucherType

Child of : $$VchTypeSales

Belongs to : Yes

Fetch : Date,VoucherTypeName,PartyLedgerName,BasicPurchaseOrderNo,Amount,BrokerName,TransportName,LoadmanName

Fetch : Ledger:VATTinNumber,Ledger:partyGSTIN

Filter : BWRFilter,;Sales ;NotIsoptional Voucher

[Collection:BWRPartyWise]

Source Collection : BWR Voucher

Walk : Inventory Entries

By : PARTYNAME1 : $PartyLedgerName

Aggr Compute: TotActQty : Sum : $ActualQty

Aggr Compute: TotBillQty: Sum : $BilledQty

Aggr Compute: TotAmount : Sum : $Amount

Sort : Default : $PARTYNAME1

[Collection:BWRPartyExplode]

Source Collection : BWR Voucher

Walk : Inventory Entries

By : PARTYNAME1 : $PartyLedgerName

By : ItemName : $StockItemName

Aggr Compute: SubActQty : Sum : $ActualQty

Aggr Compute: SubBillQty: Sum : $BilledQty

Aggr Compute: SubAmount : Sum : $Amount

Filter : BWRExplodeFilter

[Collection:BrokerNameColl]

Type : BrokerNameList: Company

Childof : ##SVCurrentCompany

Format : $BrokerNameList,25

Title : List of Brokers

[Collection:TransportNameColl]

Type : TransportList: Company

Childof : ##SVCurrentCompany

Format : $TransportList,25

Title : List of Transports

[Collection:LoadmanNameColl]

Type : LoadmanList: Company

Childof : ##SVCurrentCompany

Format : $LoadmanList,25

Title : List of Loadmans

[Variable: PARTYNAME1]

Type : String

Repeat : ##DSPRepeatCollection

[Variable:FilterBroker]

Type : String

[Variable:FilterTransport]

Type : String

[Variable:FilterLoadman]

Type : String

[System:Variables]

FilterBroker : ""

FilterTransport : ""

FilterLoadman : ""

Tally Chapter 142 Tdl for Stock Closing Balance Toolbar Button By Rajiv Mishra Computer Class

 

Few lines are missing here. Kindly watch full video for complete code

;;----------GatewayofTaly menu by Rajiv---

[#Menu: Gateway OF Tally]

Add: Toolbar Buttons: StockItemhotkey

[#Form: Default]

Add: Toolbar Buttons: before : HelpButton : StockItemhotkey

[button: StockItemHotKey]

Key: ALT + L

Action: alter : StockItemclosingbalance

Title: " Stock Qty Balance"

[Report: StockItemclosingbalance]

Form: StockItemclosingbalance

Title: "StockItem Balance"

[Form: StockItemclosingbalance]

No Confirm: yes

Part: StockItemclosingbalance

Option: Normal size form

[Part: StockItemclosingbalance]

Line: StockItemclosingbalance

[Line: StockItemclosingbalance]

Field: StockItemselect, Short Name field

Local: Field: Short name field : Set as: $closingbalance:StockItem:#StockItemselect

Tally Chapter 141 TDL for Toolbar Buttons By Rajiv Mishra Computer Class

 

[#Menu: Gateway OF Tally]

Add: Toolbar Buttons: Notepad, Word, Excel, Tally, Powerpoint, My Computer, Paint, Chrome

[#Form : Default]

Add: Toolbar Buttons: before : HelpButton : Notepad, Word, Excel, Tally, Powerpoint, My Computer, Paint, Chrome

[Button : Chrome]

Title : $$LocaleString:"Chrome"

Key : Ctrl + C

Action : Exec Command : Chrome.exe

[Button : Paint]

Title : $$LocaleString:"Paint"

Key : Ctrl + P

Action : Exec Command : mspaint.exe

[Button : My Computer]

Title : $$LocaleString:"MyComputere"

Key : Ctrl + A

Action : Exec Command : My computer.exe

[Button : Notepad]

Title : $$LocaleString:"Notepad"

Key : Ctrl + O

Action : Exec Command : Notepad.exe

[Button : Word]

Title : $$LocaleString:"Word"

Key : Ctrl + D

Action : Exec Command : WinWord.exe

[Button : Excel]

Title : $$LocaleString:"Excel"

Key : Ctrl + X

Action : Exec Command : Excel.exe

[Button : Tally ]

Title : $$LocaleString:"Tally"

Key : Ctrl + Y

Action : Exec Command : tally.exe

[Button : Powerpoint]

Title : $$LocaleString:"Powerpoint"

Key : Ctrl + R

Action : Exec Command : Powerpoint.exe

Tally Chapter 140 TDL for Hotel Booking By Rajiv Mishra Computer Class

 

Few lines of the code is missing here. Pls watch the full video for full code.

;;----------Gate way of Taly menu by Rajiv---

[#Menu:Gate Wayof Tally]

;; you can write the menu without space Gatewayoftally--

Add : Item : RajDarbar Room Reservation : Display : RajDarbar

;;--- you can change the item name--

[Report : RajDarbar]

Variable     : SVFromDate, SVToDate

Set         : SVfromDate     : ##SVDate

Set         : SVToDate     : ##SVCurrentDate

Form         : RajDarbar

[Form : RajDarbar]

    Parts         : DSP Company Name, DSP Company Address

    Use         : DSP Template

    Height         : 100% Screen

;;-- you can increase decrees height width  lke 50% screen--

    Width         : 100% Screen

    ;BackGround     : Dodger Blue;Canary Yellow

   ;; this color is defined belo. You can even type the color name directly here like Red

 Space Top     : If $$InPrintMode Then 0.5 Else 0 inches

    Part         : RajDarbar Tit, RajDarbarInformationpart

    Button          : PrintButton, ExportButton,F2 ChangePeriod

    Bottom ToolBar Button    : BottomToolBarBtn8, BottomToolBarBtn9, BottomToolBarBtn10, BottomToolBarBtn11, BottomToolBarBtn12

[Part : RajDarbar Tit]

    Line         : RajDarbar Tit Line, BkdDate Field

[Line : RajDarbar Tit Line]

    Field : RajDarbar Tit Field

[Field : RajDarbar Tit Field]

    Use         : Name Field

    Set as         : "RajDarbar Booking"

    Align         : Center

    Width         : 100% screen

    Style         : Large Bold

    ;Background    : Dodger Blue;Viridian

    Print FG    : Black

    Color        : Dodger Blue;Canary Yellow

    Widespaced    : Yes

[Line : BkdDate Field]

    Field : Bkd Details Report

[Field : Bkd Details Report]

    Use            : Name Field

    Set as         : "Details for the period " + $$String:##SVFromDate +" to "+ $$String:##SVToDate

    Width         : 100% screen

    Align          : Center

    Style          : Normal Bold Italic

    ;Background    : Dodger Blue;Viridian

    Print FG    : Black

    Color        : Dodger Blue;Canary Yellow

[Part:RajDarbarInformationpart]

    Line         : RajDarbar Details ReportcolumnTitles, RajDarbar Details ReportInfo

    Repeat         : RajDarbar Details ReportInfo : SKC1collection2

    Scroll         : Vertical

    Common Border     : Yes

    Bottom Line     : RajDarbar Details ReportTotals

    Total         : total1, Advancee, BalancePay

[Line : RajDarbar Details ReportcolumnTitles]

    Border     : Column Titles

    Use     : RajDarbar Details ReportInfo

    Local    : Field:Default:Color:Black

    Local    : Field:Default:Type: String

    Local    : Field:Default:Align: Center

    Local     : Field : SNo2 : Set as: "SR.No"

    Local    : Field:SNo2:Background:Green

    Local    : Field : CName: Set as: "Name"

    Local    : Field:CName:Background:Yellow

    Local     : Field : RmNo     : Set as: "Room No"

    Local    : Field:RmNo:Background:Green

    Local     : Field : Advancee: Set as: "Advance"

    Local     : Field : Advancee:Background    : Green

    Local     : Field : Bkd Date     : Set as: "Chk in Date"

    Local    : Field:Bkd Date:Background:Green

    Local     : Field : ODate     : Set as: "Chk out Date"

    Local    : Field:ODate:Background:Yellow

    Local     : Field : Total1     : Set as: "Total"

    Local    : Field:Total1:Background:Yellow

    Local     : Field : BalancePay    : Set as: "Balance Due"

    Local    : Field: BalancePay :Background:Yellow

[Line : RajDarbar Details ReportInfo]

        Fields: SNo2, Cname, RmNo, Bkd Date, ODate, Total1, Advancee, BalancePay

        Border : Thin Top Bottom

        Local : Field : Default : Color : If ##ChkinDate > @@ChkoutPayDate Then "Blue" else "black"

        Local : Field : Default : Background     : If ##ChkinDate > @@ChkoutDate Then "grey" else "canary Yellow"

[Line: RajDarbar Details ReportTotals]

    Use : RajDarbar Details ReportInfo

;    Fields : SNo1, CName, Bkd Date,Odate,Advancee,RmNo

    Local : Field : SNo2         : Set as: ""

;    Local : Field : SNo2         : Delete: Border

    Local : Field : Cname     : Set as: "    "

;    Local : Field : Cname     : Delete: Border

    Local : Field : Bkd Date     : Set as: ""

;    Local : Field : Bkd Date     : Delete: Border

    Local : Field : RmNo     : Set as: ""

;    Local : Field : RmNo     : Delete: Border

    Local : Field : ODate     : Set as: ""

;    Local : Field : Odate    : Delete: Border

    Local : Field : Total1     : Set as: $$Total:Total1

;    Local : Field : Total1     : Border : Thin Left Right

    Local : Field : Advancee     : Set as: $$Total:Advancee

;    Local : Field : Advancee     : Delete: Border

    Local : Field : BalancePay     : Set as: $$Total:BalancePay

   

[Field : SNo2]

    ;Use     : Number Field

    Set as     : $$Line

    Width     : 5

    Style     : Normal

    Align     : Center

    Border     : Thin Left

[Field :Cname]

    Use     : Name Field

    Set as     : $Name

    Width     : 25

    Style     : Normal

    Border     : Thin Left

    Option     : Alter on Enter

    Alter     : Ledger

    ;Variable: Ledger Name

    ;Display    : Premium Paid Statement

[Field : RmNo ]

    Use     : Name Field

    Set as     :     $Room

    Width     : 10

    Style     : Normal

    Align    : Centre

    ;Border     : Thin Box    

;Space Right:0

   

[Field :Advancee]

    Use     : Amount Field

    Set as     :$Advance

    Width     : 15

    Style     : Normal Bold

    Border     : Thin Left right

    Align     : Right

    ;BackGround    : Green

    ;Color        : Yellow

[Field :BKd Date]

    Use     : Short Date Field

    Set as     : $Chkin

    Width     : 15

    Style     : Normal

    Border     : Thin Left

    Align     : Center

[Field : Odate]

    Use     : Short Date Field

    Set as     : $Chkout

    Width     : 15

    Style     : Normal

    Border     : Thin Left

    Align     : Center

[Field : Total1]

    Use     : Amount Field

    Set as     : $Total

    Width     : 15

    Style     : Normal Bold

    Border     : Thin Left Right

    Align    : Right

[Field : BalancePay]

    Use     : Amount Field

    Set as     : $Total - $Advance

    Width     : 15

    Style     : Normal Bold

    Border     : Thin Left Right

    Align    : Right

[Collection:RajDarbar]

Type         : Vouchers : group

Childof     : @@GroupHead

Belongs To     : Yes

;Fetch         : SNo2, CName, Bkd Date,Odate,Advancee

[Collection:SKC1collection2]

    Type         : Ledger

    Child Of     : @@GroupHead

    Belongs To     : Yes

;[Color: yellow green]

;    RGB: 154,205,50

;[Color: Canary Yellow]

;    RGB: 255,239,0

;[Color: Dodger Blue]

;    RGB: 31,159,205

;[Color: Electric Blue]

;    RGB: 125,249,255

;[Color: Viridian]

;    RGB: 64,130,109

;[Color:caribbean green]

;    RGB:0,204,153

[#Part: MST LED Details]

Add : Line : At End: Name,Chkin,Chkout,Advance,Total,Room

[System : Formula]

GroupHead : "Room Reservation"

[Line : Name]

    Field        : Long Prompt,Name

    Local        : Field:Long Prompt : Set as : "Name"

    Invisible    : $Parent! = @@GroupHead

    ;Invisible    : Not ($$IsBelongsTo:$$GroupInvestments)

    Local    : Field    : Long Prompt : Color : white

    Local    : Field    : Long Prompt : Background : Leaf Green

    Local    : Field    : Long Prompt : Border : Thin Box

    Local    : Field    : Long Prompt : Style : Tiny Bold

   

[Line : Room ]

    Field        : Long Prompt,Room

        Local        : Field:Long Prompt : Set as : "Room No"

    Invisible    : $Parent! = @@GroupHead

    ;Invisible    : Not ($$IsBelongsTo:$$GroupInvestments)

    Local    : Field    : Long Prompt : Color : white

    Local    : Field    : Long Prompt : Background : Leaf Green

    Local    : Field    : Long Prompt : Border : Thin Box

    Local    : Field    : Long Prompt : Style : Tiny Bold

[Line : Advance]

    Field        : Long Prompt,Advance

    Local        : Field:Long Prompt : Set as : "Advance"

    Invisible    : $Parent! = @@GroupHead

    ;Invisible    : Not ($$IsBelongsTo:$$GroupInvestments)

    Local    : Field    : Long Prompt : Color : white

    Local    : Field    : Long Prompt : Background : Leaf Green

    Local    : Field    : Long Prompt : Border : Thin Box

    Local    : Field    : Long Prompt : Style : Tiny Bold

[Line : Chkin]

    Field        : Long Prompt,Chkin

    Local        : Field:Long Prompt : Set as : "Check-in"

    Invisible    : $Parent! = @@GroupHead

    ;Invisible    : Not ($$IsBelongsTo:$$GroupInvestments)

    Local    : Field    : Long Prompt : Color : white

    Local    : Field    : Long Prompt : Background : Leaf Green

    Local    : Field    : Long Prompt : Border : Thin Box

    Local    : Field    : Long Prompt : Style : Tiny Bold

[Line : Chkout]

    Field        : Long Prompt,Chkout

    Local        : Field:Long Prompt : Set as : "Check-out"

    Invisible    : $Parent! = @@GroupHead

    ;Invisible    : Not ($$IsBelongsTo:$$GroupInvestments)

    Local    : Field    : Long Prompt : Color : white

    Local    : Field    : Long Prompt : Background : Leaf Green

    Local    : Field    : Long Prompt : Border : Thin Box

    Local    : Field    : Long Prompt : Style : Tiny Bold

[Line : Total]

    Field        : Long Prompt,Total

    Local        : Field:Long Prompt : Set as : "Total"

    Invisible    : $Parent! = @@GroupHead

    ;Invisible    : Not ($$IsBelongsTo:$$GroupInvestments)

    Local    : Field    : Long Prompt : Color : white

    Local    : Field    : Long Prompt : Background : Leaf Green

    Local    : Field    : Long Prompt : Border : Thin Box

    Local    : Field    : Long Prompt : Style : Tiny Bold

[Field : Name]

    Use        : Name Field

    Storage     : Name

    Color         : Red

    Background     : Released Pale Yellow

    Border         : Thin Box

    Style         : Normal Bold

    Fullwidth    : Yes

    Align        : Left

[Field : Chkin]

    Use        : Uni Date Field

    Storage     : Chkin

    Color         : Red

    Background     : Released Pale Yellow 

    Border         : Thin Box

    Style         : Normal Bold

    Fullwidth    : Yes

    Align        : Left

[Field : Chkout]

    Use        :Uni Date Field

    Storage     : Chkout

    Color         : Red

    Background     : Released Pale Yellow

    Border         : Thin Box

    Style         : Normal Bold

    Fullwidth    : Yes

    Align        : Left

[Field : Advance]

    Use        : Amount Field

    Storage     : Advance

    Fullwidth    : Yes

    Color         : Red

    Background     : Released Pale Yellow

    Border         : Thin Box

    Style         : Normal Bold

[Field : Room]

    Use        : Number Field

    Storage     : Room

    Fullwidth    : Yes

    Color         : Red

    Background     : Released Pale Yellow

    Border         : Thin Box

    Style         : Normal Bold

    Align           : Left

[Field : Total]

    Use        :  Amount Field

    Storage     : Total

    Fullwidth    : Yes

    Color         : Red

    Background     : Released Pale Yellow

    Border         : Thin Box

    Style         : Normal Bold

[System : UDF]

Name         : String     : 2101

Advance     : Amount     : 2103

Chkin    : Date        : 2103

Chkout     : Date         : 2104

Room      : Number     : 2105

Total     : Amount     : 2106

;; Happy Ending ----

Tally Chapter 139 TDL for Stock Item Expiry Report by Rajiv Mishra Computer Class

 

Few lines of the code is Missing. Watch the full video for complete code.

[#Menu: Gateway of Tally]

Add : Key Item : "Expiry Report ": E : Display : EBXRptMain : $$IsAccountingOn:$$CurrentCompany

[Report: EBXRptMain]

Title : "Stock Item Expiry report "

Print Set : Report Title : "Stock Item Expiry report"

Variable : SVFromDate, SVToDate, IsItemBatchReport

Set : SVFromDate : $$MonthStart:##SVCurrentDate

Set : SVToDate : $$MonthEnd:##SVCurrentDate

Form : EXRptMain

[Form: EXRptMain]

Part : PMainTitle , PExpiryTitle, PExpiryBody

Background : Released Pale Yellow

Buttons : PrintButton, ExportButton, ChangePeriod

Bottom Toolbar Buttons : BottomToolBarBtn1, BottomToolBarBtn8, BottomToolBarBtn9, BottomToolBarBtn10, BottomToolBarBtn11, BottomToolBarBtn12

Space Top : if $$InPrintMode Then ##SVSpaceTop else 0.05 inches

Space Bottom : if $$InPrintMode Then 0.5 else 0 inches

Space Left : if $$InPrintMode AND $$InPixelMode then 0.5 else 0 inches

Space Right : if $$InPrintMode AND $$InPixelMode then 0.25 else 0 inches

Option : Small Size Form : NOT $$InPrintMode

Width : 100% Screen

Height : 100% Screen

[Part: PMainTitle]

Line : LMainTitle

Invisible : $$InPrintMode

[Line: LMainTitle]

Field : Name Field

Right Field: Simple Field

Local : Field: Name Field : Set as: "Stock Expiry Report"

Local : Field: Simple Field : Set as: $$String:##SVFromDate + " to " + $$String:##SVToDate

Local : Field: Simple Field : Width : 30 % Page

Local : Field: Simple Field : Align : Right

[Part: PExpiryTitle]

Line : LExpiryTitle

Border : Column Titles

[Line: LExpiryTitle]

Field : FSrNo,FSrNo2,FIName

Right Field: FMfdOn,FExpiryDt,FRemainDays, FCloValue,FCloQty

Local : Field : Default : Type : String

Local : Field : Default : Align : Center

Local : Field : Default : Style : Normal Bold

Local : Field : Default : Line : 0

Local : Field : FSrNo2 : Set As : ""

Local : Field : FSrNo : Set As : "Sr.No"

Local : Field : FIName : Set as : "Item Name"

Local : Field : FGrpName : Set as : "Group Name"

Local : Field : FStkCat : Set as : "Category"

Local : Field : FStkUnit : Set as : "Units"

Local : Field : FStkGodown : Set as : "Godown Name"

Local : Field : FMfdOn : Set as : "Mfd. Date"

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

Local : Field : FCloValue : Set as : "Stock Value"

Local : Field : FRemainDays : Set as : "Remain Days As On " + $$String:#SVToDate

Local : Field : FCloQty : Set as : "Closing Stock"

[Part: PExpiryBody]

Line : LExpiryBody

Repeat : LExpiryBody : CStkItem

Bottom Line: LExpiryTotal

Scroll : Vertical

Common Border : Yes

Total : FCloValue, FCloQty

[Line: LExpiryBody]

Field : FSrNo,FSrNo2, FIName, StockItemName

Right Field: FMfdOn,FExpiryDt,FRemainDays, FCloValue,FCloQty; FStkGodown,

Local : Field : Default : Style : Normal

Local : Field : FCloQty : Set as: $StkClBalance

Local : Field : FStkGodown : Set as : ""

Local : Field : FSrNo2 : Set As : ""

Local : Field : FSrNo2 : Width: 1

Local : Field : StockItemName : Set as: $Name

Local : Field : StockItemName : Invisible: YES

Local : Field : Default : Color : Blue

Border : Thin Top

Explode : PBatchWise : Yes

[Field: FRemainDays1]

Use: FRemainDays

Set as : ""

[Collection: CStkItem]

Type : Stock Item

Filter : IsItemBatchEnabled

[Collection: CExpirySrc]

Type : Batch

Fetch : Name, Parent, ExpiryPeriod, ClosingBalance, GodownName, MfdOn, ClosingAsOnDate

Child of: #FIName

[Collection: CExpiry]

Use : CExpirySrc

Compute : DRemain :($$Date:$Expiryperiod) - ($$Date:#SVToDate)

Compute : GodownName : $GodownName

Sort : @@Default : $DRemain

[Collection: CGodExp]

Type : Batch

Child of : #StockItemName

Fetch : GodownName, BatchName, IsBatchWiseOn, Name, OpeningBalance

Fetch : OpeningValue, StkClBalance, TBalClosing, StkOpBalance, TBalOpening, TBalCredits, StkOutQty, StkInQty, TBalDebits

Fetch : ClosingRate

Filter : BatchIngdwn, IsGodownofBalType

Compute : IsEmptyObject : $$IsEmptyObject

Compute : IsWithItems : Yes

[Part:pBatchWise]

Line : LBatchWise

Repeat : LBatchWise : CExpiry

Scroll : Vertical

[Line: LBatchWise]

Field : FSrNo, FSrNo2 ,FIName

Right Field: FMfdOn,FExpiryDt,FRemainDays, FCloValue,FCloQty; FStkGodown,

Local : Field : FSrNo : Set As : ""

Local : Field : FIName : Indent : 1

Local : Field : FSrNo2 : Set As : $$String:$$Line + " :"

Local : Field : FSrNo2 : Width : 3

Local : Field : FSrNo2 : Style : Normal

Local : Field : Default : Style : Normal Italic

Local : Field : Default : Color : If $$Number:#FRemainDays <= 0 Then @@SV_FIELD1 else @@SV_FIELD10

[Line:LExpiryTotal]

Border : Totals

Field : FSrNo,FSrNo2,FIName

Right Field: FMfdOn,FExpiryDt,FRemainDays, FCloValue,FCloQty; FStkGodown,

Local : Field : Default : Type : String

Local : Field : Default : Align : Center

Local : Field : Default : Line : 0

Local : Field : Default : Style : Normal

Local : Field : FSrNo : Set As : ""

Local : Field : FSrNo2 : Set As : ""

Local : Field : FSrNo : Border: Thin Right

Local : Field : FIName : Set as : ""

Local : Field : FStkGodown : Set as : ""

Local : Field : FMfdOn : Set as : ""

Local : Field : FExpiryDt : Set as : ""

Local : Field : FRemainDays : Set as : ""

Local : Field : FCloValue : Set as : $$Total:FCloValue

Local : Field : FCloQty : Set as : $$Total:FCloQty

[Field: FDif1]

Use : Name Field

Border : Thin Left

Align : Center

Style : Normal

[Field: FDif2]

Use : FDif1

Align : Left

[ Field : FSrNo]

Use : FDif1

Set as : $$Line

Width : 5

[ Field : FSrNo2]

Use : FSrNo

Border : Thin Left

Align : Right

[ Field : FIName]

Use : FDif2

Set as : $Name

Full Width: YES

Delete: Border

[ Field : FBatchName]

Use : FDif2

Set As : $BatchName

Width : 12

[ Field :FMfdOn]

Use : Uni Date Field

Set As : $MfdOn

Align : Center

Border : Thin Left

Width : 8

[ Field : FExpiryDt]

Use : FMfdOn

Set As : $Expiryperiod

Tally Chapter 138 TDL for Monthly Distach Item & Party wise By Rajiv Mishra Computer Class

 few lines are missing here. Watch the lesson Video for complete code.

 : Y : Display : STQueryCSknl : NOT $$IsEmpty:$$SelectedCmps 

[Report: STQueryCSknl]

Use : DSP Template

Form : STQueryCSknl

Title : "Month Wise Dispatch"

PrintSet : Report Title : "Month Wise Item Wise Total sales"

 Variable : SV Print Orientation : String

 Variable : ETNETNPartyMatInNameLed : String

Set : ETNETNPartyMatInNameLed : ""

 Variable : ETNETNPartyMatInItemNameLedItem : String

Set : ETNETNPartyMatInItemNameLedItem : ""

[Form: STQueryCsKnl]

Use : DSP Template

Parts : DB Title, STQueryCSknl

Delete : Buttons : ExplodeFlag

Delete : Bottom Buttons : DSPAutoColumns, BudgetAnalysis, ReportConfig

Local: Line : DB Title : Local : Field : Name Field: Set as : "Month Wise Item Wise Total Sales"

background : White

 Button :Print Button,Export Button,ETNETNPartyMatIn,ETNETNPartyMatInItem

 Set Always : SV Print Orientation : "Landscape"

[Button : ETNETNPartyMatInItem]

Key : Alt+I

Title : Stock Item

Action : Alter:ETNETNPartyMatInItemNameLedItem

[Report: ETNETNPartyMatInItemNameLedItem]

Form : ETNETNPartyMatInItemNameLedItem

[Form : ETNETNPartyMatInItemNameLedItem]

Part: ETNETNPartyMatInItemNameLedItem

 

[Part :ETNETNPartyMatInItemNameLedItem]

Line: ETNETNPartyMatInItemNameLedItem

 

[Line : ETNETNPartyMatInItemNameLedItem]

Field: ETNETNmyfield,ETNETNPartyMatInItemNameLedItem

[Field :ETNETNPartyMatInItemNameLedItem]

Use : name Field

Table : ETNETN Stock Item  ME

Show Table : Always

Variable:ETNETNPartyMatInItemNameLedItem

Modifies : ETNETNPartyMatInItemNameLedItem

 [Field :ETNETNmyfield]

Use : name Field

Table : ETNETN Stock Item  new

Show Table : Always

storage : ETNETNmyme

 [system : udf]

ETNETNmyme : string : 8654

[Collection: ETNETN Stock Item  new]

    Type: Stock Item

     

    BelongsTo: Yes

Fetch  : Name, Parent

Format : $Parent,30

 

[Collection: ETNETN Stock Item  ME]

    Type: Stock Item

     

    BelongsTo: Yes

   Filter :ETNETN jobi1

[System:formula]

ETNETNjobi1:$$IsEqual:$parent:$$LocaleString:#ETNETNmyfield

; select ledger starts from here

 

 

[Button : ETNETNPartyMatIn]

Key : Alt+V

Title : Select Ledger

Action : Alter:ETNETNPartyMatInNameLed

[Report: ETNETNPartyMatInNameLed]

Form : ETNETNPartyMatInNameLed

[Form : ETNETNPartyMatInNameLed]

Part: ETNETNPartyMatInNameLed

[Part :ETNETNPartyMatInNameLed]

Line: ETNETNPartyMatInNameLed

[Line : ETNETNPartyMatInNameLed]

Field: ETNETNPartyMatInNameLed

[Field :ETNETNPartyMatInNameLed]

Use : name Field

Table : ETNETN My Ledger

Show Table : Always

Variable:ETNETNPartyMatInNameLed

Modifies : ETNETNPartyMatInNameLed

[Collection: ETNETN My Ledger]

    Type: Ledger

    ChildOf: $$GroupSundryDebtors

    BelongsTo: Yes

[Part: STQueryCSknl]

Lines : STQueryCSknlT, STQueryCSknl

Repeat : STQueryCSknl : SItemCollCSknl

Scroll : both

Common Borders : Yes

Total : OpQtyCSknl, InQtyCSknl, ConsQtyCSknl, ProdQtyCSknl, OutwQtyCSknl, ClosQtyCSknl,qtyoct,qtynov,qtydec,qtyjan,qtyfeb,qtymar,QTYTOTAL

[Line: STQueryCSknlT]

Use : STQueryCSknl

Local : Field : Default : Type : String

Local : Field : Default : Align : Center

Local : Field : Default : color : Blue

Local : Field : Default : background :Yellow

Local : Field : Default : Lines : 0

Local : Field : ItemNameCSknl : Align : Left

Local : Field : ItemNameCSknl : Set as: "ITem Name"

Local : Field : OpQtyCSknl : Set as: "APR"

Local : Field : InQtyCSknl : Set as: "MAY"

Local : Field : ConsQtyCSknl : Set as: "JUN"

Local : Field : ProdQtyCSknl : Set as: "JUL"

Local : Field : OutwQtyCSknl : Set as: "AUG"

Local : Field : ClosQtyCSknl : Set as: "SEP"

Local : Field : qtyoct : Set as: "OCT"

Local : Field : qtynov : Set as: "NOV"

Local : Field : qtydec : Set as: "DEC"

Local : Field : qtyjan : Set as: "JAN"

Local : Field : qtyfeb : Set as: "FEB"

Local : Field : qtymar : Set as: "MAR"

Local : Field : qtyTOTAL : Set as: "TOTAL"

Border : column titles

 

[Line: STQueryCSknl]

Fields : ItemNameCSknl, OpQtyCSknl, InQtyCSknl, ConsQtyCSknl +

, ProdQtyCSknl, OutwQtyCSknl, ClosQtyCSknl,qtyoct,qtynov,qtydec,qtyjan,qtyfeb,qtymar

right field : qtytotal

Repeat : ClosQtyCSknl

Option : AlterOnEnter

[Field: ItemNameCSknl] 

 Set As : $Stockitem

 

 Display : Item Monthly Summary

 Variable  : StockitemName

 Border: thin Left right

width : if $$inprintmode then 18 else 36

Style : Normal

[Field: OpQtyCSknl] 

Use : Qty Primary Field

Style : Normal

Format : "No Zero"

Set as : $QtyApr

Border : Thin Left Right

Width : if $$inprintmode then 7 else 8

;Scroll : Yes

;Display : Stock Summary

[Field: InQtyCSknl]  

Use : OpQtyCSknl

Set As : $QtyMay

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: ConsQtyCSknl] 

Use : InQtyCSknl

Set As : $QtyJun

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: ProdQtyCSknl] 

Use : InQtyCSknl

Set As : $QtyJul

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: OutwQtyCSknl] 

Use : InQtyCSknl

Set As : $QtyAug

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: ClosQtyCSknl]  

Use : InQtyCSknl

Set As : $QtySep

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: qtyoct] 

Use : InQtyCSknl

Set As : $Qtyoct

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: qtynov] 

Use : InQtyCSknl

Set As : $Qtynov

Border : Thin Right

Style : Normal

 Width : if $$inprintmode then 7 else 8

[Field: qtydec] 

Use : InQtyCSknl

Set As : $Qtydec

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: qtyjan] 

Use : InQtyCSknl

Set As : $Qtyjan

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: qtyfeb] 

Use : InQtyCSknl

Set As : $Qtyfeb

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: qtymar] 

Use : InQtyCSknl

Set As : $Qtymar

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: qtytotal] 

Use : InQtyCSknl

Set As : $QtyTotal

Border : Thin Right

Style : Normal bold

Width : if $$inprintmode then 7 else 8

[Collection: Voucher CollectionCSknl]

Type : Vouchers : VoucherType

 Child of : $$VchTypeSales

 Belongs to : yes

 Fetch  : Date,All Inventory Entries

;Filter : zerovaluefilter

Filter : PartyFilterMatLedETNETN

 

[Collection: SItemCollCSknl]

Source Collection : Voucher CollectionCSknl

Walk : All Inventory Entries

By : Stockitem : $StockItemName  

Aggr Compute : Qtyapr : Sum : If @@CSknlSaleVr and @@dateapr Then $BilledQty Else 0

Aggr Compute : Qtymay : Sum : If @@CSknlSaleVr and @@datemay Then $BilledQty Else 0

Aggr Compute : Qtyjun : Sum : If @@CSknlSaleVr and @@datejun Then $BilledQty Else 0

Aggr Compute : Qtyjul : Sum : If @@CSknlSaleVr and @@datejul Then $BilledQty Else 0

Aggr Compute : Qtyaug : Sum : If @@CSknlSaleVr and @@dateaug Then $BilledQty Else 0

Aggr Compute : Qtysep : Sum :If @@CSknlSaleVr and @@datesep Then $BilledQty Else 0

 Aggr Compute : Qtyoct : Sum :If @@CSknlSaleVr and @@dateoct Then $BilledQty Else 0

Aggr Compute : Qtynov : Sum :If @@CSknlSaleVr and @@datenov Then $BilledQty Else 0

Aggr Compute : Qtydec : Sum :If @@CSknlSaleVr and @@datedec Then $BilledQty Else 0

Aggr Compute : Qtyjan : Sum :If @@CSknlSaleVr and @@datejan Then $BilledQty Else 0

Aggr Compute : Qtyfeb : Sum :If @@CSknlSaleVr and @@datefeb Then $BilledQty Else 0

Aggr Compute : Qtymar : Sum :If @@CSknlSaleVr and @@datemar Then $BilledQty Else 0

Aggr Compute : Qtytotal : Sum :If @@CSknlSaleVr Then $BilledQty Else 0

Sort : @@SortAlphaIncr : $partyledgername

 filter : PartyFilterMatItemETNETN

[System: Formula]

; zerovaluefilter : $AllLedgerEntries.BillAllocations.Amount <> ""

 PartyFilterMatLedETNETN: $Ledgername = ##ETNETNPartyMatInNameLed or $$IsSysName:##ETNETNPartyMatInNameLed

 PartyFilterMatItemETNETN:$StockItem = ##ETNETNPartyMatInItemNameLedItem or $$IsSysName:##ETNETNPartyMatInItemNameLedItem

CSknlPurc Vr : $$IsPurchase:$VoucherTypeName

CSknlSale Vr : $$IsSales:$VoucherTypeName

CSknlStock Jrnl Vr : $$IsStockJrnl:$VoucherTypeName

dateapr   : $$MonthOfDate:$date>=4 and $$MonthOfDate:$date<=4 

datemay : $$MonthOfDate:$date>=5 and $$MonthOfDate:$date<=5

datejun   : $$MonthOfDate:$date>=6 and $$MonthOfDate:$date<=6

datejul    : $$MonthOfDate:$date>=7 and $$MonthOfDate:$date<=7

dateaug  : $$MonthOfDate:$date>=8 and $$MonthOfDate:$date<=8

datesep  : $$MonthOfDate:$date>=9 and $$MonthOfDate:$date<=9

 dateoct  : $$MonthOfDate:$date>=10 and $$MonthOfDate:$date<=10

datenov  : $$MonthOfDate:$date>=11 and $$MonthOfDate:$date<=11

datedec  : $$MonthOfDate:$date>=12 and $$MonthOfDate:$date<=12

datejan  : $$MonthOfDate:$date>=1 and $$MonthOfDate:$date<=1

datefeb  : $$MonthOfDate:$date>=2 and $$MonthOfDate:$date<=2

datemar  : $$MonthOfDate:$date>=3 and $$MonthOfDate:$date<=3

Tally Chapter 137 TDL for Serial Number during voucher Entry by Rajiv Mishra Computer Class

 

few lines are missing in this. pls watch the full video for full coding.

[!Line : Global EI ColumnOne1]

add : fields: before:VCH ItemTitle : VCH SlNO

[field : vch slno]

use : name field

setas : "SL"

Align : Centre

width : 5

style : bold

Skip : yes

[#Line : EI InvInfo]

Option : Global EI InvInfo1

[#Line : CI InvInfo]

Option : Global EI InvInfo1

[!Line : Global EI InvInfo1]

add : fields:before: VCH StockItem : vchslno1

[field : vchslno1]

Set as : $$Line

Align : Centre

Width : 3

Skip : Yes

Learn Grammar with Fun

In this lesson, 

the teacher is helping learners to :-
understand Grammar topic is there / are there / how many by the Monkey song

Teaching Rules / Tricks:-

Golden Rule of Teaching

First, you should Enjoy your teaching!!

If you don't feel good in your own class, Never expect from your learners.
I always enjoy my all classes and it helps me to build up my teaching level up.
Try some teaching activities from our videos and see the outstanding results in your classroom. 

Involve yourself deeply in your teaching activity and you will see your learners are more interested than you.

Try some of these activities :-

https://youtube.com/playlist?list=PL3OwfzHiGFsBdw-C-J2irRc5HjT3BScBn

Watch the song and try to write the song lines in the comment box below

Tally Chapter 136 TDL for Search Voucher by Narration or voucher Number By Rajiv Mishra Computer Class

 

Few lines of the code is missing. pls watch the video for full coding.

[#Menu: Gateway of Tally]

Add : Key Item : Search Vouchers: H : Alter : RajivSVch

[Report:RajivSVch]

Form : FrmFindVoucher

Title : $$LocaleString:"Search Vouchers"

[Form: FrmFindVoucher]

Part : PrtFindVoucher

    Full Width  : No

    Space Right : 2

    Space Left  : 2

    Option      : Small Size Form

    Background  : Light Yellow

  On: Form Accept : Yes : Form Accept

On: Form Accept : Yes : Display : RajivSVch Entries in Daybook

[Part: PrtFindVoucher]

Line :LinImpReceiptV,LinImpReceiptV1,LinImpReceiptV2

[Line: LinImpReceiptV]

Fields : Long Prompt, Name Field;, vaibhfield

Local: Field: Long Prompt : Set As : "Type Narration or Voucher No. here"

Local: Field: Name Field : Modifies : xlsFilePath : Yes

[Line: LinImpReceiptV1]

Fields : custslipfld

[field : custslipfld]

info : "Subscribe our Channel "

full width : yes

align : centre

;;width : 75% screen

style : large 

[Line: LinImpReceiptV2]

Fields : custslipfld1

[field : custslipfld1]

info : "Rajiv Mishra YouTube Channel "

full width : yes

align : centre

;;width : 75% screen

style : large 

; Fields :vntfield1

; Space Top : 0.4

;[Field: vntfield1]

 ;   Set as          : $$LocaleString:"Thank you for watching"

  ;  Border          : Thin Bottom

[Report: RajivSVch Entries in Daybook]

Use : Daybook

Set : SVFromDate : $$FinYearBeg:##StartDate:$StartingFrom:Company:##SVCurrentCompany

Set : SVToDate : $$FinYearEnd:##StartDate:$StartingFrom:Company:##SVCurrentCompany

Set : ExplodeNarrFlag : Yes

Local : Collection : Default : Add : Filter : Dup Filter

; FetchValues : Date, VoucherTypeName, Narration

[System: Formula]

;Dup Filter : $Narration CONTAINS "Duplicated"

Dup Filter :if NOT $$IsEmpty:##xlsFilePath then $VoucherNumber CONTAINS ##xlsFilePath or $Narration CONTAINS ##xlsFilePath else  $Narration CONTAINS "Duplicated"

[Function: Voucher Duplication]

10 : WALK COLLECTION : TSPL Smp Company Vch

20  :   SET             : SVViewName : $$SysName:AcctgVchView

30 : NEW OBJECT : Voucher

40 : SET VALUE : Date : $Date

50 : SET VALUE : VoucherTypeName : $VoucherTypeName

60 : SET VALUE : Narration : $Narration + " Duplicated"

70 :   SET VALUE       : PersistedView : ##SVViewName

80 : WALK COLLECTION : LedgerEntries

90 : INSERT COLLECTION OBJECT : Ledger Entries

100 : SET VALUE : Ledger Name : $LedgerName

110 : SET VALUE : IsDeemedPositive : $IsDeemedPositive

120 : SET VALUE : Amount : $Amount

130 : SET TARGET : ..

140 : END WALK

150 : CREATE TARGET

160 : END WALK

170 : DISPLAY : RajivSVch Entries in Daybook

180 : RETURN

[Collection: TSPL Smp Company Vch]

Source Collection : Company Vouchers

Fetch : Date, VoucherTypeName, Narration, LedgerEntries.*

[System: Variable]

xlsFilePath: ""

-----------------

-----------------

-------------------

Tally Chapter 135 TDL for Daily sales amount after entry By Rajiv Mishra Computer Class

 

Few lines are missing here. Pls watch the full video for those lines.

[Field : TotSales]

Invisible   : NOT ##CurBalanceFlag 

    Field       : Simple Prompt, Amount Field

    Local       : Field : Simple Prompt : Info    : $$LocaleString:"Today's Total Sales:"

Local     : Field : Simple Prompt : Width   : 14

    Local       : Field : Amount Field  : Set as  : @@TrsTotSales

    Local       : Field : Amount Field  : Format  : "Symbol,DrCr"

Local       : Field : Amount Field : Set always : Yes

Local       : Field : Amount Field : Color : Black

[System : Formula]

    TrsTotSales     : $$FromValue:$Date:$$ToValue:$Date:$CreditTotals:Group:$$GroupSales  

 

;$$ToValue:$Date:$CreditTotals:Group:$$GroupSales  

Tally Chapter 134 TDL for Default Godaown Name By Rajiv Mishra Computer Class

 

Few lines are missing here. Pls Watch the video for full code.

Add : Line : At End :Use Default Godown,Default Godown Name

[Line :Use Default Godown]

Space Bottom   : 0.2

Field : Medium Prompt,Use Default Godown

        Local : Field : Medium Prompt : Set As : If ($$IsSales:$Parent Or $$IsPurchase:$Parent) Then "Use Default Godown" else ""

Local : Field : Medium Prompt :Invisible   : NOT $$IsMultiGodownOn

;;---Add here

Local : Field : Medium Prompt : Color : Blue

Local : Field : Medium Prompt : Border : Subtotals

[Field : Use Default Godown]

Use : Logical Field

Storage   : UseDefaultGodown

Inactive : NOT ($$IsSales:$Parent Or $$IsPurchase:$Parent)

Invisible       : NOT $$IsMultiGodownOn

[Line :Default Godown Name]

Field : Medium Prompt,Default Godown Name

        Local : Field : Medium Prompt : Set As : "Default Godown Name"

Local : Field : Medium Prompt : Inactive : If $UseDefaultGodown= "Yes"  then No else Yes

;;---Add here

Local : Field : Medium Prompt : Color : Blue

Local : Field : Medium Prompt : Border : Subtotals

[Field : Default Godown Name]

    Use         :  Godown Name Field

    Table       : List of Godowns

    sHOW Table  : Always

    Style       : Small Bold

    Width       : @@VCHGodownNameWidth

    Inactive : If $UseDefaultGodown= "Yes" then No else Yes

    Keys        : Create Godown, Alter Godown

    Variable    : SV Godown

    Storage     : DefaultGodownName

    

[System : UDF]

UseDefaultGodown : Logical: 2000

DefaultGodownName : String: 2000

[System : Formula]

UseDefaultGodown :  $UseDefaultGodown:VoucherType:##SVVoucherType = "Yes"

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

[#Field:VCHBatchGodown]

Option: VCS_VCH Batch Godown: @@UseDefaultGodown

[!Field: VCS_VCH Batch Godown]

Use         : Godown Name Field

Type        : String : Forced

Style       : Small

Delete : Table

Add:Table : List of Godowns, End of List:$$Line = 1 

Add:Table : End of List:$$Line > 1

   

Set as : $DefaultGodownName:VoucherType:##SVVoucherType

Set always  : Yes

Skip:If $$Line = 1 Then Yes else No

Tally Chapter 133 TDL for Salesman Wise Sales & Profit Report by Rajiv Mishra computer class

 Few lines of the code is missing here. Pls watch the full video for complete vode

[Line: CMP EnableSalesmanTable]

Field: Medium Prompt, CMP EnableSalesmanTable

Local: Field: Medium Prompt: Info: "Enable Salesman ? "

;;Invisible: NOT $$MODAdvInventory or NOT $IsInvoicingOn

Space Top: 1

[Field: CMP EnableSalesmanTable]

Use: Logical Field

Storage: EnableSalesman

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

Sub Form: SmReport: $$Value = "Yes"

[#Menu: Gateway Of Tally]

Add : Item : Sales Person Report : Menu : Salesman Menu

[Menu: Salesman Menu]

Add : Item : Sales Person Name : Alter : Salesman Name

Add : Item : Blank

Add : Item : Salesman Sales Report : Display : SmReport

Add : Item : Blank

[Report: Salesman Name]

Form : Salesman Name

Object : Company

[Form: Salesman Name]

Part : FormSubTitle, Saleman

;Button : Delete All, Remove Line, Restore Line, Restore All,Report Operations

FullWidth : No

Height : 90% Screen

Background : Light Yellow

SpaceRight : 0.5

SpaceLeft : 1.5

Local : Field : Form SubTitle : Info : $$LocaleString:"Salesman Name"

Option : Small Size Form

[Part: Saleman]

Lines : CMP Salesman

Repeat : CMP Salesman:mydbsalesman

Break on: $$IsEmpty:$SalesmanName

Scroll : Vertical

Height : 90% Screen

[Line: CMP Salesman]

Fields : Multi SNo, CMPSalemanName

Local : Field : Default : Delete : Border

[Field: CMPSalemanName]

Use : Short Name Field

Storage : SalesmanName

Unique : Yes

[System: UDF]

mydbsalesman : Aggregate: 999

SalesmanName : String : 1000 ;: Yes

[Collection : SalesmanNameCollection]

Type : mydbsalesman : Company

Childof : ##SVCurrentCompany

Format : $SalesmanName, 10

Title : Salesman Name

[#Part: EI BaseInfo]

Option: HPSalesmanName: $$IsSales:##SVVoucherType OR $$IsDelNote:##SVVoucherType

[!Part: HPSalesmanName]

Add: Line: HPSalesmanName

[Line: HPSalesmanName]

Add: Field: HPSalesmanNameTitle

Add: Field: VCHSalesmanName

[Field: HPSalesmanNameTitle]

Info : "Salesman: "

Width: 10

[Field: VCHSalesmanName]

Use : Name Field

Storage : VCHSalesmanName

Set as : $VCHSalesmanName

Width : 25

Table : SalesmanNameCollection, not applicable

Show Table: Always

Key : Create SalesmanName

[Key: Create SalesmanName]

Key :Alt + C

Action: CREATE: SalesmanName

[System: UDF]

VCHSalesmanName:String:375

 

TDLLic : $$CmpUserName:CompanyUsersCollection <> ÒadminÓ 

;; Limiting based on Company Users

[Report: SmReport]

Use : DSP Template

Form : PQRReport

Title : "Salesman Report"

Set : SVFromDate : $$MonthStart:##SVCurrentDate

Set : SVToDate : $$MonthEnd:##SVCurrentDate

Set : SalesManChqVar : "Full"

Set : SalesManName : ""

[Form: PQRReport] 

Use : DSP Template

Parts : PQRReport

Height : 100% screen

Width : 100% screen

Delete : Buttons: ExplodeFlag

Background:  Light Yellow

;Delete : Bottom Buttons: DSPAutoColumns, RelReports,BudgetAnalysis, ReportConfig

Bottom Toolbar Buttons : BottomToolBarBtn1, BottomToolBarBtn6, BottomToolBarBtn7, BottomToolBarBtn8, BottomToolBarBtn9, BottomToolBarBtn10, BottomToolBarBtn11, BottomToolBarBtn12, 

Add: Button: Salesmanfilter

[Part: PQRReport]

Lines:PQRTitile,PQRBody

BottomLines : PQRBody Total

Repeat : PQRBody:PQRSalesManVouchersColl

CommonBorder: Yes

Scroll : Vertical

Total:PQRPartyAmount,PQRVCHGP

[Line: PQRTitile]

Use:PQRBody

Local : Field : Default : Type : String

Local : Field : Default : Style : Tiny Bold

Local : Field : Default : Align : Centre

Local : Field : Default : set as : $$LocaleString:"S. No"

Local : Field : PQRPartyDate : Set as: $$LocaleString:"Date"

Local : Field : PQRPartyVchNo : Set as: $$LocaleString:"Vch No."

Local : Field : PQRPartyName : Set as: $$LocaleString:"Party Name"

Local : Field : PQRPartySalesMan: Set as: $$LocaleString:"SalesMan"

Local : Field : PQRVCHGP: Set as: $$LocaleString:"GrossProfit"

Local : Field : PQRVCHGPPER: Set as: $$LocaleString:"Profit%"

Local : Field : PQRPartyVchType : Set as: $$LocaleString:"Vch Type" 

Local : Field : PQRPartyAmount : Set as: $$LocaleString:"Amount"

Border : Flush Totals

[Line: PQRBody]

Field:PQRSno, PQRPartyDate,PQRPartyVchNo,PQRPartyName,PQRPartySalesMan,PQRVCHGP,PQRVCHGPPER,PQRPartyVchType

RightField:PQRPartyAmount 

Border :Thin Bottom

[Field:PQRSno]

Set as : $$Line

Width : 1.5 cm 

Align : Center

Border : Thin Left Right

[Field: PQRPartyDate]

Set as : $Date

Width : 9% Screen

Align : Right

;Style : Tiny

Border : Thin Left 

[Field: PQRPartyVchNo]

Set as : $VoucherNumber

Width : 9% Screen

Align : Center

;Style : Tiny

Border : Thin Left 

[Field: PQRPartyName]

Use : Name Field

Set as : $PartyLedgerName

Border : Thin Left 

Width : 38% Screen

Align : Left

;Style : Tiny

Variable: LedgerName

Display : Ledger Vouchers

[Field: PQRPartySalesMan]

Use :Name Field

Set as :$VCHSalesmanName

Border : Thin Left 

Width : 12% Screen

Align : Left

;Style : Tiny

Key : Create SalesmanName

[Field: PQRVCHGP]

Use :Amount Forex Field

Set as :$GrossProfit

Border : Thin Left 

Width : 10% Screen

Align : Left

;Style : Tiny

Key : Create SalesmanName

[Field:PQRVCHGPPER]

use : amount field

width: 10% Screen

Border:thin left

align: right

set as: $GROSSPROFIT/$GROSSREVENUE*100

[Field: PQRPartyVchType]

Set as : $VoucherTypeName

Border : Thin Left 

;Width : 15% Screen

Align : Left

;Style : Tiny

[Field: PQRPartyAmount]

Use : Amount Forex Field

Set as : $GROSSREVENUE

Border : Thin Left

;Width : 15% Screen

Align : Right

;Style : Tiny

Format : "No Zero,DrCr,Symbol," + ##ShowForex

[Line: PQRBody Total]

Use:PQRBody

Local : Field : Default : Type : String

Local : Field : Default : Style : Tiny Bold

Local : Field : Default : Align : Centre

Local : Field : PQRSno : Set as: ""

Local : Field : PQRPartyDate : Set as: ""

Local : Field : PQRPartyVchNo : Set as: ""

Local : Field : PQRPartyName : Set as: "TOTAL"

Local : Field : PQRPartyName : Align : Centre 

Local : Field : PQRPartySalesMan: Set as: ""

local : field : PQRVCHGP :set as: $$Total:pqrvchgp

local : field : PQRVCHGPPER :set as: $$Total:pqrvchgp/$$Total:PQRPartyAmount*100

Local : Field : PQRPartyVchType : Set as: ""

Local : Field : PQRPartyAmount : Set as: $$Total:PQRPartyAmount

Border : Flush Totals

[Button:SalesmanFilter]

Key : Alt+S

Action : Execute : SalesmanFilter

Title : Salesman Name

[Report:SalesmanFilter]

Form : SalesmanFilter

;Set : SalesmanName : ""

Set : SalesManChqVar : "Filter"

[Form:SalesmanFilter]

Part : SalesmanFilter

No Confirmation : Yes

[Part:SalesmanFilter]

Line : SalesmanFilter

[Line:SalesmanFilter]

Field : Medium Prompt,SalesmanFilter

Local : Field : Medium Prompt : Set as : "Select Salesman Name: "

[Field:SalesmanFilter]

Table : SalesmanNameCollection,EndOfList

ShowTable : Always

Use : Name Field

Width : 20

Border : Thin Box

Variable : SalesmanName

Modifies : SalesmanName

[Collection: PQRSalesManVouchersColl]

Type : Voucher

Fetch : Date, VoucherNumber, VoucherTypeName,LedgerName,PartyLedgerName,VCHSalesmanName,GrossProfit,GROSSREVENUE, LedgerEntries.*

Filter : PQRSaleManVouchers

Filter : SalesManFilter

[System:UDF]

EnableSalesman : Logical : 1000

Commission : Number : 1001

[Variable:SalesManName]

Type : String

[Variable:SalesManChqVar]

Type : String

[System:Variable]

SalesManName : ""

SalesManChqVar : ""

[System: Formula]

;PQRSaleManVouchers: $$IsSales:$VoucherTypeName OR $$IsDelNote:$VoucherTypeName

PQRSaleManVouchers: $$IsSales:$VoucherTypeName

SalesManWise : $VCHSalesmanName=@@SAlesManEOL

SalesManFull : $VCHSalesmanName=$VCHSalesmanName

SAlesManEOL : if $$IsEndOfList:##SalesManName then $VCHSalesmanName Else ##SalesManName

SalesManFilter : if ##SalesManChqVar="Filter" Then @@SalesManWise Else @@SalesManFull