ÿ
TFRMTAXYEAREND0†TPF0TfrmTaxYearEnd
frmTaxYearEndLeftTop•BorderIconsbiSystemMenuBorderStylebsSingleCaptionTax year endClientHeight7ClientWidth3Font.CharsetDEFAULT_CHARSET
Font.ColorclWindowTextFont.Heightõ	Font.Name
MS Sans Serif
Font.StylePositionpoScreenCenterOnClose	FormCloseOnShowFormShow
PixelsPerInch`
TextHeight
TLabelLabel1LeftTopWidth/HeightCaptionNOTE:Font.CharsetDEFAULT_CHARSET
Font.ColorclRedFont.Heightó	Font.Name
MS Sans Serif
Font.StylefsBoldfsUnderline
ParentFontTLabelLabel2LeftTop Width
Height
Caption8The tax year ends on the last day of February.  You mustTLabelLabel3LeftTop0WidthHeight
Caption9have completed the last week in February's payroll BEFORETLabelLabel4LeftTop@WidthşHeight
Caption8you run this routine.  Once this routine is complete youTLabelLabel5LeftTopPWidthŞHeight
Caption/can THEN run the first week in March's payroll.TBevelBevel1LeftTophWidth!HeightiStylebsRaisedTLabelLabel6LeftPToppWidth�HeightCaptionTax year end routineFont.CharsetDEFAULT_CHARSET
Font.ColorclNavyFont.Heightó	Font.Name
MS Sans Serif
Font.StylefsBoldfsUnderline
ParentFontTLabelLabel7LeftTopˆWidthÉHeight
Caption.1) You should print out latest discharge list.Font.CharsetDEFAULT_CHARSET
Font.ColorclBlueFont.Heightõ	Font.Name
MS Sans Serif
Font.Style
ParentFontTLabelLabel8LeftTop˜Width™Height
Caption#2) Print out current employee list.Font.CharsetDEFAULT_CHARSET
Font.ColorclBlueFont.Heightõ	Font.Name
MS Sans Serif
Font.Style
ParentFontTLabelLabel9LeftTop¨Width_Height
Caption3) Zero all tax totals.Font.CharsetDEFAULT_CHARSET
Font.ColorclBlueFont.Heightõ	Font.Name
MS Sans Serif
Font.Style
ParentFontTLabelLabel10LeftTop¸WidthœHeight
Caption#4) Print out another employee list.Font.CharsetDEFAULT_CHARSET
Font.ColorclBlueFont.Heightõ	Font.Name
MS Sans Serif
Font.Style
ParentFontTSpeedButtonbtnContinueLeft(TopØWidthYHeight!CaptionContinue
Glyph.Data
zvBMvv( €€€€€€€€€¿¿¿ÿÿÿÿÿÿÿÿÿÿÿÿUUUUUUUUUUUUUUUUUUUUUUUUUUUÿUUUUUUYUUUUUUWõUUUUU™�UUUUUUwwõUUUUU™�UUUUUUwwÿUUUUY™™UUUUWwwUUUU™™™UUUUwwwõUUW™™�UUUWwuwwõUUyUY�UUUwuUWwÿUUUUUY™UUUUUWwUUUUUU™UUUUUUwõUUUUUY�UUUUUUWwÿUUUUUUyUUUUUUwõUUUUUW�UUUUUUWwÿUUUUUUY�UUUUUUWwUUUUUUUUUUUUUUUU	NumGlyphsOnClickbtnContinueClickTSpeedButton	btnCancelLeft°TopØWidthYHeight!CaptionCancel
Glyph.Data
zvBMvv( €€€€€€€€€¿¿¿ÿÿÿÿÿÿÿÿÿÿÿÿ33333333333ÿÿó33339™™33333÷wwÿó339™™™™3337wówÿ33™3ps™“33wÿ7?7ó9™“9™37ww3wó99™ps3™37÷w7337ÿ™3™“339“wówó37™39�339“wó77ÿ37™33ps39“wó37ó7™3339“wó3wÿ7™33	“9“wÿ3ws÷s9“3	™937?ówsw÷ó9™3™™37sÿwww33™“ps9“33w?÷ÿ÷s339™™™™3337w37w33339™™333337ww333	NumGlyphsOnClickbtnCancelClickTBevelBevel2LeftTopWidth!Height1TLabelLabel11LeftTopWidthZHeight
CaptionProgress StatusFont.CharsetDEFAULT_CHARSET
Font.ColorclWindowTextFont.Heightõ	Font.Name
MS Sans Serif
Font.StylefsBoldfsUnderline
ParentFontTEditedtProgressLeftTopWidthHeightCtl3DEnabledFont.CharsetDEFAULT_CHARSET
Font.ColorclTealFont.Heightõ	Font.Name
MS Sans Serif
Font.StylefsBoldParentCtl3D
ParentFontReadOnly	TabOrderTQueryqryUpdateTotalsDatabaseNameWages7SQL.Stringsupdate Employee  set TaxEarn = 0,        Pension = 0,        SickFD = 0,        ProvFD = 0,        UIFPay = 0,        Paye = 0,        WKSPay = 0,        TaxWeek = 0where dischargedate is nullLeft¸TQueryqryUpdateCompanyDatabaseNameWages7SQL.Stringsupdate companyset ataxyear=ataxyear+1,	  atxwk=1Leftà