RecordAddBegin(UserVc,"UserVc_fuel");
RecordField(EmployeeCode, M4Code, 10,0);
KeyBegin(EmployeeCode);
KeySegment(EmployeeCode);
KeySegment(Code);
EndRecordAdd;