Tally Chapter 110 TDL for Custom form to show Temporary Credit Sales Status By Rajiv Mishra Computer Class



 




[Report:TCSS]

Form:TCSS

Object:Company

[Form:TCSS]

Part:TCSS

Height:30% Screen

Width:50% Screen

Background: White

Space Bottom:0

Space Top:0

Space Left:0

Space Right:0

[Part:TCSS]

Part: TCSSPart1,TCSSPart2

Vertical: Yes

[Part: TCSSPart1]

Line:TCSSPart1

Border: Black Double Bottom



[Line:TCSSPart1]

Field:TCSSPart1Fld1

Right Field:TCSSPart1Fld2

[Field:TCSSPart1Fld1]

Use : Name Field

Info : " "

Width : 5% Screen

Border : Red Double Right

Lines : 2


[Field:TCSSPart1Fld2]

Use : Name Field

Info : $$NewLIne+"Temporary Credit Sales Status"

Align : Center

Style : Calibri Large Bold Italic Extra

Color : Black

Full Width : Yes

Lines : 1




[Part:TCSSPart2]

Line:TCSSTitle

Line:TCSS

Repeat:TCSS:TCSSAggr

Break On:$$IsEmpty:$NoteDate

Scroll:Vertical

Common Border: Yes


[Line:TCSSTitle]

Field:Short Name Field,SimpleField

Right Field:NameField

Local:Field:Short Name Field:Info: ""

Local:Field:Short Name Field:Width: 5% Screen

Local:Field:SimpleField:Info:"Date"

Local:Field:SimpleField:Style:Large Bold Italic

Local:Field:SimpleField:Border:Grey Thick left

Local:Field:SimpleField:Width: 8% Screen


Local:Field:NameField:Info:"Note"

Local:Field:NameField:Style:Large Bold Italic

Local:Field:NameField:Border: Thin Right

Local:Field:NameField:Full Width : Yes

Local:Field:NameField:Align: Center

Border: Thin Bottom

[Line:TCSS]

Field:TCSS1,TCSS2

Right Field:TCSS3

Border: Thin Bottom

Option:TCSSOpt:$$Line=1



[!Line:TCSSOpt]

Delete:Border

Add:Border:Thin Top Bottom

[Field:TCSS1]

Use : Name Field

Info:""

Width : 5% Screen

Border:Red Double Right


[Field:TCSS2]

Use:Uni Date Field

Storage:NoteDate

Width: 8% Screen

Style : Normal Serif Italic

Color :Blue

;Skip Forward:Not $$IsEmpty:$$Next:#TCSS2

;Skip on:Not $$IsEmpty:#TCSS2

[Field:TCSS3]

Use : Name Field

Storage:TCSS

Full Width: Yes

Skip:$$IsEmpty:$NoteDate

Style : Normal Serif Italic

Color :Blue

; Skip Forward:Not $$IsEmpty:#TCSS3



[Border: Red Double Bottom]

Color : Red

Bottom : Thin, Double Lined



[Border:Red Double Right]

Color : Red

Right : Thin, Double Lined




[Style: Calibri Large Bold Italic Extra]


Font : if $$SysInfo:IsWindows then "Calibri" else "Helvetica"

Height : 26

Italic : Yes

Bold : Yes


[Border: Grey Thick Right]

Color: Grey

Right : Thick





;;;;;;;;;;;;;;;;;;;;;;;;;Display Report


[Report:TCSSDisplay]

Form:TCSSDisplay

Object:Company

[Form:TCSSDisplay]

Part:TCSSDisplay

Height:50% Screen

Width:50% Screen

Background: WHite

Space Bottom:0

Space Top:0

Space Left:0

Space Right:0

[Part:TCSSDisplay]

Part: TCSSDisplayPart1,TCSSDisplayPart2

Vertical: Yes

[Part: TCSSDisplayPart1]

Line:TCSSDisplayPart1

Border: Red Double Bottom


[Line:TCSSDisplayPart1]

Field:TCSSDisplayPart1Fld1

Right Field:TCSSDisplayPart1Fld2

[Field:TCSSDisplayPart1Fld1]

Use : Name Field

Info : " "

Width : 5% Screen

Border : Red Double Right

Lines : 3


[Field:TCSSDisplayPart1Fld2]

Use : Name Field

Info : $$NewLIne+"TCSS"

Align : Center

Style : Calibri Large Bold Italic Extra

Color : Blue

Full Width : Yes

Lines : 1




[Part:TCSSDisplayPart2]

Line:TCSSDisplayTitle

Line:TCSSDisplay

Repeat:TCSSDisplay:CompanyNoteColl

Scroll:Vertical

Common Border: Yes


[Line:TCSSDisplayTitle]

Field:Short Name Field,SimpleField

Right Field:NameField

Local:Field:Short Name Field:Info: ""

Local:Field:Short Name Field:Width: 5% Screen

Local:Field:SimpleField:Info:"Date"

Local:Field:SimpleField:Style:Large Bold Italic

Local:Field:SimpleField:Border:Grey Thick Right

Local:Field:SimpleField:Width: 8% Screen


