Support CMS-1500 02/12 new format
[openemr.git] / interface / forms / misc_billing_options / date_qualifier_options.php
blobd7b3fa33d6268e2f5118c8fc7f4a14d370ed9bfb
1 <?php
2 /**
3 * Reusable data entries for new Box 14 and Box 15 date qualifiers that are part of
4 * HCFA 1500 02/12 format
5 *
6 * For details on format refer to:
7 * <http://www.nucc.org/index.php?option=com_content&view=article&id=186&Itemid=138>
8 *
9 * Copyright (C) 2013 Kevin Yeh <kevin.y@integralemr.com> and OEMR <www.oemr.org>
11 * LICENSE: This program is free software; you can redistribute it and/or
12 * modify it under the terms of the GNU General Public License
13 * as published by the Free Software Foundation; either version 3
14 * of the License, or (at your option) any later version.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program. If not, see <http://opensource.org/licenses/gpl-license.php>;.
22 * @package OpenEMR
23 * @author Kevin Yeh <kevin.y@integralemr.com>
24 * @link http://www.open-emr.org
27 $box_14_qualifier_options=array([xl("Onset of Current Symptoms or Illness"),"431"],
28 [xl("Last Menstrual Period"),"484"]);
30 $box_15_qualifier_options=array([xl("Initial Treatment"),"454"],
31 [xl("Latest Visit or Consultation"),"304"],
32 [xl("Acute Manifestation of a Chronic Condition"),"453"],
33 [xl("Accident"),"439"],
34 [xl("Last X-ray"),"455"],
35 [xl("Prescription"),"471"],
36 [xl("Report Start (Assumed Care Date)"),"090"],
37 [xl("Report End (Relinquished Care Date)"),"091"],
38 [xl("First Visit or Consultation"),"444"]
40 $hcfa_date_quals=array("box_14_date_qual"=>$box_14_qualifier_options,"box_15_date_qual"=>$box_15_qualifier_options);
41 function qual_id_to_description($qual_type,$value)
43 $options=$GLOBALS['hcfa_date_quals'][$qual_type];
44 for($idx=0;$idx<count($options);$idx++)
46 if($options[$idx][1]==$value)
48 return $options[$idx][0];
51 return null;