/* * This file is automatically Generated by ProtoGen r1.3. * Do not edit it. * * Copyright (c) 1995, 1996 Gunther Schadow. All rights reserved. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ #pragma implementation "RXAseg.h" #include "RXAseg.h" #include "Segment.h" #include "SegTypeCode.h" /* * SEGMENT * * rxa(ord) -- pharmacy administration */ #include #include #include #include #include #include Segment::fielddesc RXAseg::fieldtab[12] = { { (::Type (::Segment::*))&RXAseg::GiveSubIdCou, required, "give sub-id counter" }, { (::Type (::Segment::*))&RXAseg::AdmSubIdCou, required, "administration sub-id counter" }, { (::Type (::Segment::*))&RXAseg::DateTimeStartOfAdm, required, "date/time start of administration" }, { (::Type (::Segment::*))&RXAseg::DateTimeEndOfAdm, required, "date/time end of administration" }, { (::Type (::Segment::*))&RXAseg::AdmCode, required, "administered code" }, { (::Type (::Segment::*))&RXAseg::AdmAmo, required, "administered amount" }, { (::Type (::Segment::*))&RXAseg::AdmUnits, optional, "administered units" }, { (::Type (::Segment::*))&RXAseg::AdmDosForm, optional, "administered dosage form" }, { (::Type (::Segment::*))&RXAseg::AdmNotes, optional, "administration notes" }, { (::Type (::Segment::*))&RXAseg::AdmPro, optional, "administering provider" }, { (::Type (::Segment::*))&RXAseg::AdmAtLoc, optional, "administered-at location" }, { (::Type (::Segment::*))&RXAseg::AdmPerTimeUnit, optional, "administered per (time unit)" }, }; RXAseg::RXAseg() : Segment(SegTypeCode::RXAval, 12, fieldtab) {}