Local:Field:NameField:Info:"Note"

Local:Field:NameField:Style:Large Bold Italic

Local:Field:NameField:Border: Thin Right

Local:Field:NameField:Full Width : Yes

Local:Field:NameField:Align: Center

Border: Thin Bottom

[Line:TCSSDisplay]

Field:TCSSDisplay1,TCSSDisplay2

Right Field:TCSSDisplay3

Border: Thin Bottom

Option:TCSSDisplayOpt:$$Line=1



[!Line:TCSSDisplayOpt]

Delete:Border

Add:Border:Thin Top Bottom

[Field:TCSSDisplay1]

Use : Name Field

Info:""

Width : 5% Screen

Border:Red Double Right


[Field:TCSSDisplay2]

Use:Uni Date Field

Set as:$NoteDate

Set Always: Yes

Width: 8% Screen

Style : Normal Serif Italic

Color :Blue

;Skip Forward:Not $$IsEmpty:$$Next:#TCSSDisplay2

;Skip on:Not $$IsEmpty:#TCSSDisplay2

[Field:TCSSDisplay3]

Use : Name Field

Set as:$TCSS

Set Always: Yes

Full Width: Yes

Skip:$$IsEmpty:$NoteDate

Style : Normal Serif Italic

Color :Blue


[Collection:CompanyNote]

Type:Company

Fetch:.*


[Collection:CompanyNoteColl]

Source Collection:CompanyNote

Walk:TCSSAggr

Fetch:*.*,TCSS,NoteDate





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

[#Menu :Gateway of Tally]

Add :Button :Add Note

[Button :Add Note

Title :"TCSS"

Key :Ctrl+A

;Action :Add Note

Action:Alter:TCSS


;;;;;;;;;;;;;;;---------Reports

[#Form:Daybook]

Add:Button:AtEnd:Add Note

;;;;;;;;;;;;;;;---------Reports







;;;;;;;;;;;;;;;;;;----------------Menu and Sub Mehnu

[System :Form keys]

Key :Add Note

[System :Menu Keys]

Key :Add Note


[#Form :Default]


[#Menu :Default]

Key :Add Note


;;;;;;;;;;;;;;;---------


-----------Vouchers

[#Form: Stock Journal Voucher ]

Add:Button:At End:Add Note

[#Form: Physical Stock Voucher ]

Add:Button:At End:Add Note

[#Form: Attendance Voucher]

Add:Button:At End:Add Note

[#Form: Normal INV Voucher ]

Add:Button:At End:Add Note

[#Form: Indent Voucher]

Add:Button:At End:Add Note

[#Form: JobMaterial Journal Voucher]

Add:Button:At End:Add Note

[#Form:Contra Color ]

Add:Button:At End:Add Note

[#Form:payment Color ]

Add:Button:At End:Add Note

[#Form:Receipt Color ]

Add:Button:At End:Add Note

[#Form:Journal Color ]

Add:Button:At End:Add Note

[#Form:payroll Color]

Add:Button:At End:Add Note

[#Form:Debit Note Color]

Add:Button:At End:Add Note

[#Form:Credit Note Color]

Add:Button:At End:Add Note

[#Form:Sales Color]

Add:Button:At End:Add Note

[#Form:purchase Color]

Add:Button:At End:Add Note

[#Form:Memorandum Color ]

Add:Button:At End:Add Note

[#Form:Reversing Journal Color ]

Add:Button:At End:Add Note

[#Form:Stock Journal Color ]

Add:Button:At End:Add Note

[#Form:physical Stock Color ]

Add:Button:At End:Add Note

[#Form:Delivery Note Color]

Add:Button:At End:Add Note

[#Form:Receipt Note Color]

Add:Button:At End:Add Note

[#Form:Rejection Inward Color ]

Add:Button:At End:Add Note

[#Form:Rejection Outward Color]

Add:Button:At End:Add Note

[#Form:Sales Order Color]

Add:Button:At End:Add Note

[#Form:purc Order Color]

Add:Button:At End:Add Note

[#Form:Attendance Color]

Add:Button:At End:Add Note

[#Form:pOS Invoice Color]

Add:Button:At End:Add Note

[#Form:Indent Color ]

Add:Button:At End:Add Note

[#Form:JobOrderIn Color]

Add:Button:At End:Add Note

[#Form:JobOrderOut Color]

Add:Button:At End:Add Note


;;;;;;;;;;;;;;;-----------


---------Vouchers


[System: Events]


TSPL Smp CmpLoadEvent3 : Load Company : NOT $$IsRemoteCompany : Action : Display : "TCSSDisplay"


[System:UDF]

TCSSAggr : Aggregate : 26600

TCSS : String : 26601

NoteDate : Date : 26602

टिप्पणियाँ

इस ब्लॉग से लोकप्रिय पोस्ट

Tally Chapter 153 TDL for Custom List of Stock Item By Rajiv Mishra Computer Class

Tally Chapter 105 TDL for Receipt contra Payment BULK Entry by Rajiv Mishra Computer Class

TDL CODE for New Column in Invoice by Rajiv Mishra Computer class