function RavKav_parseEnvironment(ENV_REF, nRec)
local ENV_REC_REF = nodes.find_first(ENV_REF, {label="record", id=nRec})
if nil == ENV_REC_REF then return false end
local record = nodes.get_attribute(ENV_REC_REF,"val")
if nil == record then return false end
local data = bytes.convert(record,1)
local bitOffset = 0
bitOffset = RavKav_parseBits(data, bitOffset, 3, ENV_REC_REF, "Version number", en1545_NUMBER)
bitOffset = RavKav_parseBits(data, bitOffset, 12, ENV_REC_REF, "Country", RavKav_COUNTRY)
bitOffset = RavKav_parseBits(data, bitOffset, 8, ENV_REC_REF, "Issuer", RavKav_ISSUER)
bitOffset = RavKav_parseBits(data, bitOffset, 26, ENV_REC_REF, "Issuance number", en1545_NUMBER)
bitOffset = RavKav_parseBits(data, bitOffset, 14, ENV_REC_REF, "Date of issue", en1545_DATE)
bitOffset = RavKav_parseBits(data, bitOffset, 14, ENV_REC_REF, "End date", en1545_DATE)
bitOffset = RavKav_parseBits(data, bitOffset, 3, ENV_REC_REF, "Pay method", en1545_NUMBER)
bitOffset = RavKav_parseBits(data, bitOffset, 32, ENV_REC_REF, "Date of birth", en1545_BCD_DATE)
bitOffset = RavKav_parseBits(data, bitOffset, 14, ENV_REC_REF, "Company", RavKav_COMPANY)
bitOffset = RavKav_parseBits(data, bitOffset, 30, ENV_REC_REF, "Company ID", en1545_NUMBER)
bitOffset = RavKav_parseBits(data, bitOffset, 30, ENV_REC_REF, "ID number", en1545_NUMBER)
local PROFILES_REF = nodes.append(ENV_REC_REF, {classname="item", label="Profiles"})
local profile, ref
bitOffset, profile, ref = RavKav_parseBits(data, bitOffset, 6, PROFILES_REF, "Profile", RavKav_PROFILE, 1)
bitOffset = RavKav_parseBits(data, bitOffset, 14, ref, "Valid until", en1545_DATE)
bitOffset, profile, ref = RavKav_parseBits(data, bitOffset, 6, PROFILES_REF, "Profile", RavKav_PROFILE, 2)
RavKav_parseBits(data, bitOffset, 14, ref, "Valid until", en1545_DATE)
return true
end