--
-- Created by Ada Mill (https://github.com/grahamstark/ada_mill)
-- 

with GNAT.Calendar.Time_IO;
-- === CUSTOM IMPORTS START ===
-- === CUSTOM IMPORTS END ===

package body Ukds.frs is

   use ada.strings.Unbounded;
   package tio renames GNAT.Calendar.Time_IO;

   -- === CUSTOM TYPES START ===
   -- === CUSTOM TYPES END ===
   
   
   function To_String( rec : Vehicle ) return String is
   begin
      return  "Vehicle: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "vehseq = " & rec.vehseq'Img &
         "vehic = " & rec.vehic'Img &
         "vehown = " & rec.vehown'Img &
         "month = " & rec.month'Img;
   end to_String;


   function To_String( rec : Transact ) return String is
   begin
      return  "Transact: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "key1 = " & rec.key1'Img &
         "key2 = " & rec.key2'Img &
         "key3 = " & rec.key3'Img &
         "key4 = " & rec.key4'Img &
         "key5 = " & rec.key5'Img &
         "frstable = " & To_String( rec.frstable ) &
         "frsvar = " & To_String( rec.frsvar ) &
         "old_val = " & rec.old_val'Img &
         "new_val = " & rec.new_val'Img &
         "datetime = " & tio.Image( rec.datetime, tio.ISO_Date ) &
         "appldate = " & tio.Image( rec.appldate, tio.ISO_Date ) &
         "batch = " & rec.batch'Img &
         "trantype = " & To_String( rec.trantype ) &
         "reason = " & rec.reason'Img &
         "rowid = " & rec.rowid'Img;
   end to_String;


   function To_String( rec : Renter ) return String is
   begin
      return  "Renter: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "accjbp01 = " & rec.accjbp01'Img &
         "accjbp02 = " & rec.accjbp02'Img &
         "accjbp03 = " & rec.accjbp03'Img &
         "accjbp04 = " & rec.accjbp04'Img &
         "accjbp05 = " & rec.accjbp05'Img &
         "accjbp06 = " & rec.accjbp06'Img &
         "accjbp07 = " & rec.accjbp07'Img &
         "accjbp08 = " & rec.accjbp08'Img &
         "accjbp09 = " & rec.accjbp09'Img &
         "accjbp10 = " & rec.accjbp10'Img &
         "accjbp11 = " & rec.accjbp11'Img &
         "accjbp12 = " & rec.accjbp12'Img &
         "accjbp13 = " & rec.accjbp13'Img &
         "accjbp14 = " & rec.accjbp14'Img &
         "accjob = " & rec.accjob'Img &
         "accnonhh = " & rec.accnonhh'Img &
         "ctract = " & rec.ctract'Img &
         "eligamt = " & rec.eligamt'Img &
         "eligpd = " & rec.eligpd'Img &
         "fairrent = " & rec.fairrent'Img &
         "furnish = " & rec.furnish'Img &
         "hbenamt = " & rec.hbenamt'Img &
         "hbenchk = " & rec.hbenchk'Img &
         "hbenefit = " & rec.hbenefit'Img &
         "hbenpd = " & rec.hbenpd'Img &
         "hbenwait = " & rec.hbenwait'Img &
         "hbweeks = " & rec.hbweeks'Img &
         "landlord = " & rec.landlord'Img &
         "niystart = " & rec.niystart'Img &
         "othway = " & rec.othway'Img &
         "rebate = " & rec.rebate'Img &
         "rent = " & rec.rent'Img &
         "rentdk = " & rec.rentdk'Img &
         "rentdoc = " & rec.rentdoc'Img &
         "rentfull = " & rec.rentfull'Img &
         "renthol = " & rec.renthol'Img &
         "rentpd = " & rec.rentpd'Img &
         "resll = " & rec.resll'Img &
         "resll2 = " & rec.resll2'Img &
         "serinc1 = " & rec.serinc1'Img &
         "serinc2 = " & rec.serinc2'Img &
         "serinc3 = " & rec.serinc3'Img &
         "serinc4 = " & rec.serinc4'Img &
         "serinc5 = " & rec.serinc5'Img &
         "short1 = " & rec.short1'Img &
         "short2 = " & rec.short2'Img &
         "weekhol = " & rec.weekhol'Img &
         "wsinc = " & rec.wsinc'Img &
         "wsincamt = " & rec.wsincamt'Img &
         "ystartr = " & rec.ystartr'Img &
         "month = " & rec.month'Img &
         "hbyears = " & rec.hbyears'Img &
         "lowshort = " & rec.lowshort'Img &
         "othtype = " & rec.othtype'Img &
         "tentype = " & rec.tentype'Img &
         "hbmnth = " & rec.hbmnth'Img &
         "hbyear = " & rec.hbyear'Img &
         "issue = " & rec.issue'Img &
         "hbrecp = " & rec.hbrecp'Img &
         "lhaexs = " & rec.lhaexs'Img &
         "lhalss = " & rec.lhalss'Img &
         "rentpd1 = " & rec.rentpd1'Img &
         "rentpd2 = " & rec.rentpd2'Img &
         "serinc6 = " & rec.serinc6'Img &
         "serinc7 = " & rec.serinc7'Img &
         "serinc8 = " & rec.serinc8'Img &
         "serincam = " & rec.serincam'Img;
   end to_String;


   function To_String( rec : Rentcont ) return String is
   begin
      return  "Rentcont: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "rentseq = " & rec.rentseq'Img &
         "accamt = " & rec.accamt'Img &
         "accchk = " & rec.accchk'Img &
         "accpay = " & rec.accpay'Img &
         "accpd = " & rec.accpd'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img;
   end to_String;


   function To_String( rec : Prscrptn ) return String is
   begin
      return  "Prscrptn: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "issue = " & rec.issue'Img &
         "med12m01 = " & rec.med12m01'Img &
         "med12m02 = " & rec.med12m02'Img &
         "med12m03 = " & rec.med12m03'Img &
         "med12m04 = " & rec.med12m04'Img &
         "med12m05 = " & rec.med12m05'Img &
         "med12m06 = " & rec.med12m06'Img &
         "med12m07 = " & rec.med12m07'Img &
         "med12m08 = " & rec.med12m08'Img &
         "med12m09 = " & rec.med12m09'Img &
         "med12m10 = " & rec.med12m10'Img &
         "med12m11 = " & rec.med12m11'Img &
         "med12m12 = " & rec.med12m12'Img &
         "med12m13 = " & rec.med12m13'Img &
         "medrep = " & rec.medrep'Img &
         "medrpnm = " & rec.medrpnm'Img &
         "month = " & rec.month'Img;
   end to_String;


   function To_String( rec : Pianon1516 ) return String is
   begin
      return  "Pianon1516: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "gvtregn = " & rec.gvtregn'Img &
         "fambu = " & rec.fambu'Img &
         "newfambu = " & rec.newfambu'Img &
         "sexhd = " & rec.sexhd'Img &
         "adultb = " & rec.adultb'Img &
         "benunit = " & rec.benunit'Img &
         "ethgrphh = " & rec.ethgrphh'Img &
         "chbenbu = " & rec.chbenbu'Img &
         "winpaybu = " & rec.winpaybu'Img &
         "gs_newbu = " & rec.gs_newbu'Img &
         "gs_newpp = " & rec.gs_newpp'Img &
         "mbhcdec = " & rec.mbhcdec'Img &
         "obhcdec = " & rec.obhcdec'Img &
         "mahcdec = " & rec.mahcdec'Img &
         "oahcdec = " & rec.oahcdec'Img &
         "sexsp = " & rec.sexsp'Img &
         "newfamb2 = " & rec.newfamb2'Img &
         "pidefbhc = " & rec.pidefbhc'Img &
         "pidefahc = " & rec.pidefahc'Img &
         "pigrosbu = " & rec.pigrosbu'Img &
         "pinincbu = " & rec.pinincbu'Img &
         "pigoccbu = " & rec.pigoccbu'Img &
         "pippenbu = " & rec.pippenbu'Img &
         "piginvbu = " & rec.piginvbu'Img &
         "pigernbu = " & rec.pigernbu'Img &
         "pibenibu = " & rec.pibenibu'Img &
         "piothibu = " & rec.piothibu'Img &
         "pinahcbu = " & rec.pinahcbu'Img &
         "piirbbu = " & rec.piirbbu'Img &
         "pidisben = " & rec.pidisben'Img &
         "piretben = " & rec.piretben'Img &
         "pripenbu = " & rec.pripenbu'Img &
         "tvpaybu = " & rec.tvpaybu'Img &
         "nonben2bu = " & rec.nonben2bu'Img &
         "perbenbu = " & rec.perbenbu'Img &
         "perbenbu2 = " & rec.perbenbu2'Img &
         "rrpen = " & rec.rrpen'Img &
         "newfambu2 = " & rec.newfambu2'Img &
         "dummy = " & rec.dummy'Img &
         "coup_q1 = " & rec.coup_q1'Img &
         "coup_q2 = " & rec.coup_q2'Img &
         "coup_q3 = " & rec.coup_q3'Img &
         "coup_q4 = " & rec.coup_q4'Img &
         "coup_q5 = " & rec.coup_q5'Img &
         "acou_q1 = " & rec.acou_q1'Img &
         "acou_q2 = " & rec.acou_q2'Img &
         "acou_q3 = " & rec.acou_q3'Img &
         "acou_q4 = " & rec.acou_q4'Img &
         "acou_q5 = " & rec.acou_q5'Img &
         "sing_q1 = " & rec.sing_q1'Img &
         "sing_q2 = " & rec.sing_q2'Img &
         "sing_q3 = " & rec.sing_q3'Img &
         "sing_q4 = " & rec.sing_q4'Img &
         "sing_q5 = " & rec.sing_q5'Img &
         "asin_q1 = " & rec.asin_q1'Img &
         "asin_q2 = " & rec.asin_q2'Img &
         "asin_q3 = " & rec.asin_q3'Img &
         "asin_q4 = " & rec.asin_q4'Img &
         "asin_q5 = " & rec.asin_q5'Img &
         "clust = " & rec.clust'Img &
         "strat = " & rec.strat'Img &
         "agehd80 = " & rec.agehd80'Img &
         "agesp80 = " & rec.agesp80'Img &
         "sernum = " & rec.sernum'Img;
   end to_String;


   function To_String( rec : Pianon1415 ) return String is
   begin
      return  "Pianon1415: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "gvtregn = " & rec.gvtregn'Img &
         "fambu = " & rec.fambu'Img &
         "newfambu = " & rec.newfambu'Img &
         "sexhd = " & rec.sexhd'Img &
         "adultb = " & rec.adultb'Img &
         "benunit = " & rec.benunit'Img &
         "ethgrphh = " & rec.ethgrphh'Img &
         "winpaybu = " & rec.winpaybu'Img &
         "gs_newbu = " & rec.gs_newbu'Img &
         "gs_newpp = " & rec.gs_newpp'Img &
         "mbhcdec = " & rec.mbhcdec'Img &
         "obhcdec = " & rec.obhcdec'Img &
         "mahcdec = " & rec.mahcdec'Img &
         "oahcdec = " & rec.oahcdec'Img &
         "sexsp = " & rec.sexsp'Img &
         "newfamb2 = " & rec.newfamb2'Img &
         "pidefbhc = " & rec.pidefbhc'Img &
         "pidefahc = " & rec.pidefahc'Img &
         "pigrosbu = " & rec.pigrosbu'Img &
         "pinincbu = " & rec.pinincbu'Img &
         "pigoccbu = " & rec.pigoccbu'Img &
         "pippenbu = " & rec.pippenbu'Img &
         "piginvbu = " & rec.piginvbu'Img &
         "pigernbu = " & rec.pigernbu'Img &
         "pibenibu = " & rec.pibenibu'Img &
         "piothibu = " & rec.piothibu'Img &
         "pinahcbu = " & rec.pinahcbu'Img &
         "pinannbu = " & rec.pinannbu'Img &
         "piirbbu = " & rec.piirbbu'Img &
         "pidisben = " & rec.pidisben'Img &
         "piretben = " & rec.piretben'Img &
         "pripenbu = " & rec.pripenbu'Img &
         "tvpaybu = " & rec.tvpaybu'Img &
         "nonben2bu = " & rec.nonben2bu'Img &
         "perbenbu = " & rec.perbenbu'Img &
         "perbenbu2 = " & rec.perbenbu2'Img &
         "rrpen = " & rec.rrpen'Img &
         "newfambu2 = " & rec.newfambu2'Img &
         "dummy = " & rec.dummy'Img &
         "coup_q1 = " & rec.coup_q1'Img &
         "coup_q2 = " & rec.coup_q2'Img &
         "coup_q3 = " & rec.coup_q3'Img &
         "coup_q4 = " & rec.coup_q4'Img &
         "coup_q5 = " & rec.coup_q5'Img &
         "acou_q1 = " & rec.acou_q1'Img &
         "acou_q2 = " & rec.acou_q2'Img &
         "acou_q3 = " & rec.acou_q3'Img &
         "acou_q4 = " & rec.acou_q4'Img &
         "acou_q5 = " & rec.acou_q5'Img &
         "sing_q1 = " & rec.sing_q1'Img &
         "sing_q2 = " & rec.sing_q2'Img &
         "sing_q3 = " & rec.sing_q3'Img &
         "sing_q4 = " & rec.sing_q4'Img &
         "sing_q5 = " & rec.sing_q5'Img &
         "asin_q1 = " & rec.asin_q1'Img &
         "asin_q2 = " & rec.asin_q2'Img &
         "asin_q3 = " & rec.asin_q3'Img &
         "asin_q4 = " & rec.asin_q4'Img &
         "asin_q5 = " & rec.asin_q5'Img &
         "clust = " & rec.clust'Img &
         "strat = " & rec.strat'Img &
         "agehd80 = " & rec.agehd80'Img &
         "agesp80 = " & rec.agesp80'Img &
         "sernum = " & rec.sernum'Img;
   end to_String;


   function To_String( rec : Pianon1314 ) return String is
   begin
      return  "Pianon1314: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "gvtregn = " & rec.gvtregn'Img &
         "fambu = " & rec.fambu'Img &
         "newfambu = " & rec.newfambu'Img &
         "sexhd = " & rec.sexhd'Img &
         "adultb = " & rec.adultb'Img &
         "benunit = " & rec.benunit'Img &
         "ethgrphh = " & rec.ethgrphh'Img &
         "gs_newbu = " & rec.gs_newbu'Img &
         "gs_newpp = " & rec.gs_newpp'Img &
         "mbhcdec = " & rec.mbhcdec'Img &
         "obhcdec = " & rec.obhcdec'Img &
         "mahcdec = " & rec.mahcdec'Img &
         "oahcdec = " & rec.oahcdec'Img &
         "sexsp = " & rec.sexsp'Img &
         "newfamb2 = " & rec.newfamb2'Img &
         "pidefbhc = " & rec.pidefbhc'Img &
         "pidefahc = " & rec.pidefahc'Img &
         "pigrosbu = " & rec.pigrosbu'Img &
         "pinincbu = " & rec.pinincbu'Img &
         "pigoccbu = " & rec.pigoccbu'Img &
         "pippenbu = " & rec.pippenbu'Img &
         "piginvbu = " & rec.piginvbu'Img &
         "pigernbu = " & rec.pigernbu'Img &
         "pibenibu = " & rec.pibenibu'Img &
         "piothibu = " & rec.piothibu'Img &
         "pinahcbu = " & rec.pinahcbu'Img &
         "piirbbu = " & rec.piirbbu'Img &
         "pidisben = " & rec.pidisben'Img &
         "piretben = " & rec.piretben'Img &
         "pripenbu = " & rec.pripenbu'Img &
         "nonben2bu = " & rec.nonben2bu'Img &
         "perbenbu = " & rec.perbenbu'Img &
         "perbenbu2 = " & rec.perbenbu2'Img &
         "rrpen = " & rec.rrpen'Img &
         "newfambu2 = " & rec.newfambu2'Img &
         "dummy = " & rec.dummy'Img &
         "coup_q1 = " & rec.coup_q1'Img &
         "coup_q2 = " & rec.coup_q2'Img &
         "coup_q3 = " & rec.coup_q3'Img &
         "coup_q4 = " & rec.coup_q4'Img &
         "coup_q5 = " & rec.coup_q5'Img &
         "acou_q1 = " & rec.acou_q1'Img &
         "acou_q2 = " & rec.acou_q2'Img &
         "acou_q3 = " & rec.acou_q3'Img &
         "acou_q4 = " & rec.acou_q4'Img &
         "acou_q5 = " & rec.acou_q5'Img &
         "sing_q1 = " & rec.sing_q1'Img &
         "sing_q2 = " & rec.sing_q2'Img &
         "sing_q3 = " & rec.sing_q3'Img &
         "sing_q4 = " & rec.sing_q4'Img &
         "sing_q5 = " & rec.sing_q5'Img &
         "asin_q1 = " & rec.asin_q1'Img &
         "asin_q2 = " & rec.asin_q2'Img &
         "asin_q3 = " & rec.asin_q3'Img &
         "asin_q4 = " & rec.asin_q4'Img &
         "asin_q5 = " & rec.asin_q5'Img &
         "clust = " & rec.clust'Img &
         "strat = " & rec.strat'Img &
         "agehd80 = " & rec.agehd80'Img &
         "agesp80 = " & rec.agesp80'Img &
         "sernum = " & rec.sernum'Img;
   end to_String;


   function To_String( rec : Pianon1213 ) return String is
   begin
      return  "Pianon1213: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "gvtregn = " & rec.gvtregn'Img &
         "fambu = " & rec.fambu'Img &
         "newfambu = " & rec.newfambu'Img &
         "sexhd = " & rec.sexhd'Img &
         "adultb = " & rec.adultb'Img &
         "benunit = " & rec.benunit'Img &
         "ethgrphh = " & rec.ethgrphh'Img &
         "gs_newbu = " & rec.gs_newbu'Img &
         "gs_newpp = " & rec.gs_newpp'Img &
         "mbhcdec = " & rec.mbhcdec'Img &
         "obhcdec = " & rec.obhcdec'Img &
         "mahcdec = " & rec.mahcdec'Img &
         "oahcdec = " & rec.oahcdec'Img &
         "sexsp = " & rec.sexsp'Img &
         "newfamb2 = " & rec.newfamb2'Img &
         "pidefbhc = " & rec.pidefbhc'Img &
         "pidefahc = " & rec.pidefahc'Img &
         "pigrosbu = " & rec.pigrosbu'Img &
         "pinincbu = " & rec.pinincbu'Img &
         "pigoccbu = " & rec.pigoccbu'Img &
         "pippenbu = " & rec.pippenbu'Img &
         "piginvbu = " & rec.piginvbu'Img &
         "pigernbu = " & rec.pigernbu'Img &
         "pibenibu = " & rec.pibenibu'Img &
         "piothibu = " & rec.piothibu'Img &
         "pinahcbu = " & rec.pinahcbu'Img &
         "piirbbu = " & rec.piirbbu'Img &
         "pidisben = " & rec.pidisben'Img &
         "piretben = " & rec.piretben'Img &
         "pripenbu = " & rec.pripenbu'Img &
         "nonben2bu = " & rec.nonben2bu'Img &
         "perbenbu = " & rec.perbenbu'Img &
         "perbenbu2 = " & rec.perbenbu2'Img &
         "rrpen = " & rec.rrpen'Img &
         "newfambu2 = " & rec.newfambu2'Img &
         "dummy = " & rec.dummy'Img &
         "coup_q1 = " & rec.coup_q1'Img &
         "coup_q2 = " & rec.coup_q2'Img &
         "coup_q3 = " & rec.coup_q3'Img &
         "coup_q4 = " & rec.coup_q4'Img &
         "coup_q5 = " & rec.coup_q5'Img &
         "acou_q1 = " & rec.acou_q1'Img &
         "acou_q2 = " & rec.acou_q2'Img &
         "acou_q3 = " & rec.acou_q3'Img &
         "acou_q4 = " & rec.acou_q4'Img &
         "acou_q5 = " & rec.acou_q5'Img &
         "sing_q1 = " & rec.sing_q1'Img &
         "sing_q2 = " & rec.sing_q2'Img &
         "sing_q3 = " & rec.sing_q3'Img &
         "sing_q4 = " & rec.sing_q4'Img &
         "sing_q5 = " & rec.sing_q5'Img &
         "asin_q1 = " & rec.asin_q1'Img &
         "asin_q2 = " & rec.asin_q2'Img &
         "asin_q3 = " & rec.asin_q3'Img &
         "asin_q4 = " & rec.asin_q4'Img &
         "asin_q5 = " & rec.asin_q5'Img &
         "clust = " & rec.clust'Img &
         "strat = " & rec.strat'Img &
         "agehd80 = " & rec.agehd80'Img &
         "agesp80 = " & rec.agesp80'Img &
         "sernum = " & rec.sernum'Img;
   end to_String;


   function To_String( rec : Pianon1011 ) return String is
   begin
      return  "Pianon1011: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "gvtregn = " & rec.gvtregn'Img &
         "fambu = " & rec.fambu'Img &
         "newfambu = " & rec.newfambu'Img &
         "sexhd = " & rec.sexhd'Img &
         "adultb = " & rec.adultb'Img &
         "benunit = " & rec.benunit'Img &
         "ethgrphh = " & rec.ethgrphh'Img &
         "gs_newbu = " & rec.gs_newbu'Img &
         "gs_newpp = " & rec.gs_newpp'Img &
         "mbhcdec = " & rec.mbhcdec'Img &
         "obhcdec = " & rec.obhcdec'Img &
         "mahcdec = " & rec.mahcdec'Img &
         "oahcdec = " & rec.oahcdec'Img &
         "sexsp = " & rec.sexsp'Img &
         "newfamb2 = " & rec.newfamb2'Img &
         "pidefbhc = " & rec.pidefbhc'Img &
         "pidefahc = " & rec.pidefahc'Img &
         "pigrosbu = " & rec.pigrosbu'Img &
         "pinincbu = " & rec.pinincbu'Img &
         "pigoccbu = " & rec.pigoccbu'Img &
         "pippenbu = " & rec.pippenbu'Img &
         "piginvbu = " & rec.piginvbu'Img &
         "pigernbu = " & rec.pigernbu'Img &
         "pibenibu = " & rec.pibenibu'Img &
         "piothibu = " & rec.piothibu'Img &
         "pinahcbu = " & rec.pinahcbu'Img &
         "piirbbu = " & rec.piirbbu'Img &
         "pidisben = " & rec.pidisben'Img &
         "piretben = " & rec.piretben'Img &
         "pripenbu = " & rec.pripenbu'Img &
         "nonben2bu = " & rec.nonben2bu'Img &
         "perbenbu = " & rec.perbenbu'Img &
         "perbenbu2 = " & rec.perbenbu2'Img &
         "rrpen = " & rec.rrpen'Img &
         "newfambu2 = " & rec.newfambu2'Img &
         "dummy = " & rec.dummy'Img &
         "coup_q1 = " & rec.coup_q1'Img &
         "coup_q2 = " & rec.coup_q2'Img &
         "coup_q3 = " & rec.coup_q3'Img &
         "coup_q4 = " & rec.coup_q4'Img &
         "coup_q5 = " & rec.coup_q5'Img &
         "acou_q1 = " & rec.acou_q1'Img &
         "acou_q2 = " & rec.acou_q2'Img &
         "acou_q3 = " & rec.acou_q3'Img &
         "acou_q4 = " & rec.acou_q4'Img &
         "acou_q5 = " & rec.acou_q5'Img &
         "sing_q1 = " & rec.sing_q1'Img &
         "sing_q2 = " & rec.sing_q2'Img &
         "sing_q3 = " & rec.sing_q3'Img &
         "sing_q4 = " & rec.sing_q4'Img &
         "sing_q5 = " & rec.sing_q5'Img &
         "asin_q1 = " & rec.asin_q1'Img &
         "asin_q2 = " & rec.asin_q2'Img &
         "asin_q3 = " & rec.asin_q3'Img &
         "asin_q4 = " & rec.asin_q4'Img &
         "asin_q5 = " & rec.asin_q5'Img &
         "clust = " & rec.clust'Img &
         "strat = " & rec.strat'Img &
         "agehd80 = " & rec.agehd80'Img &
         "agesp80 = " & rec.agesp80'Img &
         "sernum = " & rec.sernum'Img;
   end to_String;


   function To_String( rec : Pianon0910 ) return String is
   begin
      return  "Pianon0910: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "gvtregn = " & rec.gvtregn'Img &
         "fambu = " & rec.fambu'Img &
         "newfambu = " & rec.newfambu'Img &
         "sexhd = " & rec.sexhd'Img &
         "adultb = " & rec.adultb'Img &
         "ethgrphh = " & rec.ethgrphh'Img &
         "benunit = " & rec.benunit'Img &
         "gs_newbu = " & rec.gs_newbu'Img &
         "gs_newpp = " & rec.gs_newpp'Img &
         "mbhcdec = " & rec.mbhcdec'Img &
         "obhcdec = " & rec.obhcdec'Img &
         "mahcdec = " & rec.mahcdec'Img &
         "oahcdec = " & rec.oahcdec'Img &
         "sexsp = " & rec.sexsp'Img &
         "pidefbhc = " & rec.pidefbhc'Img &
         "pidefahc = " & rec.pidefahc'Img &
         "pigrosbu = " & rec.pigrosbu'Img &
         "pinincbu = " & rec.pinincbu'Img &
         "pigoccbu = " & rec.pigoccbu'Img &
         "pippenbu = " & rec.pippenbu'Img &
         "piginvbu = " & rec.piginvbu'Img &
         "pigernbu = " & rec.pigernbu'Img &
         "pibenibu = " & rec.pibenibu'Img &
         "piothibu = " & rec.piothibu'Img &
         "pinahcbu = " & rec.pinahcbu'Img &
         "piirbbu = " & rec.piirbbu'Img &
         "pidisben = " & rec.pidisben'Img &
         "piretben = " & rec.piretben'Img &
         "pripenbu = " & rec.pripenbu'Img &
         "nonben2bu = " & rec.nonben2bu'Img &
         "perbenbu = " & rec.perbenbu'Img &
         "perbenbu2 = " & rec.perbenbu2'Img &
         "rrpen = " & rec.rrpen'Img &
         "newfambu2 = " & rec.newfambu2'Img &
         "newfamb2 = " & rec.newfamb2'Img &
         "dummy = " & rec.dummy'Img &
         "coup_q1 = " & rec.coup_q1'Img &
         "coup_q2 = " & rec.coup_q2'Img &
         "coup_q3 = " & rec.coup_q3'Img &
         "coup_q4 = " & rec.coup_q4'Img &
         "coup_q5 = " & rec.coup_q5'Img &
         "acou_q1 = " & rec.acou_q1'Img &
         "acou_q2 = " & rec.acou_q2'Img &
         "acou_q3 = " & rec.acou_q3'Img &
         "acou_q4 = " & rec.acou_q4'Img &
         "acou_q5 = " & rec.acou_q5'Img &
         "sing_q1 = " & rec.sing_q1'Img &
         "sing_q2 = " & rec.sing_q2'Img &
         "sing_q3 = " & rec.sing_q3'Img &
         "sing_q4 = " & rec.sing_q4'Img &
         "sing_q5 = " & rec.sing_q5'Img &
         "asin_q1 = " & rec.asin_q1'Img &
         "asin_q2 = " & rec.asin_q2'Img &
         "asin_q3 = " & rec.asin_q3'Img &
         "asin_q4 = " & rec.asin_q4'Img &
         "asin_q5 = " & rec.asin_q5'Img &
         "clust = " & rec.clust'Img &
         "strat = " & rec.strat'Img &
         "agehd80 = " & rec.agehd80'Img &
         "agesp80 = " & rec.agesp80'Img &
         "sernum = " & rec.sernum'Img;
   end to_String;


   function To_String( rec : Pianom0809 ) return String is
   begin
      return  "Pianom0809: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "gvtregn = " & rec.gvtregn'Img &
         "fambu = " & rec.fambu'Img &
         "newfambu = " & rec.newfambu'Img &
         "sexhd = " & rec.sexhd'Img &
         "london = " & rec.london'Img &
         "adultb = " & rec.adultb'Img &
         "ethgrphh = " & rec.ethgrphh'Img &
         "benunit = " & rec.benunit'Img &
         "gs_newbu = " & rec.gs_newbu'Img &
         "gs_newpp = " & rec.gs_newpp'Img &
         "mbhcdec = " & rec.mbhcdec'Img &
         "obhcdec = " & rec.obhcdec'Img &
         "mahcdec = " & rec.mahcdec'Img &
         "oahcdec = " & rec.oahcdec'Img &
         "sexsp = " & rec.sexsp'Img &
         "pidefbhc = " & rec.pidefbhc'Img &
         "pidefahc = " & rec.pidefahc'Img &
         "pigrosbu = " & rec.pigrosbu'Img &
         "pinincbu = " & rec.pinincbu'Img &
         "pigoccbu = " & rec.pigoccbu'Img &
         "pippenbu = " & rec.pippenbu'Img &
         "piginvbu = " & rec.piginvbu'Img &
         "pigernbu = " & rec.pigernbu'Img &
         "pibenibu = " & rec.pibenibu'Img &
         "piothibu = " & rec.piothibu'Img &
         "pinahcbu = " & rec.pinahcbu'Img &
         "piirbbu = " & rec.piirbbu'Img &
         "pidisben = " & rec.pidisben'Img &
         "piretben = " & rec.piretben'Img &
         "pripenbu = " & rec.pripenbu'Img &
         "nonben2bu = " & rec.nonben2bu'Img &
         "perbenbu = " & rec.perbenbu'Img &
         "perbenbu2 = " & rec.perbenbu2'Img &
         "rrpen = " & rec.rrpen'Img &
         "newfambu2 = " & rec.newfambu2'Img &
         "dummy = " & rec.dummy'Img &
         "coup_q1 = " & rec.coup_q1'Img &
         "coup_q2 = " & rec.coup_q2'Img &
         "coup_q3 = " & rec.coup_q3'Img &
         "coup_q4 = " & rec.coup_q4'Img &
         "coup_q5 = " & rec.coup_q5'Img &
         "acou_q1 = " & rec.acou_q1'Img &
         "acou_q2 = " & rec.acou_q2'Img &
         "acou_q3 = " & rec.acou_q3'Img &
         "acou_q4 = " & rec.acou_q4'Img &
         "acou_q5 = " & rec.acou_q5'Img &
         "sing_q1 = " & rec.sing_q1'Img &
         "sing_q2 = " & rec.sing_q2'Img &
         "sing_q3 = " & rec.sing_q3'Img &
         "sing_q4 = " & rec.sing_q4'Img &
         "sing_q5 = " & rec.sing_q5'Img &
         "asin_q1 = " & rec.asin_q1'Img &
         "asin_q2 = " & rec.asin_q2'Img &
         "asin_q3 = " & rec.asin_q3'Img &
         "asin_q4 = " & rec.asin_q4'Img &
         "asin_q5 = " & rec.asin_q5'Img &
         "clust = " & rec.clust'Img &
         "strat = " & rec.strat'Img &
         "agehd80 = " & rec.agehd80'Img &
         "agesp80 = " & rec.agesp80'Img &
         "sernum = " & rec.sernum'Img;
   end to_String;


   function To_String( rec : Pension ) return String is
   begin
      return  "Pension: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "penseq = " & rec.penseq'Img &
         "another = " & rec.another'Img &
         "penoth = " & rec.penoth'Img &
         "penpay = " & rec.penpay'Img &
         "penpd = " & rec.penpd'Img &
         "pentax = " & rec.pentax'Img &
         "pentype = " & rec.pentype'Img &
         "poamt = " & rec.poamt'Img &
         "poinc = " & rec.poinc'Img &
         "posour = " & rec.posour'Img &
         "ptamt = " & rec.ptamt'Img &
         "ptinc = " & rec.ptinc'Img &
         "trights = " & rec.trights'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img &
         "penpd1 = " & rec.penpd1'Img &
         "penpd2 = " & rec.penpd2'Img;
   end to_String;


   function To_String( rec : Penprov ) return String is
   begin
      return  "Penprov: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "counter = " & rec.counter'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "stemppay = " & rec.stemppay'Img &
         "provseq = " & rec.provseq'Img &
         "eplong = " & rec.eplong'Img &
         "eptype = " & rec.eptype'Img &
         "keeppen = " & rec.keeppen'Img &
         "opgov = " & rec.opgov'Img &
         "penamt = " & rec.penamt'Img &
         "penamtpd = " & rec.penamtpd'Img &
         "pencon = " & rec.pencon'Img &
         "pendat = " & rec.pendat'Img &
         "pengov = " & rec.pengov'Img &
         "penhelp = " & rec.penhelp'Img &
         "penmort = " & rec.penmort'Img &
         "spwho = " & rec.spwho'Img &
         "month = " & rec.month'Img &
         "stemppen = " & rec.stemppen'Img &
         "penreb = " & rec.penreb'Img &
         "rebgov = " & rec.rebgov'Img &
         "issue = " & rec.issue'Img &
         "penamtdt = " & tio.Image( rec.penamtdt, tio.ISO_Date ) &
         "penchk = " & rec.penchk'Img;
   end to_String;


   function To_String( rec : Penamt ) return String is
   begin
      return  "Penamt: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "counter = " & rec.counter'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "benefit = " & rec.benefit'Img &
         "amttype = " & rec.amttype'Img &
         "penq = " & rec.penq'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img;
   end to_String;


   function To_String( rec : Owner ) return String is
   begin
      return  "Owner: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "counter = " & rec.counter'Img &
         "sernum = " & rec.sernum'Img &
         "buyyear = " & rec.buyyear'Img &
         "othmort1 = " & rec.othmort1'Img &
         "othmort2 = " & rec.othmort2'Img &
         "othmort3 = " & rec.othmort3'Img &
         "othpur1 = " & rec.othpur1'Img &
         "othpur2 = " & rec.othpur2'Img &
         "othpur3 = " & rec.othpur3'Img &
         "othpur31 = " & rec.othpur31'Img &
         "othpur32 = " & rec.othpur32'Img &
         "othpur33 = " & rec.othpur33'Img &
         "othpur34 = " & rec.othpur34'Img &
         "othpur35 = " & rec.othpur35'Img &
         "othpur36 = " & rec.othpur36'Img &
         "othpur37 = " & rec.othpur37'Img &
         "othpur4 = " & rec.othpur4'Img &
         "othpur5 = " & rec.othpur5'Img &
         "othpur6 = " & rec.othpur6'Img &
         "othpur7 = " & rec.othpur7'Img &
         "purcamt = " & rec.purcamt'Img &
         "purcloan = " & rec.purcloan'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img;
   end to_String;


   function To_String( rec : Oddjob ) return String is
   begin
      return  "Oddjob: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "counter = " & rec.counter'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "oddtype = " & rec.oddtype'Img &
         "oddseq = " & rec.oddseq'Img &
         "ojamt = " & rec.ojamt'Img &
         "ojnow = " & rec.ojnow'Img &
         "ojreg = " & rec.ojreg'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img &
         "jobstat = " & rec.jobstat'Img;
   end to_String;


   function To_String( rec : Nimigra ) return String is
   begin
      return  "Nimigra: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "counter = " & rec.counter'Img &
         "sernum = " & rec.sernum'Img &
         "miper = " & rec.miper'Img &
         "issue = " & rec.issue'Img &
         "miage = " & rec.miage'Img &
         "misex = " & rec.misex'Img &
         "mnthleft = " & rec.mnthleft'Img &
         "more1yr = " & rec.more1yr'Img &
         "wherenow = " & rec.wherenow'Img &
         "month = " & rec.month'Img &
         "miagegr = " & rec.miagegr'Img;
   end to_String;


   function To_String( rec : Nimigr ) return String is
   begin
      return  "Nimigr: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "counter = " & rec.counter'Img &
         "sernum = " & rec.sernum'Img &
         "miper = " & rec.miper'Img &
         "issue = " & rec.issue'Img &
         "miage = " & rec.miage'Img &
         "misex = " & rec.misex'Img &
         "mnthleft = " & rec.mnthleft'Img &
         "more1yr = " & rec.more1yr'Img &
         "wherenow = " & rec.wherenow'Img &
         "month = " & rec.month'Img &
         "miagegr = " & rec.miagegr'Img;
   end to_String;


   function To_String( rec : Mortgage ) return String is
   begin
      return  "Mortgage: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "mortseq = " & rec.mortseq'Img &
         "boramtdk = " & rec.boramtdk'Img &
         "borramt = " & rec.borramt'Img &
         "endwpri1 = " & rec.endwpri1'Img &
         "endwpri2 = " & rec.endwpri2'Img &
         "endwpri3 = " & rec.endwpri3'Img &
         "endwpri4 = " & rec.endwpri4'Img &
         "exrent = " & rec.exrent'Img &
         "incminc1 = " & rec.incminc1'Img &
         "incminc2 = " & rec.incminc2'Img &
         "incminc3 = " & rec.incminc3'Img &
         "incmp1 = " & rec.incmp1'Img &
         "incmp2 = " & rec.incmp2'Img &
         "incmp3 = " & rec.incmp3'Img &
         "incmpam1 = " & rec.incmpam1'Img &
         "incmpam2 = " & rec.incmpam2'Img &
         "incmpam3 = " & rec.incmpam3'Img &
         "incmppd1 = " & rec.incmppd1'Img &
         "incmppd2 = " & rec.incmppd2'Img &
         "incmppd3 = " & rec.incmppd3'Img &
         "incmsty1 = " & rec.incmsty1'Img &
         "incmsty2 = " & rec.incmsty2'Img &
         "incmsty3 = " & rec.incmsty3'Img &
         "intprpay = " & rec.intprpay'Img &
         "intprpd = " & rec.intprpd'Img &
         "intru = " & rec.intru'Img &
         "intrupd = " & rec.intrupd'Img &
         "intrus = " & rec.intrus'Img &
         "loan2y = " & rec.loan2y'Img &
         "loanyear = " & rec.loanyear'Img &
         "menpol = " & rec.menpol'Img &
         "morall = " & rec.morall'Img &
         "morflc = " & rec.morflc'Img &
         "morinpay = " & rec.morinpay'Img &
         "morinpd = " & rec.morinpd'Img &
         "morinus = " & rec.morinus'Img &
         "mortend = " & rec.mortend'Img &
         "mortleft = " & rec.mortleft'Img &
         "mortprot = " & rec.mortprot'Img &
         "morttype = " & rec.morttype'Img &
         "morupd = " & rec.morupd'Img &
         "morus = " & rec.morus'Img &
         "mpcover1 = " & rec.mpcover1'Img &
         "mpcover2 = " & rec.mpcover2'Img &
         "mpcover3 = " & rec.mpcover3'Img &
         "mpolno = " & rec.mpolno'Img &
         "outsmort = " & rec.outsmort'Img &
         "rentfrom = " & rec.rentfrom'Img &
         "rmamt = " & rec.rmamt'Img &
         "rmort = " & rec.rmort'Img &
         "rmortyr = " & rec.rmortyr'Img &
         "rmpur001 = " & rec.rmpur001'Img &
         "rmpur002 = " & rec.rmpur002'Img &
         "rmpur003 = " & rec.rmpur003'Img &
         "rmpur004 = " & rec.rmpur004'Img &
         "rmpur005 = " & rec.rmpur005'Img &
         "rmpur006 = " & rec.rmpur006'Img &
         "rmpur007 = " & rec.rmpur007'Img &
         "rmpur008 = " & rec.rmpur008'Img &
         "month = " & rec.month'Img &
         "endwpri5 = " & rec.endwpri5'Img &
         "issue = " & rec.issue'Img;
   end to_String;


   function To_String( rec : Mortcont ) return String is
   begin
      return  "Mortcont: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "mortseq = " & rec.mortseq'Img &
         "contseq = " & rec.contseq'Img &
         "outsamt = " & rec.outsamt'Img &
         "outsincl = " & rec.outsincl'Img &
         "outspay = " & rec.outspay'Img &
         "outspd = " & rec.outspd'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img;
   end to_String;


   function To_String( rec : Maint ) return String is
   begin
      return  "Maint: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "maintseq = " & rec.maintseq'Img &
         "m = " & rec.m'Img &
         "mrage = " & rec.mrage'Img &
         "mramt = " & rec.mramt'Img &
         "mrchwhy1 = " & rec.mrchwhy1'Img &
         "mrchwhy2 = " & rec.mrchwhy2'Img &
         "mrchwhy3 = " & rec.mrchwhy3'Img &
         "mrchwhy4 = " & rec.mrchwhy4'Img &
         "mrchwhy5 = " & rec.mrchwhy5'Img &
         "mrchwhy6 = " & rec.mrchwhy6'Img &
         "mrchwhy7 = " & rec.mrchwhy7'Img &
         "mrchwhy8 = " & rec.mrchwhy8'Img &
         "mrchwhy9 = " & rec.mrchwhy9'Img &
         "mrct = " & rec.mrct'Img &
         "mrkid = " & rec.mrkid'Img &
         "mrpd = " & rec.mrpd'Img &
         "mrr = " & rec.mrr'Img &
         "mruamt = " & rec.mruamt'Img &
         "mrupd = " & rec.mrupd'Img &
         "mrus = " & rec.mrus'Img &
         "mrv = " & rec.mrv'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img &
         "mrarr1 = " & rec.mrarr1'Img &
         "mrarr2 = " & rec.mrarr2'Img &
         "mrarr3 = " & rec.mrarr3'Img &
         "mrarr4 = " & rec.mrarr4'Img &
         "mrarr5 = " & rec.mrarr5'Img;
   end to_String;


   function To_String( rec : Job ) return String is
   begin
      return  "Job: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "counter = " & rec.counter'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "jobtype = " & rec.jobtype'Img &
         "agreehrs = " & rec.agreehrs'Img &
         "bonamt1 = " & rec.bonamt1'Img &
         "bonamt2 = " & rec.bonamt2'Img &
         "bonamt3 = " & rec.bonamt3'Img &
         "bonamt4 = " & rec.bonamt4'Img &
         "bonamt5 = " & rec.bonamt5'Img &
         "bonamt6 = " & rec.bonamt6'Img &
         "bontax1 = " & rec.bontax1'Img &
         "bontax2 = " & rec.bontax2'Img &
         "bontax3 = " & rec.bontax3'Img &
         "bontax4 = " & rec.bontax4'Img &
         "bontax5 = " & rec.bontax5'Img &
         "bontax6 = " & rec.bontax6'Img &
         "bonus = " & rec.bonus'Img &
         "busaccts = " & rec.busaccts'Img &
         "checktax = " & rec.checktax'Img &
         "chkincom = " & rec.chkincom'Img &
         "dedoth = " & rec.dedoth'Img &
         "deduc1 = " & rec.deduc1'Img &
         "deduc2 = " & rec.deduc2'Img &
         "deduc3 = " & rec.deduc3'Img &
         "deduc4 = " & rec.deduc4'Img &
         "deduc5 = " & rec.deduc5'Img &
         "deduc6 = " & rec.deduc6'Img &
         "deduc7 = " & rec.deduc7'Img &
         "deduc8 = " & rec.deduc8'Img &
         "dirctr = " & rec.dirctr'Img &
         "dirni = " & rec.dirni'Img &
         "dvtothru = " & rec.dvtothru'Img &
         "dvushr = " & rec.dvushr'Img &
         "empany = " & rec.empany'Img &
         "empown = " & rec.empown'Img &
         "etype = " & rec.etype'Img &
         "everot = " & rec.everot'Img &
         "ftpt = " & rec.ftpt'Img &
         "grsofar = " & rec.grsofar'Img &
         "grwage = " & rec.grwage'Img &
         "grwagpd = " & rec.grwagpd'Img &
         "hha1 = " & rec.hha1'Img &
         "hha2 = " & rec.hha2'Img &
         "hha3 = " & rec.hha3'Img &
         "hhc1 = " & rec.hhc1'Img &
         "hhc2 = " & rec.hhc2'Img &
         "hhc3 = " & rec.hhc3'Img &
         "hohinc = " & rec.hohinc'Img &
         "inclpay1 = " & rec.inclpay1'Img &
         "inclpay2 = " & rec.inclpay2'Img &
         "inclpay3 = " & rec.inclpay3'Img &
         "inclpay4 = " & rec.inclpay4'Img &
         "inclpay5 = " & rec.inclpay5'Img &
         "inclpay6 = " & rec.inclpay6'Img &
         "inkind01 = " & rec.inkind01'Img &
         "inkind02 = " & rec.inkind02'Img &
         "inkind03 = " & rec.inkind03'Img &
         "inkind04 = " & rec.inkind04'Img &
         "inkind05 = " & rec.inkind05'Img &
         "inkind06 = " & rec.inkind06'Img &
         "inkind07 = " & rec.inkind07'Img &
         "inkind08 = " & rec.inkind08'Img &
         "inkind09 = " & rec.inkind09'Img &
         "inkind10 = " & rec.inkind10'Img &
         "inkind11 = " & rec.inkind11'Img &
         "instype1 = " & rec.instype1'Img &
         "instype2 = " & rec.instype2'Img &
         "jobbus = " & rec.jobbus'Img &
         "likehr = " & rec.likehr'Img &
         "mademp = " & rec.mademp'Img &
         "matemp = " & rec.matemp'Img &
         "matstp = " & rec.matstp'Img &
         "mileamt = " & rec.mileamt'Img &
         "motamt = " & rec.motamt'Img &
         "natins = " & rec.natins'Img &
         "nature = " & rec.nature'Img &
         "nidamt = " & rec.nidamt'Img &
         "nidpd = " & rec.nidpd'Img &
         "nmchc = " & rec.nmchc'Img &
         "nmper = " & rec.nmper'Img &
         "nomor1 = " & rec.nomor1'Img &
         "nomor2 = " & rec.nomor2'Img &
         "nomor3 = " & rec.nomor3'Img &
         "numemp = " & rec.numemp'Img &
         "othded1 = " & rec.othded1'Img &
         "othded2 = " & rec.othded2'Img &
         "othded3 = " & rec.othded3'Img &
         "othded4 = " & rec.othded4'Img &
         "othded5 = " & rec.othded5'Img &
         "othded6 = " & rec.othded6'Img &
         "othded7 = " & rec.othded7'Img &
         "othded8 = " & rec.othded8'Img &
         "othded9 = " & rec.othded9'Img &
         "ownamt = " & rec.ownamt'Img &
         "ownotamt = " & rec.ownotamt'Img &
         "ownother = " & rec.ownother'Img &
         "ownsum = " & rec.ownsum'Img &
         "payamt = " & rec.payamt'Img &
         "paydat = " & tio.Image( rec.paydat, tio.ISO_Date ) &
         "paye = " & rec.paye'Img &
         "paypd = " & rec.paypd'Img &
         "payslip = " & rec.payslip'Img &
         "payusl = " & rec.payusl'Img &
         "pothr = " & rec.pothr'Img &
         "prbefore = " & rec.prbefore'Img &
         "profdocs = " & rec.profdocs'Img &
         "profit1 = " & rec.profit1'Img &
         "profit2 = " & rec.profit2'Img &
         "profni = " & rec.profni'Img &
         "proftax = " & rec.proftax'Img &
         "rspoth = " & rec.rspoth'Img &
         "se1 = " & tio.Image( rec.se1, tio.ISO_Date ) &
         "se2 = " & tio.Image( rec.se2, tio.ISO_Date ) &
         "seend = " & tio.Image( rec.seend, tio.ISO_Date ) &
         "seincamt = " & rec.seincamt'Img &
         "seincwm = " & rec.seincwm'Img &
         "selwks = " & rec.selwks'Img &
         "seniiamt = " & rec.seniiamt'Img &
         "seniinc = " & rec.seniinc'Img &
         "senilamt = " & rec.senilamt'Img &
         "senilump = " & rec.senilump'Img &
         "seniramt = " & rec.seniramt'Img &
         "senireg = " & rec.senireg'Img &
         "senirpd = " & rec.senirpd'Img &
         "setax = " & rec.setax'Img &
         "setaxamt = " & rec.setaxamt'Img &
         "smpamt = " & rec.smpamt'Img &
         "smprate = " & rec.smprate'Img &
         "sole = " & rec.sole'Img &
         "sspamt = " & rec.sspamt'Img &
         "taxamt = " & rec.taxamt'Img &
         "taxdamt = " & rec.taxdamt'Img &
         "taxdpd = " & rec.taxdpd'Img &
         "totus1 = " & rec.totus1'Img &
         "ubonamt = " & rec.ubonamt'Img &
         "uboninc = " & rec.uboninc'Img &
         "udeduc1 = " & rec.udeduc1'Img &
         "udeduc2 = " & rec.udeduc2'Img &
         "udeduc3 = " & rec.udeduc3'Img &
         "udeduc4 = " & rec.udeduc4'Img &
         "udeduc5 = " & rec.udeduc5'Img &
         "udeduc6 = " & rec.udeduc6'Img &
         "udeduc7 = " & rec.udeduc7'Img &
         "udeduc8 = " & rec.udeduc8'Img &
         "ugross = " & rec.ugross'Img &
         "uincpay1 = " & rec.uincpay1'Img &
         "uincpay2 = " & rec.uincpay2'Img &
         "uincpay3 = " & rec.uincpay3'Img &
         "uincpay4 = " & rec.uincpay4'Img &
         "uincpay5 = " & rec.uincpay5'Img &
         "uincpay6 = " & rec.uincpay6'Img &
         "umileamt = " & rec.umileamt'Img &
         "umotamt = " & rec.umotamt'Img &
         "unett = " & rec.unett'Img &
         "uothded1 = " & rec.uothded1'Img &
         "uothded2 = " & rec.uothded2'Img &
         "uothded3 = " & rec.uothded3'Img &
         "uothded4 = " & rec.uothded4'Img &
         "uothded5 = " & rec.uothded5'Img &
         "uothded6 = " & rec.uothded6'Img &
         "uothded7 = " & rec.uothded7'Img &
         "uothded8 = " & rec.uothded8'Img &
         "uothded9 = " & rec.uothded9'Img &
         "uothdtot = " & rec.uothdtot'Img &
         "uothr = " & rec.uothr'Img &
         "upd = " & rec.upd'Img &
         "usmpamt = " & rec.usmpamt'Img &
         "usmprate = " & rec.usmprate'Img &
         "usspamt = " & rec.usspamt'Img &
         "usuhr = " & rec.usuhr'Img &
         "utaxamt = " & rec.utaxamt'Img &
         "watdid = " & rec.watdid'Img &
         "watprev = " & rec.watprev'Img &
         "x_where = " & rec.x_where'Img &
         "whynopro = " & rec.whynopro'Img &
         "whynou01 = " & rec.whynou01'Img &
         "whynou02 = " & rec.whynou02'Img &
         "whynou03 = " & rec.whynou03'Img &
         "whynou04 = " & rec.whynou04'Img &
         "whynou05 = " & rec.whynou05'Img &
         "whynou06 = " & rec.whynou06'Img &
         "whynou07 = " & rec.whynou07'Img &
         "whynou08 = " & rec.whynou08'Img &
         "whynou09 = " & rec.whynou09'Img &
         "whynou10 = " & rec.whynou10'Img &
         "whynou11 = " & rec.whynou11'Img &
         "workacc = " & rec.workacc'Img &
         "workmth = " & rec.workmth'Img &
         "workyr = " & rec.workyr'Img &
         "month = " & rec.month'Img &
         "hdqhrs = " & rec.hdqhrs'Img &
         "jobhours = " & rec.jobhours'Img &
         "sspsmpfg = " & rec.sspsmpfg'Img &
         "ugrspay = " & To_String( rec.ugrspay ) &
         "inclpay7 = " & rec.inclpay7'Img &
         "inclpay8 = " & rec.inclpay8'Img &
         "paperiod = " & rec.paperiod'Img &
         "ppperiod = " & rec.ppperiod'Img &
         "sapamt = " & rec.sapamt'Img &
         "sppamt = " & rec.sppamt'Img &
         "uincpay7 = " & rec.uincpay7'Img &
         "uincpay8 = " & rec.uincpay8'Img &
         "usapamt = " & rec.usapamt'Img &
         "usppamt = " & rec.usppamt'Img &
         "inkind12 = " & rec.inkind12'Img &
         "inkind13 = " & rec.inkind13'Img &
         "salsac = " & rec.salsac'Img &
         "chvamt = " & rec.chvamt'Img &
         "chvpd = " & rec.chvpd'Img &
         "chvsac = " & rec.chvsac'Img &
         "chvuamt = " & rec.chvuamt'Img &
         "chvupd = " & rec.chvupd'Img &
         "chvusu = " & rec.chvusu'Img &
         "expben01 = " & rec.expben01'Img &
         "expben02 = " & rec.expben02'Img &
         "expben03 = " & rec.expben03'Img &
         "expben04 = " & rec.expben04'Img &
         "expben05 = " & rec.expben05'Img &
         "expben06 = " & rec.expben06'Img &
         "expben07 = " & rec.expben07'Img &
         "expben08 = " & rec.expben08'Img &
         "expben09 = " & rec.expben09'Img &
         "expben10 = " & rec.expben10'Img &
         "expben11 = " & rec.expben11'Img &
         "expben12 = " & rec.expben12'Img &
         "fuelamt = " & rec.fuelamt'Img &
         "fuelbn = " & rec.fuelbn'Img &
         "fuelpd = " & rec.fuelpd'Img &
         "fueluamt = " & rec.fueluamt'Img &
         "fuelupd = " & rec.fuelupd'Img &
         "fuelusu = " & rec.fuelusu'Img &
         "issue = " & rec.issue'Img &
         "prevmth = " & rec.prevmth'Img &
         "prevyr = " & rec.prevyr'Img &
         "spnamt = " & rec.spnamt'Img &
         "spnpd = " & rec.spnpd'Img &
         "spnsac = " & rec.spnsac'Img &
         "spnuamt = " & rec.spnuamt'Img &
         "spnupd = " & rec.spnupd'Img &
         "spnusu = " & rec.spnusu'Img &
         "vchamt = " & rec.vchamt'Img &
         "vchpd = " & rec.vchpd'Img &
         "vchsac = " & rec.vchsac'Img &
         "vchuamt = " & rec.vchuamt'Img &
         "vchupd = " & rec.vchupd'Img &
         "vchusu = " & rec.vchusu'Img &
         "wrkprev = " & rec.wrkprev'Img &
         "caramt = " & rec.caramt'Img &
         "carcon = " & rec.carcon'Img &
         "carval = " & rec.carval'Img &
         "fueltyp = " & rec.fueltyp'Img &
         "orgemp = " & rec.orgemp'Img &
         "sector = " & rec.sector'Img &
         "sectrnp = " & rec.sectrnp'Img &
         "whynou12 = " & rec.whynou12'Img &
         "whynou13 = " & rec.whynou13'Img &
         "whynou14 = " & rec.whynou14'Img &
         "jobsect = " & rec.jobsect'Img &
         "oremp = " & rec.oremp'Img &
         "bontxam1 = " & rec.bontxam1'Img &
         "bontxam2 = " & rec.bontxam2'Img &
         "bontxam3 = " & rec.bontxam3'Img &
         "bontxam4 = " & rec.bontxam4'Img &
         "bontxam5 = " & rec.bontxam5'Img &
         "bontxam6 = " & rec.bontxam6'Img &
         "deduc9 = " & rec.deduc9'Img &
         "emplany = " & rec.emplany'Img &
         "empten = " & rec.empten'Img &
         "lthan30 = " & rec.lthan30'Img &
         "numeten = " & rec.numeten'Img &
         "othded01 = " & rec.othded01'Img &
         "othded02 = " & rec.othded02'Img &
         "othded03 = " & rec.othded03'Img &
         "othded04 = " & rec.othded04'Img &
         "othded05 = " & rec.othded05'Img &
         "othded06 = " & rec.othded06'Img &
         "othded07 = " & rec.othded07'Img &
         "othded08 = " & rec.othded08'Img &
         "othded09 = " & rec.othded09'Img &
         "othded10 = " & rec.othded10'Img &
         "udeduc9 = " & rec.udeduc9'Img &
         "uothde01 = " & rec.uothde01'Img &
         "uothde02 = " & rec.uothde02'Img &
         "uothde03 = " & rec.uothde03'Img &
         "uothde04 = " & rec.uothde04'Img &
         "uothde05 = " & rec.uothde05'Img &
         "uothde06 = " & rec.uothde06'Img &
         "uothde07 = " & rec.uothde07'Img &
         "uothde08 = " & rec.uothde08'Img &
         "uothde09 = " & rec.uothde09'Img &
         "uothde10 = " & rec.uothde10'Img &
         "yjbchang = " & rec.yjbchang'Img &
         "jbchnge = " & rec.jbchnge'Img &
         "hourly = " & rec.hourly'Img &
         "hrexa = " & rec.hrexa'Img &
         "hrexb = " & rec.hrexb'Img &
         "hrexc1 = " & rec.hrexc1'Img &
         "hrexc2 = " & rec.hrexc2'Img &
         "hrexc3 = " & rec.hrexc3'Img &
         "hrexc4 = " & rec.hrexc4'Img &
         "hrexc5 = " & rec.hrexc5'Img &
         "hrexc6 = " & rec.hrexc6'Img &
         "hrexc7 = " & rec.hrexc7'Img &
         "hrexc8 = " & rec.hrexc8'Img &
         "hrrate = " & rec.hrrate'Img;
   end to_String;


   function To_String( rec : Insuranc ) return String is
   begin
      return  "Insuranc: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "insseq = " & rec.insseq'Img &
         "numpols1 = " & rec.numpols1'Img &
         "numpols2 = " & rec.numpols2'Img &
         "numpols3 = " & rec.numpols3'Img &
         "numpols4 = " & rec.numpols4'Img &
         "numpols5 = " & rec.numpols5'Img &
         "numpols6 = " & rec.numpols6'Img &
         "numpols7 = " & rec.numpols7'Img &
         "numpols8 = " & rec.numpols8'Img &
         "numpols9 = " & rec.numpols9'Img &
         "polamt = " & rec.polamt'Img &
         "polmore = " & rec.polmore'Img &
         "polpay = " & rec.polpay'Img &
         "polpd = " & rec.polpd'Img &
         "month = " & rec.month'Img;
   end to_String;


   function To_String( rec : Govpay ) return String is
   begin
      return  "Govpay: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "counter = " & rec.counter'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "benefit = " & rec.benefit'Img &
         "govpay = " & rec.govpay'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img;
   end to_String;


   function To_String( rec : Extchild ) return String is
   begin
      return  "Extchild: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "extseq = " & rec.extseq'Img &
         "nhhamt = " & rec.nhhamt'Img &
         "nhhfee = " & rec.nhhfee'Img &
         "nhhintro = " & rec.nhhintro'Img &
         "nhhpd = " & rec.nhhpd'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img;
   end to_String;


   function To_String( rec : Endowmnt ) return String is
   begin
      return  "Endowmnt: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "mortseq = " & rec.mortseq'Img &
         "endowseq = " & rec.endowseq'Img &
         "incinint = " & rec.incinint'Img &
         "menpolam = " & rec.menpolam'Img &
         "menpolpd = " & rec.menpolpd'Img &
         "menstyr = " & rec.menstyr'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img;
   end to_String;


   function To_String( rec : Chldcare ) return String is
   begin
      return  "Chldcare: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "chlook = " & rec.chlook'Img &
         "benccdis = " & rec.benccdis'Img &
         "chamt = " & rec.chamt'Img &
         "chfar = " & rec.chfar'Img &
         "chhr = " & rec.chhr'Img &
         "chinknd1 = " & rec.chinknd1'Img &
         "chinknd2 = " & rec.chinknd2'Img &
         "chinknd3 = " & rec.chinknd3'Img &
         "chinknd4 = " & rec.chinknd4'Img &
         "chinknd5 = " & rec.chinknd5'Img &
         "chpd = " & rec.chpd'Img &
         "cost = " & rec.cost'Img &
         "ctrm = " & rec.ctrm'Img &
         "emplprov = " & rec.emplprov'Img &
         "registrd = " & rec.registrd'Img &
         "month = " & rec.month'Img &
         "pmchk = " & rec.pmchk'Img &
         "issue = " & rec.issue'Img &
         "hourly = " & rec.hourly'Img &
         "freecc = " & rec.freecc'Img &
         "freccty1 = " & rec.freccty1'Img &
         "freccty2 = " & rec.freccty2'Img &
         "freccty3 = " & rec.freccty3'Img &
         "freccty4 = " & rec.freccty4'Img &
         "freccty5 = " & rec.freccty5'Img &
         "freccty6 = " & rec.freccty6'Img;
   end to_String;


   function To_String( rec : Childcare ) return String is
   begin
      return  "Childcare: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "chlook = " & rec.chlook'Img &
         "chamt = " & rec.chamt'Img &
         "chhr = " & rec.chhr'Img &
         "chpd = " & rec.chpd'Img &
         "cost = " & rec.cost'Img &
         "emplprov = " & rec.emplprov'Img &
         "issue = " & rec.issue'Img &
         "registrd = " & rec.registrd'Img &
         "month = " & rec.month'Img;
   end to_String;


   function To_String( rec : Care ) return String is
   begin
      return  "Care: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "counter = " & rec.counter'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "needper = " & rec.needper'Img &
         "daynight = " & rec.daynight'Img &
         "freq = " & rec.freq'Img &
         "hour01 = " & rec.hour01'Img &
         "hour02 = " & rec.hour02'Img &
         "hour03 = " & rec.hour03'Img &
         "hour04 = " & rec.hour04'Img &
         "hour05 = " & rec.hour05'Img &
         "hour06 = " & rec.hour06'Img &
         "hour07 = " & rec.hour07'Img &
         "hour08 = " & rec.hour08'Img &
         "hour09 = " & rec.hour09'Img &
         "hour10 = " & rec.hour10'Img &
         "hour11 = " & rec.hour11'Img &
         "hour12 = " & rec.hour12'Img &
         "hour13 = " & rec.hour13'Img &
         "hour14 = " & rec.hour14'Img &
         "hour15 = " & rec.hour15'Img &
         "hour16 = " & rec.hour16'Img &
         "hour17 = " & rec.hour17'Img &
         "hour18 = " & rec.hour18'Img &
         "hour19 = " & rec.hour19'Img &
         "hour20 = " & rec.hour20'Img &
         "wholoo01 = " & rec.wholoo01'Img &
         "wholoo02 = " & rec.wholoo02'Img &
         "wholoo03 = " & rec.wholoo03'Img &
         "wholoo04 = " & rec.wholoo04'Img &
         "wholoo05 = " & rec.wholoo05'Img &
         "wholoo06 = " & rec.wholoo06'Img &
         "wholoo07 = " & rec.wholoo07'Img &
         "wholoo08 = " & rec.wholoo08'Img &
         "wholoo09 = " & rec.wholoo09'Img &
         "wholoo10 = " & rec.wholoo10'Img &
         "wholoo11 = " & rec.wholoo11'Img &
         "wholoo12 = " & rec.wholoo12'Img &
         "wholoo13 = " & rec.wholoo13'Img &
         "wholoo14 = " & rec.wholoo14'Img &
         "wholoo15 = " & rec.wholoo15'Img &
         "wholoo16 = " & rec.wholoo16'Img &
         "wholoo17 = " & rec.wholoo17'Img &
         "wholoo18 = " & rec.wholoo18'Img &
         "wholoo19 = " & rec.wholoo19'Img &
         "wholoo20 = " & rec.wholoo20'Img &
         "month = " & rec.month'Img &
         "howlng01 = " & rec.howlng01'Img &
         "howlng02 = " & rec.howlng02'Img &
         "howlng03 = " & rec.howlng03'Img &
         "howlng04 = " & rec.howlng04'Img &
         "howlng05 = " & rec.howlng05'Img &
         "howlng06 = " & rec.howlng06'Img &
         "howlng07 = " & rec.howlng07'Img &
         "howlng08 = " & rec.howlng08'Img &
         "howlng09 = " & rec.howlng09'Img &
         "howlng10 = " & rec.howlng10'Img &
         "howlng11 = " & rec.howlng11'Img &
         "howlng12 = " & rec.howlng12'Img &
         "howlng13 = " & rec.howlng13'Img &
         "howlng14 = " & rec.howlng14'Img &
         "howlng15 = " & rec.howlng15'Img &
         "howlng16 = " & rec.howlng16'Img &
         "howlng17 = " & rec.howlng17'Img &
         "howlng18 = " & rec.howlng18'Img &
         "howlng19 = " & rec.howlng19'Img &
         "howlng20 = " & rec.howlng20'Img &
         "issue = " & rec.issue'Img;
   end to_String;


   function To_String( rec : Benefits ) return String is
   begin
      return  "Benefits: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "counter = " & rec.counter'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "benefit = " & rec.benefit'Img &
         "bankstmt = " & rec.bankstmt'Img &
         "benamt = " & rec.benamt'Img &
         "benamtdk = " & rec.benamtdk'Img &
         "benlettr = " & rec.benlettr'Img &
         "benpd = " & rec.benpd'Img &
         "bookcard = " & rec.bookcard'Img &
         "cctc = " & rec.cctc'Img &
         "combamt = " & rec.combamt'Img &
         "combbk = " & rec.combbk'Img &
         "combpd = " & rec.combpd'Img &
         "howben = " & rec.howben'Img &
         "notusamt = " & rec.notusamt'Img &
         "notuspd = " & rec.notuspd'Img &
         "numweeks = " & rec.numweeks'Img &
         "ordbkno = " & rec.ordbkno'Img &
         "payslipb = " & rec.payslipb'Img &
         "pres = " & rec.pres'Img &
         "usual = " & rec.usual'Img &
         "var1 = " & rec.var1'Img &
         "var2 = " & rec.var2'Img &
         "var3 = " & rec.var3'Img &
         "whorec1 = " & rec.whorec1'Img &
         "whorec2 = " & rec.whorec2'Img &
         "whorec3 = " & rec.whorec3'Img &
         "whorec4 = " & rec.whorec4'Img &
         "whorec5 = " & rec.whorec5'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img &
         "numyears = " & rec.numyears'Img &
         "ttbprx = " & rec.ttbprx'Img &
         "var4 = " & rec.var4'Img &
         "var5 = " & rec.var5'Img &
         "gtanet = " & rec.gtanet'Img &
         "gtatax = " & rec.gtatax'Img &
         "cbpaye = " & rec.cbpaye'Img &
         "cbtax = " & rec.cbtax'Img &
         "cbtaxamt = " & rec.cbtaxamt'Img &
         "cbtaxpd = " & rec.cbtaxpd'Img;
   end to_String;


   function To_String( rec : Assets ) return String is
   begin
      return  "Assets: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "assetype = " & rec.assetype'Img &
         "seq = " & rec.seq'Img &
         "accname = " & rec.accname'Img &
         "x_amount = " & rec.x_amount'Img &
         "anymon = " & rec.anymon'Img &
         "howmany = " & rec.howmany'Img &
         "howmuch = " & rec.howmuch'Img &
         "howmuche = " & rec.howmuche'Img &
         "intro = " & rec.intro'Img &
         "issdate = " & tio.Image( rec.issdate, tio.ISO_Date ) &
         "issval = " & rec.issval'Img &
         "pd = " & rec.pd'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img;
   end to_String;


   function To_String( rec : Admin ) return String is
   begin
      return  "Admin: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "findhh = " & rec.findhh'Img &
         "hhsel = " & rec.hhsel'Img &
         "hout = " & rec.hout'Img &
         "ncr1 = " & rec.ncr1'Img &
         "ncr2 = " & rec.ncr2'Img &
         "ncr3 = " & rec.ncr3'Img &
         "ncr4 = " & rec.ncr4'Img &
         "ncr5 = " & rec.ncr5'Img &
         "ncr6 = " & rec.ncr6'Img &
         "ncr7 = " & rec.ncr7'Img &
         "refr01 = " & rec.refr01'Img &
         "refr02 = " & rec.refr02'Img &
         "refr03 = " & rec.refr03'Img &
         "refr04 = " & rec.refr04'Img &
         "refr05 = " & rec.refr05'Img &
         "refr06 = " & rec.refr06'Img &
         "refr07 = " & rec.refr07'Img &
         "refr08 = " & rec.refr08'Img &
         "refr09 = " & rec.refr09'Img &
         "refr10 = " & rec.refr10'Img &
         "refr11 = " & rec.refr11'Img &
         "refr12 = " & rec.refr12'Img &
         "refr13 = " & rec.refr13'Img &
         "refr14 = " & rec.refr14'Img &
         "refr15 = " & rec.refr15'Img &
         "refr16 = " & rec.refr16'Img &
         "refr17 = " & rec.refr17'Img &
         "refr18 = " & rec.refr18'Img &
         "tnc = " & rec.tnc'Img &
         "version = " & rec.version'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img &
         "lngdf01 = " & rec.lngdf01'Img &
         "lngdf02 = " & rec.lngdf02'Img &
         "lngdf03 = " & rec.lngdf03'Img &
         "lngdf04 = " & rec.lngdf04'Img &
         "lngdf05 = " & rec.lngdf05'Img &
         "lngdf06 = " & rec.lngdf06'Img &
         "lngdf07 = " & rec.lngdf07'Img &
         "lngdf08 = " & rec.lngdf08'Img &
         "lngdf09 = " & rec.lngdf09'Img &
         "lngdf10 = " & rec.lngdf10'Img &
         "nmtrans = " & rec.nmtrans'Img &
         "noneng = " & rec.noneng'Img &
         "whlang01 = " & rec.whlang01'Img &
         "whlang02 = " & rec.whlang02'Img &
         "whlang03 = " & rec.whlang03'Img &
         "whlang04 = " & rec.whlang04'Img &
         "whlang05 = " & rec.whlang05'Img &
         "whlang06 = " & rec.whlang06'Img &
         "whlang07 = " & rec.whlang07'Img &
         "whlang08 = " & rec.whlang08'Img &
         "whlang09 = " & rec.whlang09'Img &
         "whlang10 = " & rec.whlang10'Img &
         "whotran1 = " & rec.whotran1'Img &
         "whotran2 = " & rec.whotran2'Img &
         "whotran3 = " & rec.whotran3'Img &
         "whotran4 = " & rec.whotran4'Img &
         "whotran5 = " & rec.whotran5'Img &
         "lngdf11 = " & rec.lngdf11'Img &
         "whlang11 = " & rec.whlang11'Img;
   end to_String;


   function To_String( rec : Accouts ) return String is
   begin
      return  "Accouts: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "account = " & rec.account'Img &
         "accint = " & rec.accint'Img &
         "acctax = " & rec.acctax'Img &
         "invtax = " & rec.invtax'Img &
         "issue = " & rec.issue'Img &
         "nsamt = " & rec.nsamt'Img &
         "month = " & rec.month'Img;
   end to_String;


   function To_String( rec : Accounts ) return String is
   begin
      return  "Accounts: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "account = " & rec.account'Img &
         "accint = " & rec.accint'Img &
         "acctax = " & rec.acctax'Img &
         "invtax = " & rec.invtax'Img &
         "nsamt = " & rec.nsamt'Img &
         "month = " & rec.month'Img &
         "issue = " & rec.issue'Img &
         "gtwtot = " & rec.gtwtot'Img;
   end to_String;


   function To_String( rec : Child ) return String is
   begin
      return  "Child: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "adeduc = " & rec.adeduc'Img &
         "age = " & rec.age'Img &
         "benccdis = " & rec.benccdis'Img &
         "care = " & rec.care'Img &
         "cdisdif1 = " & rec.cdisdif1'Img &
         "cdisdif2 = " & rec.cdisdif2'Img &
         "cdisdif3 = " & rec.cdisdif3'Img &
         "cdisdif4 = " & rec.cdisdif4'Img &
         "cdisdif5 = " & rec.cdisdif5'Img &
         "cdisdif6 = " & rec.cdisdif6'Img &
         "cdisdif7 = " & rec.cdisdif7'Img &
         "cdisdif8 = " & rec.cdisdif8'Img &
         "chamt1 = " & rec.chamt1'Img &
         "chamt2 = " & rec.chamt2'Img &
         "chamt3 = " & rec.chamt3'Img &
         "chamt4 = " & rec.chamt4'Img &
         "chamtern = " & rec.chamtern'Img &
         "chamttst = " & rec.chamttst'Img &
         "chdla1 = " & rec.chdla1'Img &
         "chdla2 = " & rec.chdla2'Img &
         "chealth = " & rec.chealth'Img &
         "chearns1 = " & rec.chearns1'Img &
         "chearns2 = " & rec.chearns2'Img &
         "chema = " & rec.chema'Img &
         "chemaamt = " & rec.chemaamt'Img &
         "chemapd = " & rec.chemapd'Img &
         "chfar = " & rec.chfar'Img &
         "chhr1 = " & rec.chhr1'Img &
         "chhr2 = " & rec.chhr2'Img &
         "chlook01 = " & rec.chlook01'Img &
         "chlook02 = " & rec.chlook02'Img &
         "chlook03 = " & rec.chlook03'Img &
         "chlook04 = " & rec.chlook04'Img &
         "chlook05 = " & rec.chlook05'Img &
         "chlook06 = " & rec.chlook06'Img &
         "chlook07 = " & rec.chlook07'Img &
         "chlook08 = " & rec.chlook08'Img &
         "chlook09 = " & rec.chlook09'Img &
         "chlook10 = " & rec.chlook10'Img &
         "chpay1 = " & rec.chpay1'Img &
         "chpay2 = " & rec.chpay2'Img &
         "chpay3 = " & rec.chpay3'Img &
         "chpdern = " & rec.chpdern'Img &
         "chpdtst = " & rec.chpdtst'Img &
         "chprob = " & rec.chprob'Img &
         "chsave = " & rec.chsave'Img &
         "chwkern = " & rec.chwkern'Img &
         "chwktst = " & rec.chwktst'Img &
         "chyrern = " & rec.chyrern'Img &
         "chyrtst = " & rec.chyrtst'Img &
         "clone = " & rec.clone'Img &
         "cohabit = " & rec.cohabit'Img &
         "convbl = " & rec.convbl'Img &
         "cost = " & rec.cost'Img &
         "cvht = " & rec.cvht'Img &
         "cvpay = " & rec.cvpay'Img &
         "cvpd = " & rec.cvpd'Img &
         "dentist = " & rec.dentist'Img &
         "depend = " & rec.depend'Img &
         "dob = " & tio.Image( rec.dob, tio.ISO_Date ) &
         "eligadlt = " & rec.eligadlt'Img &
         "eligchld = " & rec.eligchld'Img &
         "endyr = " & rec.endyr'Img &
         "eyetest = " & rec.eyetest'Img &
         "fted = " & rec.fted'Img &
         "x_grant = " & rec.x_grant'Img &
         "grtamt1 = " & rec.grtamt1'Img &
         "grtamt2 = " & rec.grtamt2'Img &
         "grtdir1 = " & rec.grtdir1'Img &
         "grtdir2 = " & rec.grtdir2'Img &
         "grtnum = " & rec.grtnum'Img &
         "grtsce1 = " & rec.grtsce1'Img &
         "grtsce2 = " & rec.grtsce2'Img &
         "grtval1 = " & rec.grtval1'Img &
         "grtval2 = " & rec.grtval2'Img &
         "hholder = " & rec.hholder'Img &
         "hosp = " & rec.hosp'Img &
         "lareg = " & rec.lareg'Img &
         "legdep = " & rec.legdep'Img &
         "ms = " & rec.ms'Img &
         "nhs1 = " & rec.nhs1'Img &
         "nhs2 = " & rec.nhs2'Img &
         "nhs3 = " & rec.nhs3'Img &
         "parent1 = " & rec.parent1'Img &
         "parent2 = " & rec.parent2'Img &
         "prit = " & rec.prit'Img &
         "prscrpt = " & rec.prscrpt'Img &
         "r01 = " & rec.r01'Img &
         "r02 = " & rec.r02'Img &
         "r03 = " & rec.r03'Img &
         "r04 = " & rec.r04'Img &
         "r05 = " & rec.r05'Img &
         "r06 = " & rec.r06'Img &
         "r07 = " & rec.r07'Img &
         "r08 = " & rec.r08'Img &
         "r09 = " & rec.r09'Img &
         "r10 = " & rec.r10'Img &
         "r11 = " & rec.r11'Img &
         "r12 = " & rec.r12'Img &
         "r13 = " & rec.r13'Img &
         "r14 = " & rec.r14'Img &
         "registr1 = " & rec.registr1'Img &
         "registr2 = " & rec.registr2'Img &
         "registr3 = " & rec.registr3'Img &
         "registr4 = " & rec.registr4'Img &
         "registr5 = " & rec.registr5'Img &
         "sex = " & rec.sex'Img &
         "smkit = " & rec.smkit'Img &
         "smlit = " & rec.smlit'Img &
         "spcreg1 = " & rec.spcreg1'Img &
         "spcreg2 = " & rec.spcreg2'Img &
         "spcreg3 = " & rec.spcreg3'Img &
         "specs = " & rec.specs'Img &
         "spout = " & rec.spout'Img &
         "srentamt = " & rec.srentamt'Img &
         "srentpd = " & rec.srentpd'Img &
         "startyr = " & rec.startyr'Img &
         "totsave = " & rec.totsave'Img &
         "trav = " & rec.trav'Img &
         "typeed = " & rec.typeed'Img &
         "voucher = " & rec.voucher'Img &
         "whytrav1 = " & rec.whytrav1'Img &
         "whytrav2 = " & rec.whytrav2'Img &
         "whytrav3 = " & rec.whytrav3'Img &
         "whytrav4 = " & rec.whytrav4'Img &
         "whytrav5 = " & rec.whytrav5'Img &
         "whytrav6 = " & rec.whytrav6'Img &
         "wmkit = " & rec.wmkit'Img &
         "month = " & rec.month'Img &
         "careab = " & rec.careab'Img &
         "careah = " & rec.careah'Img &
         "carecb = " & rec.carecb'Img &
         "carech = " & rec.carech'Img &
         "carecl = " & rec.carecl'Img &
         "carefl = " & rec.carefl'Img &
         "carefr = " & rec.carefr'Img &
         "careot = " & rec.careot'Img &
         "carere = " & rec.carere'Img &
         "chdda = " & rec.chdda'Img &
         "chearns = " & rec.chearns'Img &
         "chincdv = " & rec.chincdv'Img &
         "chrinc = " & rec.chrinc'Img &
         "fsmlkval = " & rec.fsmlkval'Img &
         "fsmval = " & rec.fsmval'Img &
         "fwmlkval = " & rec.fwmlkval'Img &
         "hdagech = " & rec.hdagech'Img &
         "hourab = " & rec.hourab'Img &
         "hourah = " & rec.hourah'Img &
         "hourcb = " & rec.hourcb'Img &
         "hourch = " & rec.hourch'Img &
         "hourcl = " & rec.hourcl'Img &
         "hourfr = " & rec.hourfr'Img &
         "hourot = " & rec.hourot'Img &
         "hourre = " & rec.hourre'Img &
         "hourtot = " & rec.hourtot'Img &
         "hperson = " & rec.hperson'Img &
         "iagegr2 = " & rec.iagegr2'Img &
         "iagegrp = " & rec.iagegrp'Img &
         "relhrp = " & rec.relhrp'Img &
         "totgntch = " & rec.totgntch'Img &
         "uperson = " & rec.uperson'Img &
         "cddatre = " & rec.cddatre'Img &
         "cdisdif9 = " & rec.cdisdif9'Img &
         "cddatrep = " & rec.cddatrep'Img &
         "cdisdifp = " & rec.cdisdifp'Img &
         "cfund = " & rec.cfund'Img &
         "cfundh = " & rec.cfundh'Img &
         "cfundtp = " & rec.cfundtp'Img &
         "fundamt1 = " & rec.fundamt1'Img &
         "fundamt2 = " & rec.fundamt2'Img &
         "fundamt3 = " & rec.fundamt3'Img &
         "fundamt4 = " & rec.fundamt4'Img &
         "fundamt5 = " & rec.fundamt5'Img &
         "fundamt6 = " & rec.fundamt6'Img &
         "givcfnd1 = " & rec.givcfnd1'Img &
         "givcfnd2 = " & rec.givcfnd2'Img &
         "givcfnd3 = " & rec.givcfnd3'Img &
         "givcfnd4 = " & rec.givcfnd4'Img &
         "givcfnd5 = " & rec.givcfnd5'Img &
         "givcfnd6 = " & rec.givcfnd6'Img &
         "tuacam = " & rec.tuacam'Img &
         "schchk = " & rec.schchk'Img &
         "trainee = " & rec.trainee'Img &
         "cddaprg = " & rec.cddaprg'Img &
         "issue = " & rec.issue'Img &
         "heartval = " & rec.heartval'Img &
         "xbonflag = " & rec.xbonflag'Img &
         "chca = " & rec.chca'Img &
         "disdifch = " & rec.disdifch'Img &
         "chearns3 = " & rec.chearns3'Img &
         "chtrnamt = " & rec.chtrnamt'Img &
         "chtrnpd = " & rec.chtrnpd'Img &
         "hsvper = " & rec.hsvper'Img &
         "mednum = " & rec.mednum'Img &
         "medprpd = " & rec.medprpd'Img &
         "medprpy = " & rec.medprpy'Img &
         "sbkit = " & rec.sbkit'Img &
         "dobmonth = " & rec.dobmonth'Img &
         "dobyear = " & rec.dobyear'Img &
         "fsbval = " & rec.fsbval'Img &
         "btecnow = " & rec.btecnow'Img &
         "cameyr = " & rec.cameyr'Img &
         "cdaprog1 = " & rec.cdaprog1'Img &
         "cdatre1 = " & rec.cdatre1'Img &
         "cdatrep1 = " & rec.cdatrep1'Img &
         "cdisd01 = " & rec.cdisd01'Img &
         "cdisd02 = " & rec.cdisd02'Img &
         "cdisd03 = " & rec.cdisd03'Img &
         "cdisd04 = " & rec.cdisd04'Img &
         "cdisd05 = " & rec.cdisd05'Img &
         "cdisd06 = " & rec.cdisd06'Img &
         "cdisd07 = " & rec.cdisd07'Img &
         "cdisd08 = " & rec.cdisd08'Img &
         "cdisd09 = " & rec.cdisd09'Img &
         "cdisd10 = " & rec.cdisd10'Img &
         "chbfd = " & rec.chbfd'Img &
         "chbfdamt = " & rec.chbfdamt'Img &
         "chbfdpd = " & rec.chbfdpd'Img &
         "chbfdval = " & rec.chbfdval'Img &
         "chcond = " & rec.chcond'Img &
         "chealth1 = " & rec.chealth1'Img &
         "chlimitl = " & rec.chlimitl'Img &
         "citizen = " & rec.citizen'Img &
         "citizen2 = " & rec.citizen2'Img &
         "contuk = " & rec.contuk'Img &
         "corign = " & rec.corign'Img &
         "corigoth = " & rec.corigoth'Img &
         "curqual = " & rec.curqual'Img &
         "degrenow = " & rec.degrenow'Img &
         "denrec = " & rec.denrec'Img &
         "dvmardf = " & rec.dvmardf'Img &
         "heathch = " & rec.heathch'Img &
         "highonow = " & rec.highonow'Img &
         "hrsed = " & rec.hrsed'Img &
         "medrec = " & rec.medrec'Img &
         "nvqlenow = " & rec.nvqlenow'Img &
         "othpass = " & rec.othpass'Img &
         "reasden = " & rec.reasden'Img &
         "reasmed = " & rec.reasmed'Img &
         "reasnhs = " & rec.reasnhs'Img &
         "rsanow = " & rec.rsanow'Img &
         "sctvnow = " & rec.sctvnow'Img &
         "sfvit = " & rec.sfvit'Img &
         "disactc1 = " & rec.disactc1'Img &
         "discorc1 = " & rec.discorc1'Img &
         "fsfvval = " & rec.fsfvval'Img &
         "marital = " & rec.marital'Img &
         "typeed2 = " & rec.typeed2'Img &
         "c2orign = " & rec.c2orign'Img &
         "prox1619 = " & rec.prox1619'Img &
         "candgnow = " & rec.candgnow'Img &
         "curothf = " & rec.curothf'Img &
         "curothp = " & rec.curothp'Img &
         "curothwv = " & rec.curothwv'Img &
         "gnvqnow = " & rec.gnvqnow'Img &
         "ndeplnow = " & rec.ndeplnow'Img &
         "oqualc1 = " & rec.oqualc1'Img &
         "oqualc2 = " & rec.oqualc2'Img &
         "oqualc3 = " & rec.oqualc3'Img &
         "webacnow = " & rec.webacnow'Img &
         "ntsctnow = " & rec.ntsctnow'Img &
         "skiwknow = " & rec.skiwknow'Img;
   end to_String;


   function To_String( rec : Adult ) return String is
   begin
      return  "Adult: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "person = " & rec.person'Img &
         "abs1no = " & rec.abs1no'Img &
         "abs2no = " & rec.abs2no'Img &
         "abspar = " & rec.abspar'Img &
         "abspay = " & rec.abspay'Img &
         "abswhy = " & rec.abswhy'Img &
         "abswk = " & rec.abswk'Img &
         "x_access = " & rec.x_access'Img &
         "accftpt = " & rec.accftpt'Img &
         "accjb = " & rec.accjb'Img &
         "accssamt = " & rec.accssamt'Img &
         "accsspd = " & rec.accsspd'Img &
         "adeduc = " & rec.adeduc'Img &
         "adema = " & rec.adema'Img &
         "ademaamt = " & rec.ademaamt'Img &
         "ademapd = " & rec.ademapd'Img &
         "age = " & rec.age'Img &
         "allow1 = " & rec.allow1'Img &
         "allow2 = " & rec.allow2'Img &
         "allow3 = " & rec.allow3'Img &
         "allow4 = " & rec.allow4'Img &
         "allpay1 = " & rec.allpay1'Img &
         "allpay2 = " & rec.allpay2'Img &
         "allpay3 = " & rec.allpay3'Img &
         "allpay4 = " & rec.allpay4'Img &
         "allpd1 = " & rec.allpd1'Img &
         "allpd2 = " & rec.allpd2'Img &
         "allpd3 = " & rec.allpd3'Img &
         "allpd4 = " & rec.allpd4'Img &
         "anyacc = " & rec.anyacc'Img &
         "anyed = " & rec.anyed'Img &
         "anymon = " & rec.anymon'Img &
         "anypen1 = " & rec.anypen1'Img &
         "anypen2 = " & rec.anypen2'Img &
         "anypen3 = " & rec.anypen3'Img &
         "anypen4 = " & rec.anypen4'Img &
         "anypen5 = " & rec.anypen5'Img &
         "anypen6 = " & rec.anypen6'Img &
         "anypen7 = " & rec.anypen7'Img &
         "apamt = " & rec.apamt'Img &
         "apdamt = " & rec.apdamt'Img &
         "apdir = " & rec.apdir'Img &
         "apdpd = " & rec.apdpd'Img &
         "appd = " & rec.appd'Img &
         "b2qfut1 = " & rec.b2qfut1'Img &
         "b2qfut2 = " & rec.b2qfut2'Img &
         "b2qfut3 = " & rec.b2qfut3'Img &
         "b3qfut1 = " & rec.b3qfut1'Img &
         "b3qfut2 = " & rec.b3qfut2'Img &
         "b3qfut3 = " & rec.b3qfut3'Img &
         "b3qfut4 = " & rec.b3qfut4'Img &
         "b3qfut5 = " & rec.b3qfut5'Img &
         "b3qfut6 = " & rec.b3qfut6'Img &
         "ben1q1 = " & rec.ben1q1'Img &
         "ben1q2 = " & rec.ben1q2'Img &
         "ben1q3 = " & rec.ben1q3'Img &
         "ben1q4 = " & rec.ben1q4'Img &
         "ben1q5 = " & rec.ben1q5'Img &
         "ben1q6 = " & rec.ben1q6'Img &
         "ben1q7 = " & rec.ben1q7'Img &
         "ben2q1 = " & rec.ben2q1'Img &
         "ben2q2 = " & rec.ben2q2'Img &
         "ben2q3 = " & rec.ben2q3'Img &
         "ben3q1 = " & rec.ben3q1'Img &
         "ben3q2 = " & rec.ben3q2'Img &
         "ben3q3 = " & rec.ben3q3'Img &
         "ben3q4 = " & rec.ben3q4'Img &
         "ben3q5 = " & rec.ben3q5'Img &
         "ben3q6 = " & rec.ben3q6'Img &
         "ben4q1 = " & rec.ben4q1'Img &
         "ben4q2 = " & rec.ben4q2'Img &
         "ben4q3 = " & rec.ben4q3'Img &
         "ben5q1 = " & rec.ben5q1'Img &
         "ben5q2 = " & rec.ben5q2'Img &
         "ben5q3 = " & rec.ben5q3'Img &
         "ben5q4 = " & rec.ben5q4'Img &
         "ben5q5 = " & rec.ben5q5'Img &
         "ben5q6 = " & rec.ben5q6'Img &
         "ben7q1 = " & rec.ben7q1'Img &
         "ben7q2 = " & rec.ben7q2'Img &
         "ben7q3 = " & rec.ben7q3'Img &
         "ben7q4 = " & rec.ben7q4'Img &
         "ben7q5 = " & rec.ben7q5'Img &
         "ben7q6 = " & rec.ben7q6'Img &
         "ben7q7 = " & rec.ben7q7'Img &
         "ben7q8 = " & rec.ben7q8'Img &
         "ben7q9 = " & rec.ben7q9'Img &
         "btwacc = " & rec.btwacc'Img &
         "claimant = " & rec.claimant'Img &
         "cohabit = " & rec.cohabit'Img &
         "combid = " & rec.combid'Img &
         "convbl = " & rec.convbl'Img &
         "ctclum1 = " & rec.ctclum1'Img &
         "ctclum2 = " & rec.ctclum2'Img &
         "cupchk = " & rec.cupchk'Img &
         "cvht = " & rec.cvht'Img &
         "cvpay = " & rec.cvpay'Img &
         "cvpd = " & rec.cvpd'Img &
         "dentist = " & rec.dentist'Img &
         "depend = " & rec.depend'Img &
         "disdif1 = " & rec.disdif1'Img &
         "disdif2 = " & rec.disdif2'Img &
         "disdif3 = " & rec.disdif3'Img &
         "disdif4 = " & rec.disdif4'Img &
         "disdif5 = " & rec.disdif5'Img &
         "disdif6 = " & rec.disdif6'Img &
         "disdif7 = " & rec.disdif7'Img &
         "disdif8 = " & rec.disdif8'Img &
         "dob = " & tio.Image( rec.dob, tio.ISO_Date ) &
         "dptcboth = " & rec.dptcboth'Img &
         "dptclum = " & rec.dptclum'Img &
         "dvil03a = " & rec.dvil03a'Img &
         "dvil04a = " & rec.dvil04a'Img &
         "dvjb12ml = " & rec.dvjb12ml'Img &
         "dvmardf = " & rec.dvmardf'Img &
         "ed1amt = " & rec.ed1amt'Img &
         "ed1borr = " & rec.ed1borr'Img &
         "ed1int = " & rec.ed1int'Img &
         "ed1monyr = " & tio.Image( rec.ed1monyr, tio.ISO_Date ) &
         "ed1pd = " & rec.ed1pd'Img &
         "ed1sum = " & rec.ed1sum'Img &
         "ed2amt = " & rec.ed2amt'Img &
         "ed2borr = " & rec.ed2borr'Img &
         "ed2int = " & rec.ed2int'Img &
         "ed2monyr = " & tio.Image( rec.ed2monyr, tio.ISO_Date ) &
         "ed2pd = " & rec.ed2pd'Img &
         "ed2sum = " & rec.ed2sum'Img &
         "edatt = " & rec.edatt'Img &
         "edattn1 = " & rec.edattn1'Img &
         "edattn2 = " & rec.edattn2'Img &
         "edattn3 = " & rec.edattn3'Img &
         "edhr = " & rec.edhr'Img &
         "edtime = " & rec.edtime'Img &
         "edtyp = " & rec.edtyp'Img &
         "eligadlt = " & rec.eligadlt'Img &
         "eligchld = " & rec.eligchld'Img &
         "emppay1 = " & rec.emppay1'Img &
         "emppay2 = " & rec.emppay2'Img &
         "emppay3 = " & rec.emppay3'Img &
         "empstat = " & rec.empstat'Img &
         "endyr = " & rec.endyr'Img &
         "epcur = " & rec.epcur'Img &
         "es2000 = " & rec.es2000'Img &
         "ethgrp = " & rec.ethgrp'Img &
         "everwrk = " & rec.everwrk'Img &
         "exthbct1 = " & rec.exthbct1'Img &
         "exthbct2 = " & rec.exthbct2'Img &
         "exthbct3 = " & rec.exthbct3'Img &
         "eyetest = " & rec.eyetest'Img &
         "follow = " & rec.follow'Img &
         "fted = " & rec.fted'Img &
         "ftwk = " & rec.ftwk'Img &
         "future = " & rec.future'Img &
         "govpis = " & rec.govpis'Img &
         "govpjsa = " & rec.govpjsa'Img &
         "x_grant = " & rec.x_grant'Img &
         "grtamt1 = " & rec.grtamt1'Img &
         "grtamt2 = " & rec.grtamt2'Img &
         "grtdir1 = " & rec.grtdir1'Img &
         "grtdir2 = " & rec.grtdir2'Img &
         "grtnum = " & rec.grtnum'Img &
         "grtsce1 = " & rec.grtsce1'Img &
         "grtsce2 = " & rec.grtsce2'Img &
         "grtval1 = " & rec.grtval1'Img &
         "grtval2 = " & rec.grtval2'Img &
         "gta = " & rec.gta'Img &
         "hbothamt = " & rec.hbothamt'Img &
         "hbothbu = " & rec.hbothbu'Img &
         "hbothpd = " & rec.hbothpd'Img &
         "hbothwk = " & rec.hbothwk'Img &
         "hbotwait = " & rec.hbotwait'Img &
         "health = " & rec.health'Img &
         "hholder = " & rec.hholder'Img &
         "hosp = " & rec.hosp'Img &
         "hprob = " & rec.hprob'Img &
         "hrpid = " & rec.hrpid'Img &
         "incdur = " & rec.incdur'Img &
         "injlong = " & rec.injlong'Img &
         "injwk = " & rec.injwk'Img &
         "invests = " & rec.invests'Img &
         "iout = " & rec.iout'Img &
         "isa1type = " & rec.isa1type'Img &
         "isa2type = " & rec.isa2type'Img &
         "isa3type = " & rec.isa3type'Img &
         "jobaway = " & rec.jobaway'Img &
         "lareg = " & rec.lareg'Img &
         "likewk = " & rec.likewk'Img &
         "lktime = " & rec.lktime'Img &
         "ln1rpint = " & rec.ln1rpint'Img &
         "ln2rpint = " & rec.ln2rpint'Img &
         "loan = " & rec.loan'Img &
         "loannum = " & rec.loannum'Img &
         "look = " & rec.look'Img &
         "lookwk = " & rec.lookwk'Img &
         "lstwrk1 = " & rec.lstwrk1'Img &
         "lstwrk2 = " & rec.lstwrk2'Img &
         "lstyr = " & rec.lstyr'Img &
         "mntamt1 = " & rec.mntamt1'Img &
         "mntamt2 = " & rec.mntamt2'Img &
         "mntct = " & rec.mntct'Img &
         "mntfor1 = " & rec.mntfor1'Img &
         "mntfor2 = " & rec.mntfor2'Img &
         "mntgov1 = " & rec.mntgov1'Img &
         "mntgov2 = " & rec.mntgov2'Img &
         "mntpay = " & rec.mntpay'Img &
         "mntpd1 = " & rec.mntpd1'Img &
         "mntpd2 = " & rec.mntpd2'Img &
         "mntrec = " & rec.mntrec'Img &
         "mnttota1 = " & rec.mnttota1'Img &
         "mnttota2 = " & rec.mnttota2'Img &
         "mntus1 = " & rec.mntus1'Img &
         "mntus2 = " & rec.mntus2'Img &
         "mntusam1 = " & rec.mntusam1'Img &
         "mntusam2 = " & rec.mntusam2'Img &
         "mntuspd1 = " & rec.mntuspd1'Img &
         "mntuspd2 = " & rec.mntuspd2'Img &
         "ms = " & rec.ms'Img &
         "natid1 = " & rec.natid1'Img &
         "natid2 = " & rec.natid2'Img &
         "natid3 = " & rec.natid3'Img &
         "natid4 = " & rec.natid4'Img &
         "natid5 = " & rec.natid5'Img &
         "natid6 = " & rec.natid6'Img &
         "ndeal = " & rec.ndeal'Img &
         "newdtype = " & rec.newdtype'Img &
         "nhs1 = " & rec.nhs1'Img &
         "nhs2 = " & rec.nhs2'Img &
         "nhs3 = " & rec.nhs3'Img &
         "niamt = " & rec.niamt'Img &
         "niethgrp = " & rec.niethgrp'Img &
         "niexthbb = " & rec.niexthbb'Img &
         "ninatid1 = " & rec.ninatid1'Img &
         "ninatid2 = " & rec.ninatid2'Img &
         "ninatid3 = " & rec.ninatid3'Img &
         "ninatid4 = " & rec.ninatid4'Img &
         "ninatid5 = " & rec.ninatid5'Img &
         "ninatid6 = " & rec.ninatid6'Img &
         "ninatid7 = " & rec.ninatid7'Img &
         "ninatid8 = " & rec.ninatid8'Img &
         "nipd = " & rec.nipd'Img &
         "nireg = " & rec.nireg'Img &
         "nirel = " & rec.nirel'Img &
         "nitrain = " & rec.nitrain'Img &
         "nlper = " & rec.nlper'Img &
         "nolk1 = " & rec.nolk1'Img &
         "nolk2 = " & rec.nolk2'Img &
         "nolk3 = " & rec.nolk3'Img &
         "nolook = " & rec.nolook'Img &
         "nowant = " & rec.nowant'Img &
         "nssec = " & rec.nssec'Img &
         "ntcapp = " & rec.ntcapp'Img &
         "ntcdat = " & rec.ntcdat'Img &
         "ntcinc = " & rec.ntcinc'Img &
         "ntcorig1 = " & rec.ntcorig1'Img &
         "ntcorig2 = " & rec.ntcorig2'Img &
         "ntcorig3 = " & rec.ntcorig3'Img &
         "ntcorig4 = " & rec.ntcorig4'Img &
         "ntcorig5 = " & rec.ntcorig5'Img &
         "numjob = " & rec.numjob'Img &
         "numjob2 = " & rec.numjob2'Img &
         "oddjob = " & rec.oddjob'Img &
         "oldstud = " & rec.oldstud'Img &
         "otabspar = " & rec.otabspar'Img &
         "otamt = " & rec.otamt'Img &
         "otapamt = " & rec.otapamt'Img &
         "otappd = " & rec.otappd'Img &
         "othtax = " & rec.othtax'Img &
         "otinva = " & rec.otinva'Img &
         "pareamt = " & rec.pareamt'Img &
         "parepd = " & rec.parepd'Img &
         "penlump = " & rec.penlump'Img &
         "ppnumc = " & rec.ppnumc'Img &
         "prit = " & rec.prit'Img &
         "prscrpt = " & rec.prscrpt'Img &
         "ptwk = " & rec.ptwk'Img &
         "r01 = " & rec.r01'Img &
         "r02 = " & rec.r02'Img &
         "r03 = " & rec.r03'Img &
         "r04 = " & rec.r04'Img &
         "r05 = " & rec.r05'Img &
         "r06 = " & rec.r06'Img &
         "r07 = " & rec.r07'Img &
         "r08 = " & rec.r08'Img &
         "r09 = " & rec.r09'Img &
         "r10 = " & rec.r10'Img &
         "r11 = " & rec.r11'Img &
         "r12 = " & rec.r12'Img &
         "r13 = " & rec.r13'Img &
         "r14 = " & rec.r14'Img &
         "redamt = " & rec.redamt'Img &
         "redany = " & rec.redany'Img &
         "rentprof = " & rec.rentprof'Img &
         "retire = " & rec.retire'Img &
         "retire1 = " & rec.retire1'Img &
         "retreas = " & rec.retreas'Img &
         "royal1 = " & rec.royal1'Img &
         "royal2 = " & rec.royal2'Img &
         "royal3 = " & rec.royal3'Img &
         "royal4 = " & rec.royal4'Img &
         "royyr1 = " & rec.royyr1'Img &
         "royyr2 = " & rec.royyr2'Img &
         "royyr3 = " & rec.royyr3'Img &
         "royyr4 = " & rec.royyr4'Img &
         "rstrct = " & rec.rstrct'Img &
         "sex = " & rec.sex'Img &
         "sflntyp1 = " & rec.sflntyp1'Img &
         "sflntyp2 = " & rec.sflntyp2'Img &
         "sftype1 = " & rec.sftype1'Img &
         "sftype2 = " & rec.sftype2'Img &
         "sic = " & rec.sic'Img &
         "slrepamt = " & rec.slrepamt'Img &
         "slrepay = " & rec.slrepay'Img &
         "slreppd = " & rec.slreppd'Img &
         "soc2000 = " & rec.soc2000'Img &
         "spcreg1 = " & rec.spcreg1'Img &
         "spcreg2 = " & rec.spcreg2'Img &
         "spcreg3 = " & rec.spcreg3'Img &
         "specs = " & rec.specs'Img &
         "spout = " & rec.spout'Img &
         "srentamt = " & rec.srentamt'Img &
         "srentpd = " & rec.srentpd'Img &
         "start = " & rec.start'Img &
         "startyr = " & rec.startyr'Img &
         "taxcred1 = " & rec.taxcred1'Img &
         "taxcred2 = " & rec.taxcred2'Img &
         "taxcred3 = " & rec.taxcred3'Img &
         "taxcred4 = " & rec.taxcred4'Img &
         "taxcred5 = " & rec.taxcred5'Img &
         "taxfut = " & rec.taxfut'Img &
         "tdaywrk = " & rec.tdaywrk'Img &
         "tea = " & rec.tea'Img &
         "topupl = " & rec.topupl'Img &
         "totint = " & rec.totint'Img &
         "train = " & rec.train'Img &
         "trav = " & rec.trav'Img &
         "tuborr = " & rec.tuborr'Img &
         "typeed = " & rec.typeed'Img &
         "unpaid1 = " & rec.unpaid1'Img &
         "unpaid2 = " & rec.unpaid2'Img &
         "voucher = " & rec.voucher'Img &
         "w1 = " & rec.w1'Img &
         "w2 = " & rec.w2'Img &
         "wait = " & rec.wait'Img &
         "war1 = " & rec.war1'Img &
         "war2 = " & rec.war2'Img &
         "wftcboth = " & rec.wftcboth'Img &
         "wftclum = " & rec.wftclum'Img &
         "whoresp = " & rec.whoresp'Img &
         "whosectb = " & rec.whosectb'Img &
         "whyfrde1 = " & rec.whyfrde1'Img &
         "whyfrde2 = " & rec.whyfrde2'Img &
         "whyfrde3 = " & rec.whyfrde3'Img &
         "whyfrde4 = " & rec.whyfrde4'Img &
         "whyfrde5 = " & rec.whyfrde5'Img &
         "whyfrde6 = " & rec.whyfrde6'Img &
         "whyfrey1 = " & rec.whyfrey1'Img &
         "whyfrey2 = " & rec.whyfrey2'Img &
         "whyfrey3 = " & rec.whyfrey3'Img &
         "whyfrey4 = " & rec.whyfrey4'Img &
         "whyfrey5 = " & rec.whyfrey5'Img &
         "whyfrey6 = " & rec.whyfrey6'Img &
         "whyfrpr1 = " & rec.whyfrpr1'Img &
         "whyfrpr2 = " & rec.whyfrpr2'Img &
         "whyfrpr3 = " & rec.whyfrpr3'Img &
         "whyfrpr4 = " & rec.whyfrpr4'Img &
         "whyfrpr5 = " & rec.whyfrpr5'Img &
         "whyfrpr6 = " & rec.whyfrpr6'Img &
         "whytrav1 = " & rec.whytrav1'Img &
         "whytrav2 = " & rec.whytrav2'Img &
         "whytrav3 = " & rec.whytrav3'Img &
         "whytrav4 = " & rec.whytrav4'Img &
         "whytrav5 = " & rec.whytrav5'Img &
         "whytrav6 = " & rec.whytrav6'Img &
         "wintfuel = " & rec.wintfuel'Img &
         "wmkit = " & rec.wmkit'Img &
         "working = " & rec.working'Img &
         "wpa = " & rec.wpa'Img &
         "wpba = " & rec.wpba'Img &
         "wtclum1 = " & rec.wtclum1'Img &
         "wtclum2 = " & rec.wtclum2'Img &
         "wtclum3 = " & rec.wtclum3'Img &
         "ystrtwk = " & rec.ystrtwk'Img &
         "month = " & rec.month'Img &
         "able = " & rec.able'Img &
         "actacci = " & rec.actacci'Img &
         "addda = " & rec.addda'Img &
         "basacti = " & rec.basacti'Img &
         "bntxcred = " & rec.bntxcred'Img &
         "careab = " & rec.careab'Img &
         "careah = " & rec.careah'Img &
         "carecb = " & rec.carecb'Img &
         "carech = " & rec.carech'Img &
         "carecl = " & rec.carecl'Img &
         "carefl = " & rec.carefl'Img &
         "carefr = " & rec.carefr'Img &
         "careot = " & rec.careot'Img &
         "carere = " & rec.carere'Img &
         "curacti = " & rec.curacti'Img &
         "empoccp = " & rec.empoccp'Img &
         "empstatb = " & rec.empstatb'Img &
         "empstatc = " & rec.empstatc'Img &
         "empstati = " & rec.empstati'Img &
         "fsbndcti = " & rec.fsbndcti'Img &
         "fwmlkval = " & rec.fwmlkval'Img &
         "gebacti = " & rec.gebacti'Img &
         "giltcti = " & rec.giltcti'Img &
         "gross2 = " & rec.gross2'Img &
         "gross3 = " & rec.gross3'Img &
         "hbsupran = " & rec.hbsupran'Img &
         "hdage = " & rec.hdage'Img &
         "hdben = " & rec.hdben'Img &
         "hdindinc = " & rec.hdindinc'Img &
         "hourab = " & rec.hourab'Img &
         "hourah = " & rec.hourah'Img &
         "hourcare = " & rec.hourcare'Img &
         "hourcb = " & rec.hourcb'Img &
         "hourch = " & rec.hourch'Img &
         "hourcl = " & rec.hourcl'Img &
         "hourfr = " & rec.hourfr'Img &
         "hourot = " & rec.hourot'Img &
         "hourre = " & rec.hourre'Img &
         "hourtot = " & rec.hourtot'Img &
         "hperson = " & rec.hperson'Img &
         "iagegr2 = " & rec.iagegr2'Img &
         "iagegrp = " & rec.iagegrp'Img &
         "incseo2 = " & rec.incseo2'Img &
         "indinc = " & rec.indinc'Img &
         "indisben = " & rec.indisben'Img &
         "inearns = " & rec.inearns'Img &
         "ininv = " & rec.ininv'Img &
         "inirben = " & rec.inirben'Img &
         "innirben = " & rec.innirben'Img &
         "inothben = " & rec.inothben'Img &
         "inpeninc = " & rec.inpeninc'Img &
         "inrinc = " & rec.inrinc'Img &
         "inrpinc = " & rec.inrpinc'Img &
         "intvlic = " & rec.intvlic'Img &
         "intxcred = " & rec.intxcred'Img &
         "isacti = " & rec.isacti'Img &
         "marital = " & rec.marital'Img &
         "netocpen = " & rec.netocpen'Img &
         "nincseo2 = " & rec.nincseo2'Img &
         "nindinc = " & rec.nindinc'Img &
         "ninearns = " & rec.ninearns'Img &
         "nininv = " & rec.nininv'Img &
         "ninpenin = " & rec.ninpenin'Img &
         "ninsein2 = " & rec.ninsein2'Img &
         "nsbocti = " & rec.nsbocti'Img &
         "occupnum = " & rec.occupnum'Img &
         "otbscti = " & rec.otbscti'Img &
         "pepscti = " & rec.pepscti'Img &
         "poaccti = " & rec.poaccti'Img &
         "prbocti = " & rec.prbocti'Img &
         "relhrp = " & rec.relhrp'Img &
         "sayecti = " & rec.sayecti'Img &
         "sclbcti = " & rec.sclbcti'Img &
         "seincam2 = " & rec.seincam2'Img &
         "smpadj = " & rec.smpadj'Img &
         "sscti = " & rec.sscti'Img &
         "sspadj = " & rec.sspadj'Img &
         "stshcti = " & rec.stshcti'Img &
         "superan = " & rec.superan'Img &
         "taxpayer = " & rec.taxpayer'Img &
         "tesscti = " & rec.tesscti'Img &
         "totgrant = " & rec.totgrant'Img &
         "tothours = " & rec.tothours'Img &
         "totoccp = " & rec.totoccp'Img &
         "ttwcosts = " & rec.ttwcosts'Img &
         "untrcti = " & rec.untrcti'Img &
         "uperson = " & rec.uperson'Img &
         "widoccp = " & rec.widoccp'Img &
         "accountq = " & rec.accountq'Img &
         "ben5q7 = " & rec.ben5q7'Img &
         "ben5q8 = " & rec.ben5q8'Img &
         "ben5q9 = " & rec.ben5q9'Img &
         "ddatre = " & rec.ddatre'Img &
         "disdif9 = " & rec.disdif9'Img &
         "fare = " & rec.fare'Img &
         "nittwmod = " & rec.nittwmod'Img &
         "oneway = " & rec.oneway'Img &
         "pssamt = " & rec.pssamt'Img &
         "pssdate = " & rec.pssdate'Img &
         "ttwcode1 = " & rec.ttwcode1'Img &
         "ttwcode2 = " & rec.ttwcode2'Img &
         "ttwcode3 = " & rec.ttwcode3'Img &
         "ttwcost = " & rec.ttwcost'Img &
         "ttwfar = " & rec.ttwfar'Img &
         "ttwfrq = " & rec.ttwfrq'Img &
         "ttwmod = " & rec.ttwmod'Img &
         "ttwpay = " & rec.ttwpay'Img &
         "ttwpss = " & rec.ttwpss'Img &
         "ttwrec = " & rec.ttwrec'Img &
         "chbflg = " & rec.chbflg'Img &
         "crunaci = " & rec.crunaci'Img &
         "enomorti = " & rec.enomorti'Img &
         "sapadj = " & rec.sapadj'Img &
         "sppadj = " & rec.sppadj'Img &
         "ttwmode = " & rec.ttwmode'Img &
         "ddatrep = " & rec.ddatrep'Img &
         "defrpen = " & rec.defrpen'Img &
         "disdifp = " & rec.disdifp'Img &
         "followup = " & rec.followup'Img &
         "practice = " & rec.practice'Img &
         "sfrpis = " & rec.sfrpis'Img &
         "sfrpjsa = " & rec.sfrpjsa'Img &
         "age80 = " & rec.age80'Img &
         "ethgr2 = " & rec.ethgr2'Img &
         "pocardi = " & rec.pocardi'Img &
         "chkdpn = " & rec.chkdpn'Img &
         "chknop = " & rec.chknop'Img &
         "consent = " & rec.consent'Img &
         "dvpens = " & rec.dvpens'Img &
         "eligschm = " & rec.eligschm'Img &
         "emparr = " & rec.emparr'Img &
         "emppen = " & rec.emppen'Img &
         "empschm = " & rec.empschm'Img &
         "lnkref1 = " & rec.lnkref1'Img &
         "lnkref2 = " & rec.lnkref2'Img &
         "lnkref21 = " & rec.lnkref21'Img &
         "lnkref22 = " & rec.lnkref22'Img &
         "lnkref23 = " & rec.lnkref23'Img &
         "lnkref24 = " & rec.lnkref24'Img &
         "lnkref25 = " & rec.lnkref25'Img &
         "lnkref3 = " & rec.lnkref3'Img &
         "lnkref4 = " & rec.lnkref4'Img &
         "lnkref5 = " & rec.lnkref5'Img &
         "memschm = " & rec.memschm'Img &
         "pconsent = " & rec.pconsent'Img &
         "perspen1 = " & rec.perspen1'Img &
         "perspen2 = " & rec.perspen2'Img &
         "privpen = " & rec.privpen'Img &
         "schchk = " & rec.schchk'Img &
         "spnumc = " & rec.spnumc'Img &
         "stakep = " & rec.stakep'Img &
         "trainee = " & rec.trainee'Img &
         "lnkdwp = " & rec.lnkdwp'Img &
         "lnkons = " & rec.lnkons'Img &
         "lnkref6 = " & rec.lnkref6'Img &
         "lnkref7 = " & rec.lnkref7'Img &
         "lnkref8 = " & rec.lnkref8'Img &
         "lnkref9 = " & rec.lnkref9'Img &
         "tcever1 = " & rec.tcever1'Img &
         "tcever2 = " & rec.tcever2'Img &
         "tcrepay1 = " & rec.tcrepay1'Img &
         "tcrepay2 = " & rec.tcrepay2'Img &
         "tcrepay3 = " & rec.tcrepay3'Img &
         "tcrepay4 = " & rec.tcrepay4'Img &
         "tcrepay5 = " & rec.tcrepay5'Img &
         "tcrepay6 = " & rec.tcrepay6'Img &
         "tcthsyr1 = " & rec.tcthsyr1'Img &
         "tcthsyr2 = " & rec.tcthsyr2'Img &
         "currjobm = " & rec.currjobm'Img &
         "prevjobm = " & rec.prevjobm'Img &
         "b3qfut7 = " & rec.b3qfut7'Img &
         "ben3q7 = " & rec.ben3q7'Img &
         "camemt = " & rec.camemt'Img &
         "cameyr = " & rec.cameyr'Img &
         "cameyr2 = " & rec.cameyr2'Img &
         "contuk = " & rec.contuk'Img &
         "corign = " & rec.corign'Img &
         "ddaprog = " & rec.ddaprog'Img &
         "hbolng = " & rec.hbolng'Img &
         "hi1qual1 = " & rec.hi1qual1'Img &
         "hi1qual2 = " & rec.hi1qual2'Img &
         "hi1qual3 = " & rec.hi1qual3'Img &
         "hi1qual4 = " & rec.hi1qual4'Img &
         "hi1qual5 = " & rec.hi1qual5'Img &
         "hi1qual6 = " & rec.hi1qual6'Img &
         "hi2qual = " & rec.hi2qual'Img &
         "hlpgvn01 = " & rec.hlpgvn01'Img &
         "hlpgvn02 = " & rec.hlpgvn02'Img &
         "hlpgvn03 = " & rec.hlpgvn03'Img &
         "hlpgvn04 = " & rec.hlpgvn04'Img &
         "hlpgvn05 = " & rec.hlpgvn05'Img &
         "hlpgvn06 = " & rec.hlpgvn06'Img &
         "hlpgvn07 = " & rec.hlpgvn07'Img &
         "hlpgvn08 = " & rec.hlpgvn08'Img &
         "hlpgvn09 = " & rec.hlpgvn09'Img &
         "hlpgvn10 = " & rec.hlpgvn10'Img &
         "hlpgvn11 = " & rec.hlpgvn11'Img &
         "hlprec01 = " & rec.hlprec01'Img &
         "hlprec02 = " & rec.hlprec02'Img &
         "hlprec03 = " & rec.hlprec03'Img &
         "hlprec04 = " & rec.hlprec04'Img &
         "hlprec05 = " & rec.hlprec05'Img &
         "hlprec06 = " & rec.hlprec06'Img &
         "hlprec07 = " & rec.hlprec07'Img &
         "hlprec08 = " & rec.hlprec08'Img &
         "hlprec09 = " & rec.hlprec09'Img &
         "hlprec10 = " & rec.hlprec10'Img &
         "hlprec11 = " & rec.hlprec11'Img &
         "issue = " & rec.issue'Img &
         "loangvn1 = " & rec.loangvn1'Img &
         "loangvn2 = " & rec.loangvn2'Img &
         "loangvn3 = " & rec.loangvn3'Img &
         "loanrec1 = " & rec.loanrec1'Img &
         "loanrec2 = " & rec.loanrec2'Img &
         "loanrec3 = " & rec.loanrec3'Img &
         "mntarr1 = " & rec.mntarr1'Img &
         "mntarr2 = " & rec.mntarr2'Img &
         "mntarr3 = " & rec.mntarr3'Img &
         "mntarr4 = " & rec.mntarr4'Img &
         "mntnrp = " & rec.mntnrp'Img &
         "othqual1 = " & rec.othqual1'Img &
         "othqual2 = " & rec.othqual2'Img &
         "othqual3 = " & rec.othqual3'Img &
         "tea9697 = " & rec.tea9697'Img &
         "heartval = " & rec.heartval'Img &
         "iagegr3 = " & rec.iagegr3'Img &
         "iagegr4 = " & rec.iagegr4'Img &
         "nirel2 = " & rec.nirel2'Img &
         "xbonflag = " & rec.xbonflag'Img &
         "alg = " & rec.alg'Img &
         "algamt = " & rec.algamt'Img &
         "algpd = " & rec.algpd'Img &
         "ben4q4 = " & rec.ben4q4'Img &
         "chkctc = " & rec.chkctc'Img &
         "chkdpco1 = " & rec.chkdpco1'Img &
         "chkdpco2 = " & rec.chkdpco2'Img &
         "chkdpco3 = " & rec.chkdpco3'Img &
         "chkdsco1 = " & rec.chkdsco1'Img &
         "chkdsco2 = " & rec.chkdsco2'Img &
         "chkdsco3 = " & rec.chkdsco3'Img &
         "dv09pens = " & rec.dv09pens'Img &
         "lnkref01 = " & rec.lnkref01'Img &
         "lnkref02 = " & rec.lnkref02'Img &
         "lnkref03 = " & rec.lnkref03'Img &
         "lnkref04 = " & rec.lnkref04'Img &
         "lnkref05 = " & rec.lnkref05'Img &
         "lnkref06 = " & rec.lnkref06'Img &
         "lnkref07 = " & rec.lnkref07'Img &
         "lnkref08 = " & rec.lnkref08'Img &
         "lnkref09 = " & rec.lnkref09'Img &
         "lnkref10 = " & rec.lnkref10'Img &
         "lnkref11 = " & rec.lnkref11'Img &
         "spyrot = " & rec.spyrot'Img &
         "disdifad = " & rec.disdifad'Img &
         "gross3_x = " & rec.gross3_x'Img &
         "aliamt = " & rec.aliamt'Img &
         "alimny = " & rec.alimny'Img &
         "alipd = " & rec.alipd'Img &
         "alius = " & rec.alius'Img &
         "aluamt = " & rec.aluamt'Img &
         "alupd = " & rec.alupd'Img &
         "cbaamt = " & rec.cbaamt'Img &
         "hsvper = " & rec.hsvper'Img &
         "mednum = " & rec.mednum'Img &
         "medprpd = " & rec.medprpd'Img &
         "medprpy = " & rec.medprpy'Img &
         "penflag = " & rec.penflag'Img &
         "ppchk1 = " & rec.ppchk1'Img &
         "ppchk2 = " & rec.ppchk2'Img &
         "ppchk3 = " & rec.ppchk3'Img &
         "ttbprx = " & rec.ttbprx'Img &
         "mjobsect = " & rec.mjobsect'Img &
         "etngrp = " & rec.etngrp'Img &
         "medpay = " & rec.medpay'Img &
         "medrep = " & rec.medrep'Img &
         "medrpnm = " & rec.medrpnm'Img &
         "nanid1 = " & rec.nanid1'Img &
         "nanid2 = " & rec.nanid2'Img &
         "nanid3 = " & rec.nanid3'Img &
         "nanid4 = " & rec.nanid4'Img &
         "nanid5 = " & rec.nanid5'Img &
         "nanid6 = " & rec.nanid6'Img &
         "nietngrp = " & rec.nietngrp'Img &
         "ninanid1 = " & rec.ninanid1'Img &
         "ninanid2 = " & rec.ninanid2'Img &
         "ninanid3 = " & rec.ninanid3'Img &
         "ninanid4 = " & rec.ninanid4'Img &
         "ninanid5 = " & rec.ninanid5'Img &
         "ninanid6 = " & rec.ninanid6'Img &
         "ninanid7 = " & rec.ninanid7'Img &
         "nirelig = " & rec.nirelig'Img &
         "pollopin = " & rec.pollopin'Img &
         "religenw = " & rec.religenw'Img &
         "religsc = " & rec.religsc'Img &
         "sidqn = " & rec.sidqn'Img &
         "soc2010 = " & rec.soc2010'Img &
         "corignan = " & rec.corignan'Img &
         "dobmonth = " & rec.dobmonth'Img &
         "dobyear = " & rec.dobyear'Img &
         "ethgr3 = " & rec.ethgr3'Img &
         "ninanida = " & rec.ninanida'Img &
         "agehqual = " & rec.agehqual'Img &
         "bfd = " & rec.bfd'Img &
         "bfdamt = " & rec.bfdamt'Img &
         "bfdpd = " & rec.bfdpd'Img &
         "bfdval = " & rec.bfdval'Img &
         "btec = " & rec.btec'Img &
         "btecnow = " & rec.btecnow'Img &
         "cbaamt2 = " & rec.cbaamt2'Img &
         "change = " & rec.change'Img &
         "citizen = " & rec.citizen'Img &
         "citizen2 = " & rec.citizen2'Img &
         "condit = " & rec.condit'Img &
         "corigoth = " & rec.corigoth'Img &
         "curqual = " & rec.curqual'Img &
         "ddaprog1 = " & rec.ddaprog1'Img &
         "ddatre1 = " & rec.ddatre1'Img &
         "ddatrep1 = " & rec.ddatrep1'Img &
         "degree = " & rec.degree'Img &
         "degrenow = " & rec.degrenow'Img &
         "denrec = " & rec.denrec'Img &
         "disd01 = " & rec.disd01'Img &
         "disd02 = " & rec.disd02'Img &
         "disd03 = " & rec.disd03'Img &
         "disd04 = " & rec.disd04'Img &
         "disd05 = " & rec.disd05'Img &
         "disd06 = " & rec.disd06'Img &
         "disd07 = " & rec.disd07'Img &
         "disd08 = " & rec.disd08'Img &
         "disd09 = " & rec.disd09'Img &
         "disd10 = " & rec.disd10'Img &
         "disdifp1 = " & rec.disdifp1'Img &
         "empcontr = " & rec.empcontr'Img &
         "ethgrps = " & rec.ethgrps'Img &
         "eualiamt = " & rec.eualiamt'Img &
         "eualimny = " & rec.eualimny'Img &
         "eualipd = " & rec.eualipd'Img &
         "euetype = " & rec.euetype'Img &
         "followsc = " & rec.followsc'Img &
         "health1 = " & rec.health1'Img &
         "heathad = " & rec.heathad'Img &
         "hi3qual = " & rec.hi3qual'Img &
         "higho = " & rec.higho'Img &
         "highonow = " & rec.highonow'Img &
         "jobbyr = " & rec.jobbyr'Img &
         "limitl = " & rec.limitl'Img &
         "lktrain = " & rec.lktrain'Img &
         "lkwork = " & rec.lkwork'Img &
         "medrec = " & rec.medrec'Img &
         "nvqlenow = " & rec.nvqlenow'Img &
         "nvqlev = " & rec.nvqlev'Img &
         "othpass = " & rec.othpass'Img &
         "ppper = " & rec.ppper'Img &
         "proptax = " & rec.proptax'Img &
         "reasden = " & rec.reasden'Img &
         "reasmed = " & rec.reasmed'Img &
         "reasnhs = " & rec.reasnhs'Img &
         "reason = " & rec.reason'Img &
         "rednet = " & rec.rednet'Img &
         "redtax = " & rec.redtax'Img &
         "rsa = " & rec.rsa'Img &
         "rsanow = " & rec.rsanow'Img &
         "samesit = " & rec.samesit'Img &
         "scotvec = " & rec.scotvec'Img &
         "sctvnow = " & rec.sctvnow'Img &
         "sdemp01 = " & rec.sdemp01'Img &
         "sdemp02 = " & rec.sdemp02'Img &
         "sdemp03 = " & rec.sdemp03'Img &
         "sdemp04 = " & rec.sdemp04'Img &
         "sdemp05 = " & rec.sdemp05'Img &
         "sdemp06 = " & rec.sdemp06'Img &
         "sdemp07 = " & rec.sdemp07'Img &
         "sdemp08 = " & rec.sdemp08'Img &
         "sdemp09 = " & rec.sdemp09'Img &
         "sdemp10 = " & rec.sdemp10'Img &
         "sdemp11 = " & rec.sdemp11'Img &
         "sdemp12 = " & rec.sdemp12'Img &
         "selfdemp = " & rec.selfdemp'Img &
         "tempjob = " & rec.tempjob'Img &
         "agehq80 = " & rec.agehq80'Img &
         "disacta1 = " & rec.disacta1'Img &
         "discora1 = " & rec.discora1'Img &
         "gross4 = " & rec.gross4'Img &
         "ninrinc = " & rec.ninrinc'Img &
         "typeed2 = " & rec.typeed2'Img &
         "w45 = " & rec.w45'Img &
         "accmsat = " & rec.accmsat'Img &
         "c2orign = " & rec.c2orign'Img &
         "calm = " & rec.calm'Img &
         "cbchk = " & rec.cbchk'Img &
         "claifut1 = " & rec.claifut1'Img &
         "claifut2 = " & rec.claifut2'Img &
         "claifut3 = " & rec.claifut3'Img &
         "claifut4 = " & rec.claifut4'Img &
         "claifut5 = " & rec.claifut5'Img &
         "claifut6 = " & rec.claifut6'Img &
         "claifut7 = " & rec.claifut7'Img &
         "claifut8 = " & rec.claifut8'Img &
         "commusat = " & rec.commusat'Img &
         "coptrust = " & rec.coptrust'Img &
         "depress = " & rec.depress'Img &
         "disben1 = " & rec.disben1'Img &
         "disben2 = " & rec.disben2'Img &
         "disben3 = " & rec.disben3'Img &
         "disben4 = " & rec.disben4'Img &
         "disben5 = " & rec.disben5'Img &
         "disben6 = " & rec.disben6'Img &
         "discuss = " & rec.discuss'Img &
         "dla1 = " & rec.dla1'Img &
         "dla2 = " & rec.dla2'Img &
         "dls = " & rec.dls'Img &
         "dlsamt = " & rec.dlsamt'Img &
         "dlspd = " & rec.dlspd'Img &
         "dlsval = " & rec.dlsval'Img &
         "down = " & rec.down'Img &
         "envirsat = " & rec.envirsat'Img &
         "gpispc = " & rec.gpispc'Img &
         "gpjsaesa = " & rec.gpjsaesa'Img &
         "happy = " & rec.happy'Img &
         "help = " & rec.help'Img &
         "iclaim1 = " & rec.iclaim1'Img &
         "iclaim2 = " & rec.iclaim2'Img &
         "iclaim3 = " & rec.iclaim3'Img &
         "iclaim4 = " & rec.iclaim4'Img &
         "iclaim5 = " & rec.iclaim5'Img &
         "iclaim6 = " & rec.iclaim6'Img &
         "iclaim7 = " & rec.iclaim7'Img &
         "iclaim8 = " & rec.iclaim8'Img &
         "iclaim9 = " & rec.iclaim9'Img &
         "jobsat = " & rec.jobsat'Img &
         "kidben1 = " & rec.kidben1'Img &
         "kidben2 = " & rec.kidben2'Img &
         "kidben3 = " & rec.kidben3'Img &
         "legltrus = " & rec.legltrus'Img &
         "lifesat = " & rec.lifesat'Img &
         "meaning = " & rec.meaning'Img &
         "moneysat = " & rec.moneysat'Img &
         "nervous = " & rec.nervous'Img &
         "ni2train = " & rec.ni2train'Img &
         "othben1 = " & rec.othben1'Img &
         "othben2 = " & rec.othben2'Img &
         "othben3 = " & rec.othben3'Img &
         "othben4 = " & rec.othben4'Img &
         "othben5 = " & rec.othben5'Img &
         "othben6 = " & rec.othben6'Img &
         "othtrust = " & rec.othtrust'Img &
         "penben1 = " & rec.penben1'Img &
         "penben2 = " & rec.penben2'Img &
         "penben3 = " & rec.penben3'Img &
         "penben4 = " & rec.penben4'Img &
         "penben5 = " & rec.penben5'Img &
         "pip1 = " & rec.pip1'Img &
         "pip2 = " & rec.pip2'Img &
         "polttrus = " & rec.polttrus'Img &
         "recsat = " & rec.recsat'Img &
         "relasat = " & rec.relasat'Img &
         "safe = " & rec.safe'Img &
         "socfund1 = " & rec.socfund1'Img &
         "socfund2 = " & rec.socfund2'Img &
         "socfund3 = " & rec.socfund3'Img &
         "socfund4 = " & rec.socfund4'Img &
         "srispc = " & rec.srispc'Img &
         "srjsaesa = " & rec.srjsaesa'Img &
         "timesat = " & rec.timesat'Img &
         "train2 = " & rec.train2'Img &
         "trnallow = " & rec.trnallow'Img &
         "wageben1 = " & rec.wageben1'Img &
         "wageben2 = " & rec.wageben2'Img &
         "wageben3 = " & rec.wageben3'Img &
         "wageben4 = " & rec.wageben4'Img &
         "wageben5 = " & rec.wageben5'Img &
         "wageben6 = " & rec.wageben6'Img &
         "wageben7 = " & rec.wageben7'Img &
         "wageben8 = " & rec.wageben8'Img &
         "ninnirbn = " & rec.ninnirbn'Img &
         "ninothbn = " & rec.ninothbn'Img &
         "anxious = " & rec.anxious'Img &
         "candgnow = " & rec.candgnow'Img &
         "curothf = " & rec.curothf'Img &
         "curothp = " & rec.curothp'Img &
         "curothwv = " & rec.curothwv'Img &
         "dvhiqual = " & rec.dvhiqual'Img &
         "gnvqnow = " & rec.gnvqnow'Img &
         "gpuc = " & rec.gpuc'Img &
         "happywb = " & rec.happywb'Img &
         "hi1qual7 = " & rec.hi1qual7'Img &
         "hi1qual8 = " & rec.hi1qual8'Img &
         "mntarr5 = " & rec.mntarr5'Img &
         "mntnoch1 = " & rec.mntnoch1'Img &
         "mntnoch2 = " & rec.mntnoch2'Img &
         "mntnoch3 = " & rec.mntnoch3'Img &
         "mntnoch4 = " & rec.mntnoch4'Img &
         "mntnoch5 = " & rec.mntnoch5'Img &
         "mntpro1 = " & rec.mntpro1'Img &
         "mntpro2 = " & rec.mntpro2'Img &
         "mntpro3 = " & rec.mntpro3'Img &
         "mnttim1 = " & rec.mnttim1'Img &
         "mnttim2 = " & rec.mnttim2'Img &
         "mnttim3 = " & rec.mnttim3'Img &
         "mntwrk1 = " & rec.mntwrk1'Img &
         "mntwrk2 = " & rec.mntwrk2'Img &
         "mntwrk3 = " & rec.mntwrk3'Img &
         "mntwrk4 = " & rec.mntwrk4'Img &
         "mntwrk5 = " & rec.mntwrk5'Img &
         "ndeplnow = " & rec.ndeplnow'Img &
         "oqualc1 = " & rec.oqualc1'Img &
         "oqualc2 = " & rec.oqualc2'Img &
         "oqualc3 = " & rec.oqualc3'Img &
         "sruc = " & rec.sruc'Img &
         "webacnow = " & rec.webacnow'Img &
         "indeth = " & rec.indeth'Img &
         "euactive = " & rec.euactive'Img &
         "euactno = " & rec.euactno'Img &
         "euartact = " & rec.euartact'Img &
         "euaskhlp = " & rec.euaskhlp'Img &
         "eucinema = " & rec.eucinema'Img &
         "eucultur = " & rec.eucultur'Img &
         "euinvol = " & rec.euinvol'Img &
         "eulivpe = " & rec.eulivpe'Img &
         "eumtfam = " & rec.eumtfam'Img &
         "eumtfrnd = " & rec.eumtfrnd'Img &
         "eusocnet = " & rec.eusocnet'Img &
         "eusport = " & rec.eusport'Img &
         "eutkfam = " & rec.eutkfam'Img &
         "eutkfrnd = " & rec.eutkfrnd'Img &
         "eutkmat = " & rec.eutkmat'Img &
         "euvol = " & rec.euvol'Img &
         "natscot = " & rec.natscot'Img &
         "ntsctnow = " & rec.ntsctnow'Img &
         "penwel1 = " & rec.penwel1'Img &
         "penwel2 = " & rec.penwel2'Img &
         "penwel3 = " & rec.penwel3'Img &
         "penwel4 = " & rec.penwel4'Img &
         "penwel5 = " & rec.penwel5'Img &
         "penwel6 = " & rec.penwel6'Img &
         "skiwknow = " & rec.skiwknow'Img &
         "skiwrk = " & rec.skiwrk'Img &
         "slos = " & rec.slos'Img &
         "yjblev = " & rec.yjblev'Img;
   end to_String;


   function To_String( rec : Benunit ) return String is
   begin
      return  "Benunit: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "benunit = " & rec.benunit'Img &
         "incchnge = " & rec.incchnge'Img &
         "inchilow = " & rec.inchilow'Img &
         "kidinc = " & rec.kidinc'Img &
         "nhhchild = " & rec.nhhchild'Img &
         "totsav = " & rec.totsav'Img &
         "month = " & rec.month'Img &
         "actaccb = " & rec.actaccb'Img &
         "adddabu = " & rec.adddabu'Img &
         "adultb = " & rec.adultb'Img &
         "basactb = " & rec.basactb'Img &
         "boarder = " & rec.boarder'Img &
         "bpeninc = " & rec.bpeninc'Img &
         "bseinc = " & rec.bseinc'Img &
         "buagegr2 = " & rec.buagegr2'Img &
         "buagegrp = " & rec.buagegrp'Img &
         "budisben = " & rec.budisben'Img &
         "buearns = " & rec.buearns'Img &
         "buethgr2 = " & rec.buethgr2'Img &
         "buethgrp = " & rec.buethgrp'Img &
         "buinc = " & rec.buinc'Img &
         "buinv = " & rec.buinv'Img &
         "buirben = " & rec.buirben'Img &
         "bukids = " & rec.bukids'Img &
         "bunirben = " & rec.bunirben'Img &
         "buothben = " & rec.buothben'Img &
         "burent = " & rec.burent'Img &
         "burinc = " & rec.burinc'Img &
         "burpinc = " & rec.burpinc'Img &
         "butvlic = " & rec.butvlic'Img &
         "butxcred = " & rec.butxcred'Img &
         "chddabu = " & rec.chddabu'Img &
         "curactb = " & rec.curactb'Img &
         "depchldb = " & rec.depchldb'Img &
         "depdeds = " & rec.depdeds'Img &
         "disindhb = " & rec.disindhb'Img &
         "ecotypbu = " & rec.ecotypbu'Img &
         "ecstatbu = " & rec.ecstatbu'Img &
         "famthbai = " & rec.famthbai'Img &
         "famtypbs = " & rec.famtypbs'Img &
         "famtypbu = " & rec.famtypbu'Img &
         "famtype = " & rec.famtype'Img &
         "fsbndctb = " & rec.fsbndctb'Img &
         "fsmbu = " & rec.fsmbu'Img &
         "fsmlkbu = " & rec.fsmlkbu'Img &
         "fwmlkbu = " & rec.fwmlkbu'Img &
         "gebactb = " & rec.gebactb'Img &
         "giltctb = " & rec.giltctb'Img &
         "gross2 = " & rec.gross2'Img &
         "gross3 = " & rec.gross3'Img &
         "hbindbu = " & rec.hbindbu'Img &
         "isactb = " & rec.isactb'Img &
         "kid04 = " & rec.kid04'Img &
         "kid1115 = " & rec.kid1115'Img &
         "kid1618 = " & rec.kid1618'Img &
         "kid510 = " & rec.kid510'Img &
         "kidsbu0 = " & rec.kidsbu0'Img &
         "kidsbu1 = " & rec.kidsbu1'Img &
         "kidsbu10 = " & rec.kidsbu10'Img &
         "kidsbu11 = " & rec.kidsbu11'Img &
         "kidsbu12 = " & rec.kidsbu12'Img &
         "kidsbu13 = " & rec.kidsbu13'Img &
         "kidsbu14 = " & rec.kidsbu14'Img &
         "kidsbu15 = " & rec.kidsbu15'Img &
         "kidsbu16 = " & rec.kidsbu16'Img &
         "kidsbu17 = " & rec.kidsbu17'Img &
         "kidsbu18 = " & rec.kidsbu18'Img &
         "kidsbu2 = " & rec.kidsbu2'Img &
         "kidsbu3 = " & rec.kidsbu3'Img &
         "kidsbu4 = " & rec.kidsbu4'Img &
         "kidsbu5 = " & rec.kidsbu5'Img &
         "kidsbu6 = " & rec.kidsbu6'Img &
         "kidsbu7 = " & rec.kidsbu7'Img &
         "kidsbu8 = " & rec.kidsbu8'Img &
         "kidsbu9 = " & rec.kidsbu9'Img &
         "lastwork = " & rec.lastwork'Img &
         "lodger = " & rec.lodger'Img &
         "nsboctb = " & rec.nsboctb'Img &
         "otbsctb = " & rec.otbsctb'Img &
         "pepsctb = " & rec.pepsctb'Img &
         "poacctb = " & rec.poacctb'Img &
         "prboctb = " & rec.prboctb'Img &
         "sayectb = " & rec.sayectb'Img &
         "sclbctb = " & rec.sclbctb'Img &
         "ssctb = " & rec.ssctb'Img &
         "stshctb = " & rec.stshctb'Img &
         "subltamt = " & rec.subltamt'Img &
         "tessctb = " & rec.tessctb'Img &
         "totcapbu = " & rec.totcapbu'Img &
         "totsavbu = " & rec.totsavbu'Img &
         "tuburent = " & rec.tuburent'Img &
         "untrctb = " & rec.untrctb'Img &
         "youngch = " & rec.youngch'Img &
         "adddec = " & rec.adddec'Img &
         "addeples = " & rec.addeples'Img &
         "addhol = " & rec.addhol'Img &
         "addins = " & rec.addins'Img &
         "addmel = " & rec.addmel'Img &
         "addmon = " & rec.addmon'Img &
         "addshoe = " & rec.addshoe'Img &
         "adepfur = " & rec.adepfur'Img &
         "af1 = " & rec.af1'Img &
         "afdep2 = " & rec.afdep2'Img &
         "cdelply = " & rec.cdelply'Img &
         "cdepbed = " & rec.cdepbed'Img &
         "cdepcel = " & rec.cdepcel'Img &
         "cdepeqp = " & rec.cdepeqp'Img &
         "cdephol = " & rec.cdephol'Img &
         "cdeples = " & rec.cdeples'Img &
         "cdepsum = " & rec.cdepsum'Img &
         "cdeptea = " & rec.cdeptea'Img &
         "cdeptrp = " & rec.cdeptrp'Img &
         "cplay = " & rec.cplay'Img &
         "debt1 = " & rec.debt1'Img &
         "debt2 = " & rec.debt2'Img &
         "debt3 = " & rec.debt3'Img &
         "debt4 = " & rec.debt4'Img &
         "debt5 = " & rec.debt5'Img &
         "debt6 = " & rec.debt6'Img &
         "debt7 = " & rec.debt7'Img &
         "debt8 = " & rec.debt8'Img &
         "debt9 = " & rec.debt9'Img &
         "houshe1 = " & rec.houshe1'Img &
         "incold = " & rec.incold'Img &
         "crunacb = " & rec.crunacb'Img &
         "enomortb = " & rec.enomortb'Img &
         "hbindbu2 = " & rec.hbindbu2'Img &
         "pocardb = " & rec.pocardb'Img &
         "kid1619 = " & rec.kid1619'Img &
         "totcapb2 = " & rec.totcapb2'Img &
         "billnt1 = " & rec.billnt1'Img &
         "billnt2 = " & rec.billnt2'Img &
         "billnt3 = " & rec.billnt3'Img &
         "billnt4 = " & rec.billnt4'Img &
         "billnt5 = " & rec.billnt5'Img &
         "billnt6 = " & rec.billnt6'Img &
         "billnt7 = " & rec.billnt7'Img &
         "billnt8 = " & rec.billnt8'Img &
         "coatnt1 = " & rec.coatnt1'Img &
         "coatnt2 = " & rec.coatnt2'Img &
         "coatnt3 = " & rec.coatnt3'Img &
         "coatnt4 = " & rec.coatnt4'Img &
         "coatnt5 = " & rec.coatnt5'Img &
         "coatnt6 = " & rec.coatnt6'Img &
         "coatnt7 = " & rec.coatnt7'Img &
         "coatnt8 = " & rec.coatnt8'Img &
         "cooknt1 = " & rec.cooknt1'Img &
         "cooknt2 = " & rec.cooknt2'Img &
         "cooknt3 = " & rec.cooknt3'Img &
         "cooknt4 = " & rec.cooknt4'Img &
         "cooknt5 = " & rec.cooknt5'Img &
         "cooknt6 = " & rec.cooknt6'Img &
         "cooknt7 = " & rec.cooknt7'Img &
         "cooknt8 = " & rec.cooknt8'Img &
         "dampnt1 = " & rec.dampnt1'Img &
         "dampnt2 = " & rec.dampnt2'Img &
         "dampnt3 = " & rec.dampnt3'Img &
         "dampnt4 = " & rec.dampnt4'Img &
         "dampnt5 = " & rec.dampnt5'Img &
         "dampnt6 = " & rec.dampnt6'Img &
         "dampnt7 = " & rec.dampnt7'Img &
         "dampnt8 = " & rec.dampnt8'Img &
         "frndnt1 = " & rec.frndnt1'Img &
         "frndnt2 = " & rec.frndnt2'Img &
         "frndnt3 = " & rec.frndnt3'Img &
         "frndnt4 = " & rec.frndnt4'Img &
         "frndnt5 = " & rec.frndnt5'Img &
         "frndnt6 = " & rec.frndnt6'Img &
         "frndnt7 = " & rec.frndnt7'Img &
         "frndnt8 = " & rec.frndnt8'Img &
         "hairnt1 = " & rec.hairnt1'Img &
         "hairnt2 = " & rec.hairnt2'Img &
         "hairnt3 = " & rec.hairnt3'Img &
         "hairnt4 = " & rec.hairnt4'Img &
         "hairnt5 = " & rec.hairnt5'Img &
         "hairnt6 = " & rec.hairnt6'Img &
         "hairnt7 = " & rec.hairnt7'Img &
         "hairnt8 = " & rec.hairnt8'Img &
         "heatnt1 = " & rec.heatnt1'Img &
         "heatnt2 = " & rec.heatnt2'Img &
         "heatnt3 = " & rec.heatnt3'Img &
         "heatnt4 = " & rec.heatnt4'Img &
         "heatnt5 = " & rec.heatnt5'Img &
         "heatnt6 = " & rec.heatnt6'Img &
         "heatnt7 = " & rec.heatnt7'Img &
         "heatnt8 = " & rec.heatnt8'Img &
         "holnt1 = " & rec.holnt1'Img &
         "holnt2 = " & rec.holnt2'Img &
         "holnt3 = " & rec.holnt3'Img &
         "holnt4 = " & rec.holnt4'Img &
         "holnt5 = " & rec.holnt5'Img &
         "holnt6 = " & rec.holnt6'Img &
         "holnt7 = " & rec.holnt7'Img &
         "holnt8 = " & rec.holnt8'Img &
         "homent1 = " & rec.homent1'Img &
         "homent2 = " & rec.homent2'Img &
         "homent3 = " & rec.homent3'Img &
         "homent4 = " & rec.homent4'Img &
         "homent5 = " & rec.homent5'Img &
         "homent6 = " & rec.homent6'Img &
         "homent7 = " & rec.homent7'Img &
         "homent8 = " & rec.homent8'Img &
         "issue = " & rec.issue'Img &
         "mealnt1 = " & rec.mealnt1'Img &
         "mealnt2 = " & rec.mealnt2'Img &
         "mealnt3 = " & rec.mealnt3'Img &
         "mealnt4 = " & rec.mealnt4'Img &
         "mealnt5 = " & rec.mealnt5'Img &
         "mealnt6 = " & rec.mealnt6'Img &
         "mealnt7 = " & rec.mealnt7'Img &
         "mealnt8 = " & rec.mealnt8'Img &
         "oabill = " & rec.oabill'Img &
         "oacoat = " & rec.oacoat'Img &
         "oacook = " & rec.oacook'Img &
         "oadamp = " & rec.oadamp'Img &
         "oaexpns = " & rec.oaexpns'Img &
         "oafrnd = " & rec.oafrnd'Img &
         "oahair = " & rec.oahair'Img &
         "oaheat = " & rec.oaheat'Img &
         "oahol = " & rec.oahol'Img &
         "oahome = " & rec.oahome'Img &
         "oahowpy1 = " & rec.oahowpy1'Img &
         "oahowpy2 = " & rec.oahowpy2'Img &
         "oahowpy3 = " & rec.oahowpy3'Img &
         "oahowpy4 = " & rec.oahowpy4'Img &
         "oahowpy5 = " & rec.oahowpy5'Img &
         "oahowpy6 = " & rec.oahowpy6'Img &
         "oameal = " & rec.oameal'Img &
         "oaout = " & rec.oaout'Img &
         "oaphon = " & rec.oaphon'Img &
         "oataxi = " & rec.oataxi'Img &
         "oawarm = " & rec.oawarm'Img &
         "outnt1 = " & rec.outnt1'Img &
         "outnt2 = " & rec.outnt2'Img &
         "outnt3 = " & rec.outnt3'Img &
         "outnt4 = " & rec.outnt4'Img &
         "outnt5 = " & rec.outnt5'Img &
         "outnt6 = " & rec.outnt6'Img &
         "outnt7 = " & rec.outnt7'Img &
         "outnt8 = " & rec.outnt8'Img &
         "phonnt1 = " & rec.phonnt1'Img &
         "phonnt2 = " & rec.phonnt2'Img &
         "phonnt3 = " & rec.phonnt3'Img &
         "phonnt4 = " & rec.phonnt4'Img &
         "phonnt5 = " & rec.phonnt5'Img &
         "phonnt6 = " & rec.phonnt6'Img &
         "phonnt7 = " & rec.phonnt7'Img &
         "phonnt8 = " & rec.phonnt8'Img &
         "taxint1 = " & rec.taxint1'Img &
         "taxint2 = " & rec.taxint2'Img &
         "taxint3 = " & rec.taxint3'Img &
         "taxint4 = " & rec.taxint4'Img &
         "taxint5 = " & rec.taxint5'Img &
         "taxint6 = " & rec.taxint6'Img &
         "taxint7 = " & rec.taxint7'Img &
         "taxint8 = " & rec.taxint8'Img &
         "warmnt1 = " & rec.warmnt1'Img &
         "warmnt2 = " & rec.warmnt2'Img &
         "warmnt3 = " & rec.warmnt3'Img &
         "warmnt4 = " & rec.warmnt4'Img &
         "warmnt5 = " & rec.warmnt5'Img &
         "warmnt6 = " & rec.warmnt6'Img &
         "warmnt7 = " & rec.warmnt7'Img &
         "warmnt8 = " & rec.warmnt8'Img &
         "buagegr3 = " & rec.buagegr3'Img &
         "buagegr4 = " & rec.buagegr4'Img &
         "heartbu = " & rec.heartbu'Img &
         "newfambu = " & rec.newfambu'Img &
         "billnt9 = " & rec.billnt9'Img &
         "cbaamt1 = " & rec.cbaamt1'Img &
         "cbaamt2 = " & rec.cbaamt2'Img &
         "coatnt9 = " & rec.coatnt9'Img &
         "cooknt9 = " & rec.cooknt9'Img &
         "dampnt9 = " & rec.dampnt9'Img &
         "frndnt9 = " & rec.frndnt9'Img &
         "hairnt9 = " & rec.hairnt9'Img &
         "hbolng = " & rec.hbolng'Img &
         "hbothamt = " & rec.hbothamt'Img &
         "hbothbu = " & rec.hbothbu'Img &
         "hbothmn = " & rec.hbothmn'Img &
         "hbothpd = " & rec.hbothpd'Img &
         "hbothwk = " & rec.hbothwk'Img &
         "hbothyr = " & rec.hbothyr'Img &
         "hbotwait = " & rec.hbotwait'Img &
         "heatnt9 = " & rec.heatnt9'Img &
         "helpgv01 = " & rec.helpgv01'Img &
         "helpgv02 = " & rec.helpgv02'Img &
         "helpgv03 = " & rec.helpgv03'Img &
         "helpgv04 = " & rec.helpgv04'Img &
         "helpgv05 = " & rec.helpgv05'Img &
         "helpgv06 = " & rec.helpgv06'Img &
         "helpgv07 = " & rec.helpgv07'Img &
         "helpgv08 = " & rec.helpgv08'Img &
         "helpgv09 = " & rec.helpgv09'Img &
         "helpgv10 = " & rec.helpgv10'Img &
         "helpgv11 = " & rec.helpgv11'Img &
         "helprc01 = " & rec.helprc01'Img &
         "helprc02 = " & rec.helprc02'Img &
         "helprc03 = " & rec.helprc03'Img &
         "helprc04 = " & rec.helprc04'Img &
         "helprc05 = " & rec.helprc05'Img &
         "helprc06 = " & rec.helprc06'Img &
         "helprc07 = " & rec.helprc07'Img &
         "helprc08 = " & rec.helprc08'Img &
         "helprc09 = " & rec.helprc09'Img &
         "helprc10 = " & rec.helprc10'Img &
         "helprc11 = " & rec.helprc11'Img &
         "holnt9 = " & rec.holnt9'Img &
         "homent9 = " & rec.homent9'Img &
         "loangvn1 = " & rec.loangvn1'Img &
         "loangvn2 = " & rec.loangvn2'Img &
         "loangvn3 = " & rec.loangvn3'Img &
         "loanrec1 = " & rec.loanrec1'Img &
         "loanrec2 = " & rec.loanrec2'Img &
         "loanrec3 = " & rec.loanrec3'Img &
         "mealnt9 = " & rec.mealnt9'Img &
         "outnt9 = " & rec.outnt9'Img &
         "phonnt9 = " & rec.phonnt9'Img &
         "taxint9 = " & rec.taxint9'Img &
         "warmnt9 = " & rec.warmnt9'Img &
         "ecostabu = " & rec.ecostabu'Img &
         "famtypb2 = " & rec.famtypb2'Img &
         "gross3_x = " & rec.gross3_x'Img &
         "newfamb2 = " & rec.newfamb2'Img &
         "oabilimp = " & rec.oabilimp'Img &
         "oacoaimp = " & rec.oacoaimp'Img &
         "oacooimp = " & rec.oacooimp'Img &
         "oadamimp = " & rec.oadamimp'Img &
         "oaexpimp = " & rec.oaexpimp'Img &
         "oafrnimp = " & rec.oafrnimp'Img &
         "oahaiimp = " & rec.oahaiimp'Img &
         "oaheaimp = " & rec.oaheaimp'Img &
         "oaholimp = " & rec.oaholimp'Img &
         "oahomimp = " & rec.oahomimp'Img &
         "oameaimp = " & rec.oameaimp'Img &
         "oaoutimp = " & rec.oaoutimp'Img &
         "oaphoimp = " & rec.oaphoimp'Img &
         "oataximp = " & rec.oataximp'Img &
         "oawarimp = " & rec.oawarimp'Img &
         "totcapb3 = " & rec.totcapb3'Img &
         "adbtbl = " & rec.adbtbl'Img &
         "cdepact = " & rec.cdepact'Img &
         "cdepveg = " & rec.cdepveg'Img &
         "cdpcoat = " & rec.cdpcoat'Img &
         "oapre = " & rec.oapre'Img &
         "buethgr3 = " & rec.buethgr3'Img &
         "fsbbu = " & rec.fsbbu'Img &
         "addholr = " & rec.addholr'Img &
         "computer = " & rec.computer'Img &
         "compuwhy = " & rec.compuwhy'Img &
         "crime = " & rec.crime'Img &
         "damp = " & rec.damp'Img &
         "dark = " & rec.dark'Img &
         "debt01 = " & rec.debt01'Img &
         "debt02 = " & rec.debt02'Img &
         "debt03 = " & rec.debt03'Img &
         "debt04 = " & rec.debt04'Img &
         "debt05 = " & rec.debt05'Img &
         "debt06 = " & rec.debt06'Img &
         "debt07 = " & rec.debt07'Img &
         "debt08 = " & rec.debt08'Img &
         "debt09 = " & rec.debt09'Img &
         "debt10 = " & rec.debt10'Img &
         "debt11 = " & rec.debt11'Img &
         "debt12 = " & rec.debt12'Img &
         "debtar01 = " & rec.debtar01'Img &
         "debtar02 = " & rec.debtar02'Img &
         "debtar03 = " & rec.debtar03'Img &
         "debtar04 = " & rec.debtar04'Img &
         "debtar05 = " & rec.debtar05'Img &
         "debtar06 = " & rec.debtar06'Img &
         "debtar07 = " & rec.debtar07'Img &
         "debtar08 = " & rec.debtar08'Img &
         "debtar09 = " & rec.debtar09'Img &
         "debtar10 = " & rec.debtar10'Img &
         "debtar11 = " & rec.debtar11'Img &
         "debtar12 = " & rec.debtar12'Img &
         "debtfre1 = " & rec.debtfre1'Img &
         "debtfre2 = " & rec.debtfre2'Img &
         "debtfre3 = " & rec.debtfre3'Img &
         "endsmeet = " & rec.endsmeet'Img &
         "eucar = " & rec.eucar'Img &
         "eucarwhy = " & rec.eucarwhy'Img &
         "euexpns = " & rec.euexpns'Img &
         "eumeal = " & rec.eumeal'Img &
         "eurepay = " & rec.eurepay'Img &
         "euteleph = " & rec.euteleph'Img &
         "eutelwhy = " & rec.eutelwhy'Img &
         "expnsoa = " & rec.expnsoa'Img &
         "houshew = " & rec.houshew'Img &
         "noise = " & rec.noise'Img &
         "oacareu1 = " & rec.oacareu1'Img &
         "oacareu2 = " & rec.oacareu2'Img &
         "oacareu3 = " & rec.oacareu3'Img &
         "oacareu4 = " & rec.oacareu4'Img &
         "oacareu5 = " & rec.oacareu5'Img &
         "oacareu6 = " & rec.oacareu6'Img &
         "oacareu7 = " & rec.oacareu7'Img &
         "oacareu8 = " & rec.oacareu8'Img &
         "oataxieu = " & rec.oataxieu'Img &
         "oatelep1 = " & rec.oatelep1'Img &
         "oatelep2 = " & rec.oatelep2'Img &
         "oatelep3 = " & rec.oatelep3'Img &
         "oatelep4 = " & rec.oatelep4'Img &
         "oatelep5 = " & rec.oatelep5'Img &
         "oatelep6 = " & rec.oatelep6'Img &
         "oatelep7 = " & rec.oatelep7'Img &
         "oatelep8 = " & rec.oatelep8'Img &
         "oateleph = " & rec.oateleph'Img &
         "outpay = " & rec.outpay'Img &
         "outpyamt = " & rec.outpyamt'Img &
         "pollute = " & rec.pollute'Img &
         "regpamt = " & rec.regpamt'Img &
         "regularp = " & rec.regularp'Img &
         "repaybur = " & rec.repaybur'Img &
         "washmach = " & rec.washmach'Img &
         "washwhy = " & rec.washwhy'Img &
         "whodepq = " & rec.whodepq'Img &
         "discbua1 = " & rec.discbua1'Img &
         "discbuc1 = " & rec.discbuc1'Img &
         "diswbua1 = " & rec.diswbua1'Img &
         "diswbuc1 = " & rec.diswbuc1'Img &
         "fsfvbu = " & rec.fsfvbu'Img &
         "gross4 = " & rec.gross4'Img &
         "adles = " & rec.adles'Img &
         "adlesnt1 = " & rec.adlesnt1'Img &
         "adlesnt2 = " & rec.adlesnt2'Img &
         "adlesnt3 = " & rec.adlesnt3'Img &
         "adlesnt4 = " & rec.adlesnt4'Img &
         "adlesnt5 = " & rec.adlesnt5'Img &
         "adlesnt6 = " & rec.adlesnt6'Img &
         "adlesnt7 = " & rec.adlesnt7'Img &
         "adlesnt8 = " & rec.adlesnt8'Img &
         "adlesoa = " & rec.adlesoa'Img &
         "clothes = " & rec.clothes'Img &
         "clothnt1 = " & rec.clothnt1'Img &
         "clothnt2 = " & rec.clothnt2'Img &
         "clothnt3 = " & rec.clothnt3'Img &
         "clothnt4 = " & rec.clothnt4'Img &
         "clothnt5 = " & rec.clothnt5'Img &
         "clothnt6 = " & rec.clothnt6'Img &
         "clothnt7 = " & rec.clothnt7'Img &
         "clothnt8 = " & rec.clothnt8'Img &
         "clothsoa = " & rec.clothsoa'Img &
         "furnt1 = " & rec.furnt1'Img &
         "furnt2 = " & rec.furnt2'Img &
         "furnt3 = " & rec.furnt3'Img &
         "furnt4 = " & rec.furnt4'Img &
         "furnt5 = " & rec.furnt5'Img &
         "furnt6 = " & rec.furnt6'Img &
         "furnt7 = " & rec.furnt7'Img &
         "furnt8 = " & rec.furnt8'Img &
         "intntnt1 = " & rec.intntnt1'Img &
         "intntnt2 = " & rec.intntnt2'Img &
         "intntnt3 = " & rec.intntnt3'Img &
         "intntnt4 = " & rec.intntnt4'Img &
         "intntnt5 = " & rec.intntnt5'Img &
         "intntnt6 = " & rec.intntnt6'Img &
         "intntnt7 = " & rec.intntnt7'Img &
         "intntnt8 = " & rec.intntnt8'Img &
         "intrnet = " & rec.intrnet'Img &
         "meal = " & rec.meal'Img &
         "oadep2 = " & rec.oadep2'Img &
         "oadp2nt1 = " & rec.oadp2nt1'Img &
         "oadp2nt2 = " & rec.oadp2nt2'Img &
         "oadp2nt3 = " & rec.oadp2nt3'Img &
         "oadp2nt4 = " & rec.oadp2nt4'Img &
         "oadp2nt5 = " & rec.oadp2nt5'Img &
         "oadp2nt6 = " & rec.oadp2nt6'Img &
         "oadp2nt7 = " & rec.oadp2nt7'Img &
         "oadp2nt8 = " & rec.oadp2nt8'Img &
         "oafur = " & rec.oafur'Img &
         "oaintern = " & rec.oaintern'Img &
         "shoe = " & rec.shoe'Img &
         "shoent1 = " & rec.shoent1'Img &
         "shoent2 = " & rec.shoent2'Img &
         "shoent3 = " & rec.shoent3'Img &
         "shoent4 = " & rec.shoent4'Img &
         "shoent5 = " & rec.shoent5'Img &
         "shoent6 = " & rec.shoent6'Img &
         "shoent7 = " & rec.shoent7'Img &
         "shoent8 = " & rec.shoent8'Img &
         "shoeoa = " & rec.shoeoa'Img &
         "nbunirbn = " & rec.nbunirbn'Img &
         "nbuothbn = " & rec.nbuothbn'Img &
         "debt13 = " & rec.debt13'Img &
         "debtar13 = " & rec.debtar13'Img &
         "euchbook = " & rec.euchbook'Img &
         "euchclth = " & rec.euchclth'Img &
         "euchgame = " & rec.euchgame'Img &
         "euchmeat = " & rec.euchmeat'Img &
         "euchshoe = " & rec.euchshoe'Img &
         "eupbtran = " & rec.eupbtran'Img &
         "eupbtrn1 = " & rec.eupbtrn1'Img &
         "eupbtrn2 = " & rec.eupbtrn2'Img &
         "eupbtrn3 = " & rec.eupbtrn3'Img &
         "eupbtrn4 = " & rec.eupbtrn4'Img &
         "eupbtrn5 = " & rec.eupbtrn5'Img &
         "euroast = " & rec.euroast'Img &
         "eusmeal = " & rec.eusmeal'Img &
         "eustudy = " & rec.eustudy'Img &
         "bueth = " & rec.bueth'Img &
         "oaeusmea = " & rec.oaeusmea'Img &
         "oaholb = " & rec.oaholb'Img &
         "oaroast = " & rec.oaroast'Img &
         "ecostab2 = " & rec.ecostab2'Img;
   end to_String;


   function To_String( rec : Househol ) return String is
   begin
      return  "Househol: " &
         "user_id = " & rec.user_id'Img &
         "edition = " & rec.edition'Img &
         "year = " & rec.year'Img &
         "sernum = " & rec.sernum'Img &
         "acorn = " & rec.acorn'Img &
         "bedroom = " & rec.bedroom'Img &
         "benunits = " & rec.benunits'Img &
         "billrate = " & rec.billrate'Img &
         "busroom = " & rec.busroom'Img &
         "centfuel = " & rec.centfuel'Img &
         "centheat = " & rec.centheat'Img &
         "charge1 = " & rec.charge1'Img &
         "charge2 = " & rec.charge2'Img &
         "charge3 = " & rec.charge3'Img &
         "charge4 = " & rec.charge4'Img &
         "charge5 = " & rec.charge5'Img &
         "charge6 = " & rec.charge6'Img &
         "charge7 = " & rec.charge7'Img &
         "charge8 = " & rec.charge8'Img &
         "charge9 = " & rec.charge9'Img &
         "chins = " & rec.chins'Img &
         "chrgamt1 = " & rec.chrgamt1'Img &
         "chrgamt2 = " & rec.chrgamt2'Img &
         "chrgamt3 = " & rec.chrgamt3'Img &
         "chrgamt4 = " & rec.chrgamt4'Img &
         "chrgamt5 = " & rec.chrgamt5'Img &
         "chrgamt6 = " & rec.chrgamt6'Img &
         "chrgamt7 = " & rec.chrgamt7'Img &
         "chrgamt8 = " & rec.chrgamt8'Img &
         "chrgamt9 = " & rec.chrgamt9'Img &
         "chrgpd1 = " & rec.chrgpd1'Img &
         "chrgpd2 = " & rec.chrgpd2'Img &
         "chrgpd3 = " & rec.chrgpd3'Img &
         "chrgpd4 = " & rec.chrgpd4'Img &
         "chrgpd5 = " & rec.chrgpd5'Img &
         "chrgpd6 = " & rec.chrgpd6'Img &
         "chrgpd7 = " & rec.chrgpd7'Img &
         "chrgpd8 = " & rec.chrgpd8'Img &
         "chrgpd9 = " & rec.chrgpd9'Img &
         "contv1 = " & rec.contv1'Img &
         "contv2 = " & rec.contv2'Img &
         "covoths = " & rec.covoths'Img &
         "csewamt = " & rec.csewamt'Img &
         "csewamt1 = " & rec.csewamt1'Img &
         "ct25d50d = " & rec.ct25d50d'Img &
         "ctamt = " & rec.ctamt'Img &
         "ctannual = " & rec.ctannual'Img &
         "ctband = " & rec.ctband'Img &
         "ctbwait = " & rec.ctbwait'Img &
         "ctcondoc = " & rec.ctcondoc'Img &
         "ctdisc = " & rec.ctdisc'Img &
         "ctinstal = " & rec.ctinstal'Img &
         "ctlvband = " & rec.ctlvband'Img &
         "ctlvchk = " & rec.ctlvchk'Img &
         "ctreb = " & rec.ctreb'Img &
         "ctrebamt = " & rec.ctrebamt'Img &
         "ctrebpd = " & rec.ctrebpd'Img &
         "cttime = " & rec.cttime'Img &
         "cwatamt = " & rec.cwatamt'Img &
         "cwatamt1 = " & rec.cwatamt1'Img &
         "datyrago = " & tio.Image( rec.datyrago, tio.ISO_Date ) &
         "entry1 = " & rec.entry1'Img &
         "entry2 = " & rec.entry2'Img &
         "entry3 = " & rec.entry3'Img &
         "entry4 = " & rec.entry4'Img &
         "estrtann = " & rec.estrtann'Img &
         "floor = " & rec.floor'Img &
         "givehelp = " & rec.givehelp'Img &
         "gor = " & rec.gor'Img &
         "gvtregn = " & rec.gvtregn'Img &
         "hhldr01 = " & rec.hhldr01'Img &
         "hhldr02 = " & rec.hhldr02'Img &
         "hhldr03 = " & rec.hhldr03'Img &
         "hhldr04 = " & rec.hhldr04'Img &
         "hhldr05 = " & rec.hhldr05'Img &
         "hhldr06 = " & rec.hhldr06'Img &
         "hhldr07 = " & rec.hhldr07'Img &
         "hhldr08 = " & rec.hhldr08'Img &
         "hhldr09 = " & rec.hhldr09'Img &
         "hhldr10 = " & rec.hhldr10'Img &
         "hhldr11 = " & rec.hhldr11'Img &
         "hhldr12 = " & rec.hhldr12'Img &
         "hhldr13 = " & rec.hhldr13'Img &
         "hhldr14 = " & rec.hhldr14'Img &
         "hhldr97 = " & rec.hhldr97'Img &
         "hhstat = " & rec.hhstat'Img &
         "hrpnum = " & rec.hrpnum'Img &
         "intdate = " & tio.Image( rec.intdate, tio.ISO_Date ) &
         "lac = " & rec.lac'Img &
         "mainacc = " & rec.mainacc'Img &
         "mnthcode = " & rec.mnthcode'Img &
         "modcon01 = " & rec.modcon01'Img &
         "modcon02 = " & rec.modcon02'Img &
         "modcon03 = " & rec.modcon03'Img &
         "modcon04 = " & rec.modcon04'Img &
         "modcon05 = " & rec.modcon05'Img &
         "modcon06 = " & rec.modcon06'Img &
         "modcon07 = " & rec.modcon07'Img &
         "modcon08 = " & rec.modcon08'Img &
         "modcon09 = " & rec.modcon09'Img &
         "modcon10 = " & rec.modcon10'Img &
         "modcon11 = " & rec.modcon11'Img &
         "modcon12 = " & rec.modcon12'Img &
         "modcon13 = " & rec.modcon13'Img &
         "modcon14 = " & rec.modcon14'Img &
         "monlive = " & rec.monlive'Img &
         "needhelp = " & rec.needhelp'Img &
         "nicoun = " & rec.nicoun'Img &
         "ninrv = " & rec.ninrv'Img &
         "nirate = " & rec.nirate'Img &
         "norate = " & rec.norate'Img &
         "onbsroom = " & rec.onbsroom'Img &
         "orgsewam = " & rec.orgsewam'Img &
         "orgwatam = " & rec.orgwatam'Img &
         "payrate = " & rec.payrate'Img &
         "premium = " & rec.premium'Img &
         "ptbsroom = " & rec.ptbsroom'Img &
         "rooms = " & rec.rooms'Img &
         "roomshar = " & rec.roomshar'Img &
         "rtannual = " & rec.rtannual'Img &
         "rtcheck = " & rec.rtcheck'Img &
         "rtcondoc = " & rec.rtcondoc'Img &
         "rtdeduc = " & rec.rtdeduc'Img &
         "rtinstal = " & rec.rtinstal'Img &
         "rtreb = " & rec.rtreb'Img &
         "rtrebamt = " & rec.rtrebamt'Img &
         "rtrebpd = " & rec.rtrebpd'Img &
         "rttime = " & rec.rttime'Img &
         "sampqtr = " & rec.sampqtr'Img &
         "schmeal = " & rec.schmeal'Img &
         "schmilk = " & rec.schmilk'Img &
         "sewamt = " & rec.sewamt'Img &
         "sewanul = " & rec.sewanul'Img &
         "sewerpay = " & rec.sewerpay'Img &
         "sewsep = " & rec.sewsep'Img &
         "sewtime = " & rec.sewtime'Img &
         "shelter = " & rec.shelter'Img &
         "sobuy = " & rec.sobuy'Img &
         "sstrtreg = " & rec.sstrtreg'Img &
         "stramt1 = " & rec.stramt1'Img &
         "stramt2 = " & rec.stramt2'Img &
         "strcov = " & rec.strcov'Img &
         "strmort = " & rec.strmort'Img &
         "stroths = " & rec.stroths'Img &
         "strpd1 = " & rec.strpd1'Img &
         "strpd2 = " & rec.strpd2'Img &
         "suballow = " & rec.suballow'Img &
         "sublet = " & rec.sublet'Img &
         "sublety = " & rec.sublety'Img &
         "subrent = " & rec.subrent'Img &
         "tenure = " & rec.tenure'Img &
         "totadult = " & rec.totadult'Img &
         "totchild = " & rec.totchild'Img &
         "totdepdk = " & rec.totdepdk'Img &
         "tvlic = " & rec.tvlic'Img &
         "typeacc = " & rec.typeacc'Img &
         "usevcl = " & rec.usevcl'Img &
         "watamt = " & rec.watamt'Img &
         "watanul = " & rec.watanul'Img &
         "watermet = " & rec.watermet'Img &
         "waterpay = " & rec.waterpay'Img &
         "watrb = " & rec.watrb'Img &
         "wattime = " & rec.wattime'Img &
         "welfmilk = " & rec.welfmilk'Img &
         "whoctb01 = " & rec.whoctb01'Img &
         "whoctb02 = " & rec.whoctb02'Img &
         "whoctb03 = " & rec.whoctb03'Img &
         "whoctb04 = " & rec.whoctb04'Img &
         "whoctb05 = " & rec.whoctb05'Img &
         "whoctb06 = " & rec.whoctb06'Img &
         "whoctb07 = " & rec.whoctb07'Img &
         "whoctb08 = " & rec.whoctb08'Img &
         "whoctb09 = " & rec.whoctb09'Img &
         "whoctb10 = " & rec.whoctb10'Img &
         "whoctb11 = " & rec.whoctb11'Img &
         "whoctb12 = " & rec.whoctb12'Img &
         "whoctb13 = " & rec.whoctb13'Img &
         "whoctb14 = " & rec.whoctb14'Img &
         "whoctbns = " & rec.whoctbns'Img &
         "whoctbot = " & rec.whoctbot'Img &
         "whorsp01 = " & rec.whorsp01'Img &
         "whorsp02 = " & rec.whorsp02'Img &
         "whorsp03 = " & rec.whorsp03'Img &
         "whorsp04 = " & rec.whorsp04'Img &
         "whorsp05 = " & rec.whorsp05'Img &
         "whorsp06 = " & rec.whorsp06'Img &
         "whorsp07 = " & rec.whorsp07'Img &
         "whorsp08 = " & rec.whorsp08'Img &
         "whorsp09 = " & rec.whorsp09'Img &
         "whorsp10 = " & rec.whorsp10'Img &
         "whorsp11 = " & rec.whorsp11'Img &
         "whorsp12 = " & rec.whorsp12'Img &
         "whorsp13 = " & rec.whorsp13'Img &
         "whorsp14 = " & rec.whorsp14'Img &
         "whynoct = " & rec.whynoct'Img &
         "wmintro = " & rec.wmintro'Img &
         "wsewamt = " & rec.wsewamt'Img &
         "wsewanul = " & rec.wsewanul'Img &
         "wsewtime = " & rec.wsewtime'Img &
         "yearcode = " & rec.yearcode'Img &
         "yearlive = " & rec.yearlive'Img &
         "month = " & rec.month'Img &
         "actacch = " & rec.actacch'Img &
         "adddahh = " & rec.adddahh'Img &
         "adulth = " & rec.adulth'Img &
         "basacth = " & rec.basacth'Img &
         "chddahh = " & rec.chddahh'Img &
         "curacth = " & rec.curacth'Img &
         "cwatamtd = " & rec.cwatamtd'Img &
         "depchldh = " & rec.depchldh'Img &
         "emp = " & rec.emp'Img &
         "emphrp = " & rec.emphrp'Img &
         "endowpay = " & rec.endowpay'Img &
         "equivahc = " & rec.equivahc'Img &
         "equivbhc = " & rec.equivbhc'Img &
         "fsbndcth = " & rec.fsbndcth'Img &
         "gbhscost = " & rec.gbhscost'Img &
         "gebacth = " & rec.gebacth'Img &
         "giltcth = " & rec.giltcth'Img &
         "gross2 = " & rec.gross2'Img &
         "gross3 = " & rec.gross3'Img &
         "grossct = " & rec.grossct'Img &
         "hbeninc = " & rec.hbeninc'Img &
         "hbindhh = " & rec.hbindhh'Img &
         "hcband = " & rec.hcband'Img &
         "hdhhinc = " & rec.hdhhinc'Img &
         "hdtax = " & rec.hdtax'Img &
         "hearns = " & rec.hearns'Img &
         "hhagegr2 = " & rec.hhagegr2'Img &
         "hhagegrp = " & rec.hhagegrp'Img &
         "hhcomp = " & rec.hhcomp'Img &
         "hhcomps = " & rec.hhcomps'Img &
         "hhdisben = " & rec.hhdisben'Img &
         "hhethgr2 = " & rec.hhethgr2'Img &
         "hhethgrp = " & rec.hhethgrp'Img &
         "hhinc = " & rec.hhinc'Img &
         "hhincbnd = " & rec.hhincbnd'Img &
         "hhinv = " & rec.hhinv'Img &
         "hhirben = " & rec.hhirben'Img &
         "hhkids = " & rec.hhkids'Img &
         "hhnirben = " & rec.hhnirben'Img &
         "hhothben = " & rec.hhothben'Img &
         "hhrent = " & rec.hhrent'Img &
         "hhrinc = " & rec.hhrinc'Img &
         "hhrpinc = " & rec.hhrpinc'Img &
         "hhsize = " & rec.hhsize'Img &
         "hhtvlic = " & rec.hhtvlic'Img &
         "hhtxcred = " & rec.hhtxcred'Img &
         "hothinc = " & rec.hothinc'Img &
         "hpeninc = " & rec.hpeninc'Img &
         "hrband = " & rec.hrband'Img &
         "hseinc = " & rec.hseinc'Img &
         "isacth = " & rec.isacth'Img &
         "london = " & rec.london'Img &
         "mortcost = " & rec.mortcost'Img &
         "mortint = " & rec.mortint'Img &
         "mortpay = " & rec.mortpay'Img &
         "nddctb = " & rec.nddctb'Img &
         "nddishc = " & rec.nddishc'Img &
         "nihscost = " & rec.nihscost'Img &
         "nsbocth = " & rec.nsbocth'Img &
         "otbscth = " & rec.otbscth'Img &
         "pacctype = " & rec.pacctype'Img &
         "penage = " & rec.penage'Img &
         "penhrp = " & rec.penhrp'Img &
         "pepscth = " & rec.pepscth'Img &
         "poaccth = " & rec.poaccth'Img &
         "prbocth = " & rec.prbocth'Img &
         "ptentyp2 = " & rec.ptentyp2'Img &
         "sayecth = " & rec.sayecth'Img &
         "sclbcth = " & rec.sclbcth'Img &
         "servpay = " & rec.servpay'Img &
         "sick = " & rec.sick'Img &
         "sickhrp = " & rec.sickhrp'Img &
         "sscth = " & rec.sscth'Img &
         "struins = " & rec.struins'Img &
         "stshcth = " & rec.stshcth'Img &
         "tentyp2 = " & rec.tentyp2'Img &
         "tesscth = " & rec.tesscth'Img &
         "tuhhrent = " & rec.tuhhrent'Img &
         "tuwatsew = " & rec.tuwatsew'Img &
         "untrcth = " & rec.untrcth'Img &
         "watsewrt = " & rec.watsewrt'Img &
         "acornew = " & rec.acornew'Img &
         "crunach = " & rec.crunach'Img &
         "enomorth = " & rec.enomorth'Img &
         "dvadulth = " & rec.dvadulth'Img &
         "dvtotad = " & rec.dvtotad'Img &
         "urindew = " & rec.urindew'Img &
         "urinds = " & rec.urinds'Img &
         "vehnumb = " & rec.vehnumb'Img &
         "country = " & rec.country'Img &
         "hbindhh2 = " & rec.hbindhh2'Img &
         "pocardh = " & rec.pocardh'Img &
         "entry5 = " & rec.entry5'Img &
         "entry6 = " & rec.entry6'Img &
         "imd_e = " & rec.imd_e'Img &
         "imd_s = " & rec.imd_s'Img &
         "imd_w = " & rec.imd_w'Img &
         "numtv1 = " & rec.numtv1'Img &
         "numtv2 = " & rec.numtv2'Img &
         "oac = " & rec.oac'Img &
         "bedroom6 = " & rec.bedroom6'Img &
         "rooms10 = " & rec.rooms10'Img &
         "brma = " & rec.brma'Img &
         "issue = " & rec.issue'Img &
         "migrq1 = " & rec.migrq1'Img &
         "migrq2 = " & rec.migrq2'Img &
         "hhagegr3 = " & rec.hhagegr3'Img &
         "hhagegr4 = " & rec.hhagegr4'Img &
         "capval = " & rec.capval'Img &
         "nidpnd = " & rec.nidpnd'Img &
         "nochcr1 = " & rec.nochcr1'Img &
         "nochcr2 = " & rec.nochcr2'Img &
         "nochcr3 = " & rec.nochcr3'Img &
         "nochcr4 = " & rec.nochcr4'Img &
         "nochcr5 = " & rec.nochcr5'Img &
         "rt2rebam = " & rec.rt2rebam'Img &
         "rt2rebpd = " & rec.rt2rebpd'Img &
         "rtdpa = " & rec.rtdpa'Img &
         "rtdpaamt = " & rec.rtdpaamt'Img &
         "rtdpapd = " & rec.rtdpapd'Img &
         "rtlpa = " & rec.rtlpa'Img &
         "rtlpaamt = " & rec.rtlpaamt'Img &
         "rtlpapd = " & rec.rtlpapd'Img &
         "rtothamt = " & rec.rtothamt'Img &
         "rtother = " & rec.rtother'Img &
         "rtothpd = " & rec.rtothpd'Img &
         "rtrtr = " & rec.rtrtr'Img &
         "rtrtramt = " & rec.rtrtramt'Img &
         "rtrtrpd = " & rec.rtrtrpd'Img &
         "rttimepd = " & rec.rttimepd'Img &
         "yrlvchk = " & rec.yrlvchk'Img &
         "gross3_x = " & rec.gross3_x'Img &
         "hlthst = " & rec.hlthst'Img &
         "medpay = " & rec.medpay'Img &
         "medwho01 = " & rec.medwho01'Img &
         "medwho02 = " & rec.medwho02'Img &
         "medwho03 = " & rec.medwho03'Img &
         "medwho04 = " & rec.medwho04'Img &
         "medwho05 = " & rec.medwho05'Img &
         "medwho06 = " & rec.medwho06'Img &
         "medwho07 = " & rec.medwho07'Img &
         "medwho08 = " & rec.medwho08'Img &
         "medwho09 = " & rec.medwho09'Img &
         "medwho10 = " & rec.medwho10'Img &
         "medwho11 = " & rec.medwho11'Img &
         "medwho12 = " & rec.medwho12'Img &
         "medwho13 = " & rec.medwho13'Img &
         "medwho14 = " & rec.medwho14'Img &
         "nmrmshar = " & rec.nmrmshar'Img &
         "roomshr = " & rec.roomshr'Img &
         "imd_ni = " & rec.imd_ni'Img &
         "multi = " & rec.multi'Img &
         "nopay = " & rec.nopay'Img &
         "orgid = " & rec.orgid'Img &
         "rtene = " & rec.rtene'Img &
         "rteneamt = " & rec.rteneamt'Img &
         "rtgen = " & rec.rtgen'Img &
         "schbrk = " & rec.schbrk'Img &
         "urb = " & rec.urb'Img &
         "urbrur = " & rec.urbrur'Img &
         "hhethgr3 = " & rec.hhethgr3'Img &
         "niratlia = " & rec.niratlia'Img &
         "bankse = " & rec.bankse'Img &
         "bathshow = " & rec.bathshow'Img &
         "burden = " & rec.burden'Img &
         "comco = " & rec.comco'Img &
         "comp1sc = " & rec.comp1sc'Img &
         "compsc = " & rec.compsc'Img &
         "comwa = " & rec.comwa'Img &
         "dwellno = " & rec.dwellno'Img &
         "elecin = " & rec.elecin'Img &
         "elecinw = " & rec.elecinw'Img &
         "eulowest = " & rec.eulowest'Img &
         "flshtoil = " & rec.flshtoil'Img &
         "grocse = " & rec.grocse'Img &
         "gvtregno = " & rec.gvtregno'Img &
         "heat = " & rec.heat'Img &
         "heatcen = " & rec.heatcen'Img &
         "heatfire = " & rec.heatfire'Img &
         "kitchen = " & rec.kitchen'Img &
         "knsizeft = " & rec.knsizeft'Img &
         "knsizem = " & rec.knsizem'Img &
         "laua = " & rec.laua'Img &
         "movef = " & rec.movef'Img &
         "movenxt = " & rec.movenxt'Img &
         "movereas = " & rec.movereas'Img &
         "ovsat = " & rec.ovsat'Img &
         "plum1bin = " & rec.plum1bin'Img &
         "plumin = " & rec.plumin'Img &
         "pluminw = " & rec.pluminw'Img &
         "postse = " & rec.postse'Img &
         "primh = " & rec.primh'Img &
         "pubtr = " & rec.pubtr'Img &
         "samesc = " & rec.samesc'Img &
         "schfrt = " & rec.schfrt'Img &
         "selper = " & rec.selper'Img &
         "short = " & rec.short'Img &
         "sizeft = " & rec.sizeft'Img &
         "sizem = " & rec.sizem'Img &
         "tvwhy = " & rec.tvwhy'Img &
         "yearwhc = " & rec.yearwhc'Img &
         "dischha1 = " & rec.dischha1'Img &
         "dischhc1 = " & rec.dischhc1'Img &
         "diswhha1 = " & rec.diswhha1'Img &
         "diswhhc1 = " & rec.diswhhc1'Img &
         "gross4 = " & rec.gross4'Img &
         "lldcare = " & rec.lldcare'Img &
         "urindni = " & rec.urindni'Img &
         "nhbeninc = " & rec.nhbeninc'Img &
         "nhhnirbn = " & rec.nhhnirbn'Img &
         "nhhothbn = " & rec.nhhothbn'Img &
         "seramt1 = " & rec.seramt1'Img &
         "seramt2 = " & rec.seramt2'Img &
         "seramt3 = " & rec.seramt3'Img &
         "seramt4 = " & rec.seramt4'Img &
         "serpay1 = " & rec.serpay1'Img &
         "serpay2 = " & rec.serpay2'Img &
         "serpay3 = " & rec.serpay3'Img &
         "serpay4 = " & rec.serpay4'Img &
         "serper1 = " & rec.serper1'Img &
         "serper2 = " & rec.serper2'Img &
         "serper3 = " & rec.serper3'Img &
         "serper4 = " & rec.serper4'Img &
         "utility = " & rec.utility'Img &
         "hheth = " & rec.hheth'Img &
         "seramt5 = " & rec.seramt5'Img &
         "sercomb = " & rec.sercomb'Img &
         "serpay5 = " & rec.serpay5'Img &
         "serper5 = " & rec.serper5'Img &
         "urbni = " & rec.urbni'Img;
   end to_String;



        
   -- === CUSTOM PROCS START ===
   -- === CUSTOM PROCS END ===

end Ukds.frs;
