{-# LANGUAGE ImportQualifiedPost #-} {-# LANGUAGE NumericUnderscores #-} {-# LANGUAGE OverloadedStrings #-} module Tax.Canada.Province.BC.BC479.FieldNames (bc479Fields) where import Data.Fixed (Centi) import Rank2 qualified import Tax.Canada.Province.BC.BC479.Types import Tax.Canada.Shared (subCalculationFields) import Tax.FDF (Entry (Amount, Checkbox, Constant, Count, Percent, Textual), FieldConst (Field), within) bc479Fields :: BC479 FieldConst bc479Fields = Text -> FieldConst a -> FieldConst a forall x. Text -> FieldConst x -> FieldConst x within Text "form1" (forall {a}. FieldConst a -> FieldConst a) -> BC479 FieldConst -> BC479 FieldConst forall {k} (g :: (k -> *) -> *) (p :: k -> *) (q :: k -> *). Functor g => (forall (a :: k). p a -> q a) -> g p -> g q forall (p :: * -> *) (q :: * -> *). (forall a. p a -> q a) -> BC479 p -> BC479 q Rank2.<$> BC479 { $sel:page1:BC479 :: Page1 FieldConst page1 = Text -> FieldConst a -> FieldConst a forall x. Text -> FieldConst x -> FieldConst x within Text "Page1" (forall {a}. FieldConst a -> FieldConst a) -> Page1 FieldConst -> Page1 FieldConst forall {k} (g :: (k -> *) -> *) (p :: k -> *) (q :: k -> *). Functor g => (forall (a :: k). p a -> q a) -> g p -> g q forall (p :: * -> *) (q :: * -> *). (forall a. p a -> q a) -> Page1 p -> Page1 q Rank2.<$> Page1 FieldConst page1Fields, $sel:page2:BC479 :: Page2 FieldConst page2 = Text -> FieldConst a -> FieldConst a forall x. Text -> FieldConst x -> FieldConst x within Text "Page2" (forall {a}. FieldConst a -> FieldConst a) -> Page2 FieldConst -> Page2 FieldConst forall {k} (g :: (k -> *) -> *) (p :: k -> *) (q :: k -> *). Functor g => (forall (a :: k). p a -> q a) -> g p -> g q forall (p :: * -> *) (q :: * -> *). (forall a. p a -> q a) -> Page2 p -> Page2 q Rank2.<$> Page2 FieldConst page2Fields, $sel:page3:BC479 :: Page3 FieldConst page3 = Text -> FieldConst a -> FieldConst a forall x. Text -> FieldConst x -> FieldConst x within Text "Page3" (forall {a}. FieldConst a -> FieldConst a) -> Page3 FieldConst -> Page3 FieldConst forall {k} (g :: (k -> *) -> *) (p :: k -> *) (q :: k -> *). Functor g => (forall (a :: k). p a -> q a) -> g p -> g q forall (p :: * -> *) (q :: * -> *). (forall a. p a -> q a) -> Page3 p -> Page3 q Rank2.<$> Page3 FieldConst page3Fields} page1Fields :: Page1 FieldConst page1Fields = Page1 { $sel:line1_netIncome_self:Page1 :: FieldConst Centi line1_netIncome_self = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Chart", Text "Column1", Text "Line1", Text "Col1_Amount"] Entry Centi Amount, $sel:line1_netIncome_spouse:Page1 :: FieldConst Centi line1_netIncome_spouse = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Chart", Text "Column2", Text "Line1", Text "Col2_Amount"] Entry Centi Amount, $sel:line2_uccb_rdsp_repayment_self:Page1 :: FieldConst Centi line2_uccb_rdsp_repayment_self = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Chart", Text "Column1", Text "Line2", Text "Col1_Amount"] Entry Centi Amount, $sel:line2_uccb_rdsp_repayment_spouse:Page1 :: FieldConst Centi line2_uccb_rdsp_repayment_spouse = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Chart", Text "Column2", Text "Line2", Text "Col2_Amount"] Entry Centi Amount, $sel:line3_sum_self:Page1 :: FieldConst Centi line3_sum_self = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Chart", Text "Column1", Text "Line3", Text "Col1_Amount"] Entry Centi Amount, $sel:line3_sum_spouse:Page1 :: FieldConst Centi line3_sum_spouse = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Chart", Text "Column2", Text "Line3", Text "Col2_Amount"] Entry Centi Amount, $sel:line4_uccb_rdsp_income_self:Page1 :: FieldConst Centi line4_uccb_rdsp_income_self = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Chart", Text "Column1", Text "Line4", Text "Col1_Amount"] Entry Centi Amount, $sel:line4_uccb_rdsp_income_spouse:Page1 :: FieldConst Centi line4_uccb_rdsp_income_spouse = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Chart", Text "Column2", Text "Line4", Text "Col2_Amount"] Entry Centi Amount, $sel:line5_difference_self:Page1 :: FieldConst Centi line5_difference_self = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Chart", Text "Column1", Text "Line5", Text "Col1_Amount"] Entry Centi Amount, $sel:line5_difference_spouse:Page1 :: FieldConst Centi line5_difference_spouse = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Chart", Text "Column2", Text "Line5", Text "Col2_Amount"] Entry Centi Amount, $sel:line6_sum:Page1 :: FieldConst Centi line6_sum = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Chart", Text "Line6", Text "Amount"] Entry Centi Amount, $sel:line7_threshold:Page1 :: FieldConst Centi line7_threshold = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line7", Text "Amount"] Entry Centi Amount, $sel:line8_difference:Page1 :: FieldConst Centi line8_difference = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line8", Text "Amount"] Entry Centi Amount, $sel:line_60330_sales:Page1 :: FieldConst Centi line_60330_sales = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line9", Text "Amount"] Entry Centi Amount, $sel:line_60350_spouse:Page1 :: FieldConst Centi line_60350_spouse = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line10", Text "Amount"] Entry Centi Amount, $sel:line11_sum:Page1 :: FieldConst Centi line11_sum = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line11", Text "Amount"] Entry Centi Amount, $sel:line12_copy:Page1 :: FieldConst Centi line12_copy = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line12", Text "Amount1"] Entry Centi Amount, $sel:line12_fraction:Page1 :: FieldConst Centi line12_fraction = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line12", Text "Amount2"] Entry Centi Amount, $sel:line13_difference:Page1 :: FieldConst Centi line13_difference = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line13", Text "Amount"] Entry Centi Amount, $sel:line_60890_separate:Page1 :: FieldConst Bool line_60890_separate = [Text] -> Entry Bool -> FieldConst Bool forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCSHRTC", Text "Line60890", Text "CheckBox"] Entry Bool Checkbox, $sel:line_60480_renovation:Page1 :: FieldConst Centi line_60480_renovation = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCSHRTC", Text "Line14", Text "Line60480", Text "Amount"] Entry Centi Amount, $sel:line14_fraction:Page1 :: FieldConst Centi line14_fraction = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCSHRTC", Text "Line14", Text "Amount"] Entry Centi Amount, $sel:line15_sum:Page1 :: FieldConst Centi line15_sum = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCSHRTC", Text "Line15", Text "Amount"] Entry Centi Amount} page2Fields :: Page2 FieldConst page2Fields = Page2 { $sel:line16_copy:Page2 :: FieldConst Centi line16_copy = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line16", Text "Amount"] Entry Centi Amount, $sel:line17_venture:Page2 :: FieldConst Centi line17_venture = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCVCTC", Text "Line17", Text "Amount"] Entry Centi Amount, $sel:line_60490_shares:Page2 :: FieldConst Centi line_60490_shares = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCVCTC", Text "Line18", Text "Amount"] Entry Centi Amount, $sel:line_60491_certificate:Page2 :: FieldConst Text line_60491_certificate = [Text] -> Entry Text -> FieldConst Text forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCVCTC", Text "Line19", Text "Account_Number_Comb_EN", Text "Account_Number"] Entry Text Textual, $sel:line_60495_shares:Page2 :: FieldConst Centi line_60495_shares = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCVCTC", Text "Line20", Text "Amount"] Entry Centi Amount, $sel:line_60496_certificate:Page2 :: FieldConst Text line_60496_certificate = [Text] -> Entry Text -> FieldConst Text forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCVCTC", Text "Line21", Text "Account_Number"] Entry Text Textual, $sel:line22_sum:Page2 :: SubCalculation FieldConst line22_sum = Text -> [Text] -> [Text] -> SubCalculation FieldConst subCalculationFields Text "BCVCTC" [Text "Line22", Text "I1", Text "Amount1"] [Text "Line22", Text "I2", Text "Amount2"], $sel:line_60510_fromT88:Page2 :: FieldConst Centi line_60510_fromT88 = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCMETC", Text "Line23", Text "Amount"] Entry Centi Amount, $sel:line_60530_fromT88:Page2 :: FieldConst Centi line_60530_fromT88 = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCMETC", Text "Line24", Text "Amount"] Entry Centi Amount, $sel:line_60545_buildings:Page2 :: FieldConst Centi line_60545_buildings = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCCBTC", Text "Line25", Text "I1", Text "Amount1"] Entry Centi Amount, $sel:line_60546_partnership:Page2 :: FieldConst Centi line_60546_partnership = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCCBTC", Text "Line26", Text "I1", Text "Amount1"] Entry Centi Amount, $sel:line27_sum:Page2 :: SubCalculation FieldConst line27_sum = Text -> [Text] -> [Text] -> SubCalculation FieldConst subCalculationFields Text "BCCBTC" [Text "Line27", Text "I1", Text "Amount1"] [Text "Line27", Text "I2", Text "Amount2"], $sel:line_60550_training:Page2 :: FieldConst Centi line_60550_training = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCTTC", Text "Line28", Text "Amount"] Entry Centi Amount, $sel:line_60560_training:Page2 :: FieldConst Centi line_60560_training = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCTTC", Text "Line29", Text "Amount"] Entry Centi Amount, $sel:line_60570_ships:Page2 :: FieldConst Centi line_60570_ships = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCTTC", Text "Line30", Text "Amount"] Entry Centi Amount, $sel:line31_sum:Page2 :: SubCalculation FieldConst line31_sum = Text -> [Text] -> [Text] -> SubCalculation FieldConst subCalculationFields Text "BCTTC" [Text "Line31", Text "I1", Text "Amount1"] [Text "Line31", Text "I2", Text "Amount2"], $sel:line32_credits:Page2 :: FieldConst Centi line32_credits = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "BCTTC", Text "Line32", Text "Amount"] Entry Centi Amount} page3Fields :: Page3 FieldConst page3Fields = Page3 { $sel:line33_copy:Page3 :: FieldConst Centi line33_copy = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line33", Text "Amount"] Entry Centi Amount, $sel:tenancy_months1:Page3 :: FieldConst Word tenancy_months1 = [Text] -> Entry Word -> FieldConst Word forall a. [Text] -> Entry a -> FieldConst a Field [Text "Table", Text "Row1", Text "Numberofmonths"] Entry Word Count, $sel:tenancy_months2:Page3 :: FieldConst Word tenancy_months2 = [Text] -> Entry Word -> FieldConst Word forall a. [Text] -> Entry a -> FieldConst a Field [Text "Table", Text "Row2", Text "Numberofmonths"] Entry Word Count, $sel:rent_paid1:Page3 :: FieldConst Centi rent_paid1 = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Table", Text "Row1", Text "RentPaid"] Entry Centi Amount, $sel:rent_paid2:Page3 :: FieldConst Centi rent_paid2 = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Table", Text "Row2", Text "Rentpaid"] Entry Centi Amount, $sel:line_60575_sum:Page3 :: FieldConst Word line_60575_sum = [Text] -> Entry Word -> FieldConst Word forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line34", Text "Amount"] Entry Word Count, $sel:line35_ceiling:Page3 :: FieldConst Centi line35_ceiling = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line35", Text "Amount_ReadOnly"] (Entry Centi -> FieldConst Centi) -> Entry Centi -> FieldConst Centi forall a b. (a -> b) -> a -> b $ Centi -> Entry Centi -> Entry Centi forall a. (Eq a, Show a) => a -> Entry a -> Entry a Constant Centi 400 Entry Centi Amount, $sel:line36_income_copy:Page3 :: FieldConst Centi line36_income_copy = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line36", Text "Amount"] Entry Centi Amount, $sel:line37_threshold:Page3 :: FieldConst Centi line37_threshold = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line37", Text "AmountRead_Only"] (Entry Centi -> FieldConst Centi) -> Entry Centi -> FieldConst Centi forall a b. (a -> b) -> a -> b $ Centi -> Entry Centi -> Entry Centi forall a. (Eq a, Show a) => a -> Entry a -> Entry a Constant Centi 60_000 Entry Centi Amount, $sel:line38_difference:Page3 :: FieldConst Centi line38_difference = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line38", Text "Amount"] Entry Centi Amount, $sel:line39_rate:Page3 :: FieldConst Rational line39_rate = [Text] -> Entry Rational -> FieldConst Rational forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line39", Text "PercentAmount_ReadOnly"] (Entry Rational -> FieldConst Rational) -> Entry Rational -> FieldConst Rational forall a b. (a -> b) -> a -> b $ Rational -> Entry Rational -> Entry Rational forall a. (Eq a, Show a) => a -> Entry a -> Entry a Constant Rational 0.02 Entry Rational Percent, $sel:line40_fraction:Page3 :: SubCalculation FieldConst line40_fraction = Text -> [Text] -> [Text] -> SubCalculation FieldConst subCalculationFields Text "Line40" [Text "L1", Text "Amount"] [Text "L2", Text "Amount2"], $sel:line_60576_difference:Page3 :: SubCalculation FieldConst line_60576_difference = Text -> [Text] -> [Text] -> SubCalculation FieldConst subCalculationFields Text "Line41" [Text "I1", Text "Amount1"] [Text "I2", Text "Amount2"], $sel:line42_credits:Page3 :: FieldConst Centi line42_credits = [Text] -> Entry Centi -> FieldConst Centi forall a. [Text] -> Entry a -> FieldConst a Field [Text "Line42", Text "Amount"] Entry Centi Amount}