WIN RJVF7A
sanjeev
11595
360
360
360
360
1
1
Segoe UI
9
' -- style script start
_styleCtr = 0
' -- style script end
Detail
0
3600
' -- style script start
detail.BackColor = iif(_styleCtr mod 2 = 0, rgb(255,255,255),rgb(240,240,240))
_styleCtr = _styleCtr + 1
' -- style script end
Field1
DEALER TIN
1500
240
0
Times New Roman
10
Field2
PERIOD FROM
240
1500
240
0
Times New Roman
10
Field3
PERIOD TO
480
1500
240
0
Times New Roman
10
Field4
Left(Ltrim(Rtrim(TIN)),11)
-1
1500
8000
240
0
-1
Times New Roman
10
Field5
Format(FromDate,"dd-MMM-yyyy")
-1
1500
240
8000
240
0
-1
Times New Roman
10
Field6
Format(ToDate,"dd-MMM-yyyy")
-1
1500
480
8000
240
0
-1
Times New Roman
10
Field7
FORM VAT-07 A [PART-I]
960
11500
240
1
-1
Times New Roman
12
Field8
Particulars of purchases made within the State against VAT invoice including Capital Goods
on which input tax Credit is allowed under section 18(1)
1200
11505
480
1
Times New Roman
10
Field9
Goods Type
1920
2200
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
Field10
Name of the Selling dealer
2200
1920
2700
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
Field11
TIN
4900
1920
2000
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
Field12
Amount of purchase made during the period
6900
1920
2200
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
Field13
Amount of tax paid or payable on such purchases
9100
1920
2400
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
BillWisePurch~R
-1
11500
480
-1
Times New Roman
9.75
Part-I
PV1/PV2/PV3/PV4
Field14
FORM VAT-07 A [PART-II]
720
11500
240
1
-1
Times New Roman
12
Field15
Particulars of purchases made within the State against VAT invoice
on which Input Tax Credit is not allowed under section 18(1)
960
11505
480
1
Times New Roman
10
Field17
Name of the Selling dealer
1440
4900
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
Field18
TIN
4900
1440
2000
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
Field19
Amount of purchase made during the period
6900
1440
2200
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
Field20
Amount of tax paid or payable on such purchases
9100
1440
2400
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
Field16
FORM VAT-07 A [PART-III]
2160
11505
240
1
-1
Times New Roman
12
Field21
Particulars of purchases/Receipts made from outside the State other than Capital Goods
2400
11505
240
1
Times New Roman
10
Field22
Type of Purchase/Receipt
2640
2000
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
Field23
TIN
5500
2640
1400
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
Field24
Amount of purchase made during the period
6900
2640
2205
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
Field25
Amount of tax paid or payable on such purchases
9105
2640
2400
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
__MACROFILENAME
VATForm7A_2014.xls
1140
1215
240
0
__MACRO
Sub ERetMacro()
Cells.Select
With Selection
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
Dim Rng As Range
Dim Rng1 As Range
Windows("VATForm7A_2014.xls").Activate
ActiveWorkbook.Sheets(2).Unprotect Password:="vatform7a"
ActiveWorkbook.Sheets(3).Unprotect Password:="vatform7a"
ActiveWorkbook.Sheets(4).Unprotect Password:="vatform7a"
ActiveWorkbook.Sheets(5).Unprotect Password:="vatform7a"
Windows("VATForm7A_2014.xls").Activate
Range("D6").Select
Windows("RJVF7A.xls").Activate
Range("C1").Select
ActiveWorkbook.Sheets(1).Range("C1").Copy
Windows("VATForm7A_2014.xls").Activate
ActiveWorkbook.Sheets(2).Activate
Range("D6").Select
ActiveWorkbook.Sheets(2).Paste
Windows("VATForm7A_2014.xls").Activate
Range("D7").Select
Windows("RJVF7A.xls").Activate
Range("C2").Select
ActiveWorkbook.Sheets(1).Range("C2").Copy
Windows("VATForm7A_2014.xls").Activate
ActiveWorkbook.Sheets(2).Activate
Range("D7").Select
ActiveWorkbook.Sheets(2).Paste
ActiveWorkbook.Sheets(2).protect Password:="vatform7a"
ActiveWorkbook.Sheets(2).Unprotect Password:="vatform7a"
Windows("VATForm7A_2014.xls").Activate
Range("D8").Select
Windows("RJVF7A.xls").Activate
Range("C3").Select
ActiveWorkbook.Sheets(1).Range("C3").Copy
Windows("VATForm7A_2014.xls").Activate
ActiveWorkbook.Sheets(2).Activate
Range("D8").Select
ActiveWorkbook.Sheets(2).Paste
Windows("VATForm7A_2014.xls").Activate
Range("A4").Select
Windows("RJVF7A.xls").Activate
Range("A8").Select
Set Rng = Cells.Find(" FORM VAT-07 A [PART-II]")
ActiveWorkbook.Sheets(1).Range("A8:A" & Rng.Row - 2).Select
Selection.Copy
Windows("VATForm7A_2014.xls").Activate
ActiveWorkbook.Sheets(3).Activate
Range("A4").Select
ActiveWorkbook.Sheets(3).Paste
Windows("VATForm7A_2014.xls").Activate
Range("B4").Select
Windows("RJVF7A.xls").Activate
Range("E8").Select
ActiveWorkbook.Sheets(1).Range("E8:E" & Rng.Row - 2).Select
Selection.Copy
Windows("VATForm7A_2014.xls").Activate
ActiveWorkbook.Sheets(3).Activate
Range("B4").Select
ActiveWorkbook.Sheets(3).Paste
Windows("VATForm7A_2014.xls").Activate
Range("C4").Select
Windows("RJVF7A.xls").Activate
Range("H8").Select
ActiveWorkbook.Sheets(1).Range("H8:H" & Rng.Row - 2).Select
Selection.Copy
Windows("VATForm7A_2014.xls").Activate
Range("C4").Select
ActiveWorkbook.Sheets(3).Paste
Windows("VATForm7A_2014.xls").Activate
Range("D4").Select
Windows("RJVF7A.xls").Activate
Range("J8").Select
ActiveWorkbook.Sheets(1).Range("J8:J" & Rng.Row - 2).Select
Selection.Copy
Windows("VATForm7A_2014.xls").Activate
Range("D4").Select
ActiveWorkbook.Sheets(3).Paste
Windows("VATForm7A_2014.xls").Activate
Range("E4").Select
Windows("RJVF7A.xls").Activate
Range("K8").Select
ActiveWorkbook.Sheets(1).Range("K8:K" & Rng.Row - 2).Select
Selection.Copy
Windows("VATForm7A_2014.xls").Activate
Range("E4").Select
ActiveWorkbook.Sheets(3).Paste
'' Windows("VATForm7A_2014.xls").Activate
'' Range("A4").Select
'' Windows("RJVF7A.xls").Activate
'' Range("A" & Rng.Row + 3).Select
'' Set Rng1 = Cells.Find(" FORM VAT-07 A [PART-III]")
'' ActiveWorkbook.Sheets(1).Range("A" & Rng.Row + 3 & ":A" & Rng1.Row - 2).Select
'' Selection.Copy
'' Windows("VATForm7A_2014.xls").Activate
'' ActiveWorkbook.Sheets(4).Activate
'' ActiveSheet.Unprotect Password:="vatform7a"
'' Range("A4").Select
'' ActiveWorkbook.Sheets(4).Paste
'' Windows("VATForm7A_2014.xls").Activate
'' Range("B4").Select
'' Windows("RJVF7A.xls").Activate
'' Range("H" & Rng.Row + 3).Select
'' ActiveWorkbook.Sheets(1).Range("H" & Rng.Row + 3 & ":H" & Rng1.Row - 2).Select
'' Selection.Copy
'' Windows("VATForm7A_2014.xls").Activate
'' ActiveWorkbook.Sheets(4).Range("B4").Select
'' ActiveWorkbook.Sheets(4).Paste
'' Windows("VATForm7A_2014.xls").Activate
'' Range("C4").Select
'' Windows("RJVF7A.xls").Activate
'' Range("J" & Rng.Row + 3).Select
'' ActiveWorkbook.Sheets(1).Range("J" & Rng.Row + 3 & ":J" & Rng1.Row - 2).Select
'' Selection.Copy
'' Windows("VATForm7A_2014.xls").Activate
'' Range("C4").Select
'' ActiveWorkbook.Sheets(4).Paste
'' Windows("VATForm7A_2014.xls").Activate
'' Range("D4").Select
'' Windows("RJVF7A.xls").Activate
'' Range("K" & Rng.Row + 3).Select
'' ActiveWorkbook.Sheets(1).Range("K" & Rng.Row + 3 & ":K" & Rng1.Row - 2).Select
'' Selection.Copy
'' Windows("VATForm7A_2014.xls").Activate
'' Range("D4").Select
'' ActiveWorkbook.Sheets(4).Paste
Windows("VATForm7A_2014.xls").Activate
Range("A4").Select
Windows("RJVF7A.xls").Activate
Set Rng1 = Cells.Find(" FORM VAT-07 A [PART-III]")
Range("A" & Rng1.Row + 3).Select
x = ActiveWorkbook.Sheets(1).Range("A" & Rows.Count).End(xlUp).Row -1
If x >= Rng1.Row + 3 Then
ActiveWorkbook.Sheets(1).Range("A" & Rng1.Row + 3 & ":A" & x).Select
Selection.Copy
Windows("VATForm7A_2014.xls").Activate
ActiveWorkbook.Sheets(5).Activate
Range("A4").Select
ActiveWorkbook.Sheets(5).Paste
Windows("VATForm7A_2014.xls").Activate
Range("B4").Select
Windows("RJVF7A.xls").Activate
Range("D" & Rng1.Row + 3).Select
x = ActiveWorkbook.Sheets(1).Range("D" & Rows.Count).End(xlUp).Row
ActiveWorkbook.Sheets(1).Range("D" & Rng1.Row + 3 & ":D" & x).Select
Selection.Copy
Windows("VATForm7A_2014.xls").Activate
ActiveWorkbook.Sheets(5).Activate
Range("B4").Select
ActiveWorkbook.Sheets(5).Paste
Windows("VATForm7A_2014.xls").Activate
Range("C4").Select
Windows("RJVF7A.xls").Activate
Range("G" & Rng1.Row + 3).Select
x = ActiveWorkbook.Sheets(1).Range("G" & Rows.Count).End(xlUp).Row
ActiveWorkbook.Sheets(1).Range("G" & Rng1.Row + 3 & ":G" & x).Select
Selection.Copy
Windows("VATForm7A_2014.xls").Activate
ActiveWorkbook.Sheets(5).Activate
Range("C4").Select
ActiveWorkbook.Sheets(5).Paste
Windows("VATForm7A_2014.xls").Activate
Range("D4").Select
Windows("RJVF7A.xls").Activate
Range("I" & Rng1.Row + 3).Select
x = ActiveWorkbook.Sheets(1).Range("I" & Rows.Count).End(xlUp).Row
ActiveWorkbook.Sheets(1).Range("I" & Rng1.Row + 3 & ":I" & x).Select
Selection.Copy
Windows("VATForm7A_2014.xls").Activate
ActiveWorkbook.Sheets(5).Range("D4").Select
ActiveWorkbook.Sheets(5).Paste
Windows("VATForm7A_2014.xls").Activate
Range("E4").Select
Windows("RJVF7A.xls").Activate
Range("J" & Rng1.Row + 3).Select
x = ActiveWorkbook.Sheets(1).Range("J" & Rows.Count).End(xlUp).Row - 1
ActiveWorkbook.Sheets(1).Range("J" & Rng1.Row + 3 & ":J" & x).Select
Selection.Copy
Windows("VATForm7A_2014.xls").Activate
Range("E4").Select
ActiveWorkbook.Sheets(5).Paste
Windows("VATForm7A_2014.xls").Activate
Range("F4").Select
Windows("RJVF7A.xls").Activate
Range("K" & Rng1.Row + 3).Select
x = ActiveWorkbook.Sheets(1).Range("K" & Rows.Count).End(xlUp).Row - 1
ActiveWorkbook.Sheets(1).Range("K" & Rng1.Row + 3 & ":K" & x).Select
Selection.Copy
Windows("VATForm7A_2014.xls").Activate
Range("F4").Select
ActiveWorkbook.Sheets(5).Paste
End If
End Sub
1215
240
0
Field30
(excluding purchase return with in the return period)
1680
11505
240
0
Times New Roman
10
Field31
Description
2000
2640
1500
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
Field32
Name of the Selling dealer
3500
2640
2000
480
0
16777215
1
1
60
60
2
Times New Roman
9.75
BillWisePurch~A#1
-1
3120
11505
480
-1
Times New Roman
9.75
Part-III
C00/C01/C03/C04/C02/C10/C12/C13/C14/C21/C22/C23/C24/C30/C31/C32/C33/C34/C04/C41/C42/C43/C44/CA0/CA1/CA2/CA3/CA4/CB0/CB1/CB2/CB3/CB4/CE0/CE1/CE2/CE3/CE4/CT0/CT1/CT2/CT3/CT4/CW0/CW1/CW2/CW3/CW4/C11/C20
Part-I
sanjeev
11500
360
360
360
360
1
1
Segoe UI
9
' -- style script start
_styleCtr = 0
' -- style script end
PartyWithoutAlias
PartyWithoutAlias
1
Detail
0
' -- style script start
detail.BackColor = iif(_styleCtr mod 2 = 0, rgb(255,255,255),rgb(240,240,240))
_styleCtr = _styleCtr + 1
' -- style script end
Header
1
Field11.Value=0
Field12.Value=0
PartyWithoutAlias_Header
5
240
''if LEN(Ltrim(Rtrim(TIN))) > 0 Then PartyWithoutAlias_Header.Visible=True else PartyWithoutAlias_Header.Visible=False
Field11.Value=Field11.Value+Field4.Value
Field12.Value=Field12.Value+Field5.Value
PartyWithoutAlias_Footer
6
0
Field1
Other Than Capital Goods
-1
2200
240
0
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field2
Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(PartyWithoutAlias,")",""),"(",""),"*",""),"^",""),"%",""),"$",""),"#",""),"@",""),"!",""),"~",""),"`",""),"|",""),"=",""),"_",""),"?",""),"<",""),">",""),";",""),":",""),"[",""),"]",""),"{",""),"}",""),Chr(34),""),Chr(39),""),".",""),"&",""),"/",""),"\",""),"-",""),",",""),"+","")
-1
2200
2700
240
0
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field3
Left(Ltrim(Rtrim(TIN)),11)
-1
4900
2000
240
0
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field4
Sum(VoucherAmt+FreeAmt)
-1
#,##0.00
6900
2200
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field5
Sum(TaxAmt)
-1
#,##0.00
9100
2400
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field6
Total
2200
240
0
16777215
1
1
60
60
-1
-1
2
Times New Roman
9.75
Field7
2200
2700
240
0
16777215
1
1
60
60
-1
-1
2
Times New Roman
9.75
Field8
4900
2000
240
0
16777215
1
1
60
60
-1
-1
2
Times New Roman
9.75
Field9
Field11.Value
-1
#,##0.00
6900
2200
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field10
Field12.Value
-1
#,##0.00
9100
2400
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field11
11175
60
0
Field12
11190
60
0
VatPart-II
sanjeev
11500
360
360
360
360
1
1
Segoe UI
9
' -- style script start
_styleCtr = 0
' -- style script end
PartyWithoutAlias
PartyWithoutAlias
1
Detail
0
' -- style script start
detail.BackColor = iif(_styleCtr mod 2 = 0, rgb(255,255,255),rgb(240,240,240))
_styleCtr = _styleCtr + 1
' -- style script end
Header
1
Field1.Value=0
Field6.Value=0
PartyWithoutAlias_Header
5
240
''if LEN(Ltrim(Rtrim(TIN))) > 0 Then PartyWithoutAlias_Header.Visible=False else PartyWithoutAlias_Header.Visible=True
Field1.Value=Field1.Value+Field4.Value
Field6.Value=Field6.Value+Field5.Value
PartyWithoutAlias_Footer
6
0
Field2
Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(PartyWithoutAlias,")",""),"(",""),"*",""),"^",""),"%",""),"$",""),"#",""),"@",""),"!",""),"~",""),"`",""),"|",""),"=",""),"_",""),"?",""),"<",""),">",""),";",""),":",""),"[",""),"]",""),"{",""),"}",""),Chr(34),""),Chr(39),""),".",""),"&",""),"/",""),"\",""),"-",""),",",""),"+","")
-1
4900
240
0
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field3
Left(Ltrim(Rtrim(TIN)),11)
-1
4900
2000
240
0
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field4
Sum(VoucherAmt+FreeAmt)
-1
#,##0.00
6900
2200
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field5
Sum(TaxAmt)
-1
#,##0.00
9100
2400
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field1
10965
0
Field6
11055
0
Field7
Total
4900
240
0
16777215
1
1
60
60
-1
-1
2
Times New Roman
9.75
Field8
4900
2000
240
0
16777215
1
1
60
60
-1
-1
2
Times New Roman
9.75
Field11
Field1.Value
-1
#,##0.00
6900
2200
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field12
Field6.Value
-1
#,##0.00
9100
2400
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Part-II
sanjeev
11500
360
360
360
360
1
1
Segoe UI
9
' -- style script start
_styleCtr = 0
' -- style script end
PartyWithoutAlias
PartyWithoutAlias
1
Detail
0
' -- style script start
detail.BackColor = iif(_styleCtr mod 2 = 0, rgb(255,255,255),rgb(240,240,240))
_styleCtr = _styleCtr + 1
' -- style script end
Header
1
Field1.Value=0
Field6.Value=0
PartyWithoutAlias_Header
5
240
''if LEN(Ltrim(Rtrim(TIN))) > 0 Then PartyWithoutAlias_Header.Visible=True else PartyWithoutAlias_Header.Visible=False
Field1.Value=Field1.Value+Field4.Value
Field6.Value=Field6.Value+Field5.Value
PartyWithoutAlias_Footer
6
0
Field2
Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(PartyWithoutAlias,")",""),"(",""),"*",""),"^",""),"%",""),"$",""),"#",""),"@",""),"!",""),"~",""),"`",""),"|",""),"=",""),"_",""),"?",""),"<",""),">",""),";",""),":",""),"[",""),"]",""),"{",""),"}",""),Chr(34),""),Chr(39),""),".",""),"&",""),"/",""),"\",""),"-",""),",",""),"+","")
-1
4900
240
0
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field3
TIN
-1
4900
2000
240
0
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field4
Sum(VoucherAmt)
-1
#,##0.00
6900
2200
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field5
Sum(TaxAmt)
-1
#,##0.00
9100
2400
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field1
10965
0
Field6
11055
0
Field9
Field1.Value
-1
#,##0.00
6900
2200
2
16777215
1
1
60
60
0
-1
2
Times New Roman
9.75
Field10
Field6.Value
-1
#,##0.00
9100
2400
2
16777215
1
1
60
60
0
-1
2
Times New Roman
9.75
Part-III
sanjeev
11500
360
360
360
360
1
1
Segoe UI
9
' -- style script start
_styleCtr = 0
' -- style script end
PartyWithoutAlias
PartyWithoutAlias
1
Detail
0
' -- style script start
detail.BackColor = iif(_styleCtr mod 2 = 0, rgb(255,255,255),rgb(240,240,240))
_styleCtr = _styleCtr + 1
' -- style script end
PartyWithoutAlias_Header
5
240
PartyWithoutAlias_Footer
6
0
Field2
Others
-1
2000
240
0
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field3
Left(Ltrim(Rtrim(TIN)),11)
-1
5500
1400
240
0
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field4
Sum(VoucherAmt)
-1
#,##0.00
6900
2200
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field5
Sum(TaxAmt)
-1
#,##0.00
9100
2400
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field7
Total
2000
240
0
16777215
1
1
60
60
-1
-1
2
Times New Roman
9.75
Field8
5500
1400
240
0
16777215
1
1
60
60
-1
-1
2
Times New Roman
9.75
Field9
Sum(VoucherAmt)
-1
#,##0.00
6900
2200
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field10
Sum(TaxAmt)
-1
#,##0.00
9100
2400
240
2
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field1
Others
-1
2000
1500
240
0
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field6
Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(PartyWithoutAlias,")",""),"(",""),"*",""),"^",""),"%",""),"$",""),"#",""),"@",""),"!",""),"~",""),"`",""),"|",""),"=",""),"_",""),"?",""),"<",""),">",""),";",""),":",""),"[",""),"]",""),"{",""),"}",""),Chr(34),""),Chr(39),""),".",""),"&",""),"/",""),"\",""),"-",""),",",""),"+","")
-1
3500
2000
240
0
16777215
1
1
60
60
-1
2
Times New Roman
9.75
Field11
2000
1500
240
0
16777215
1
1
60
60
-1
-1
2
Times New Roman
9.75
Field12
3500
2000
240
0
16777215
1
1
60
60
-1
-1
2
Times New Roman
9.75