5) $mzip = substr($myrow['A25'],0,5)."-".substr($myrow['A25'],5); else $mzip = $myrow['A25']; $mphone = "(".substr($myrow['A27'],0,3).") ".substr($myrow['A27'],3,3)."-".substr($myrow['A27'],6); $mfax = "(".substr($myrow['A28'],0,3).") ".substr($myrow['A28'],3,3)."-".substr($myrow['A28'],6); /*Practice Address*/ $address1 = ucwords(strtolower($myrow['A29'])); $address2 = ucwords(strtolower($myrow['A30'])); $cityname = ucwords(strtolower($myrow['A31'])); $statename = $myrow['A32']; if(strlen($myrow['A33'])>5) $zip = substr($myrow['A33'],0,5)."-".substr($myrow['A33'],5); else $zip = $myrow['A33']; $phone = "(".substr($myrow['A35'],0,3).") ".substr($myrow['A35'],3,3)."-".substr($myrow['A35'],6); $cphone = $myrow['A35']; if(!empty($myrow['A36'])) { $fax = "(".substr($myrow['A36'],0,3).") ".substr($myrow['A36'],3,3)."-".substr($myrow['A36'],6); } else { $fax = "Not Available"; } $enumdate = $myrow['A37']; $updatedate = $myrow['A38']; $certificationdate = $myrow['A330']; $authorized_official = ucwords(strtolower(str_replace(" "," ",$myrow['A44']." ".$myrow['A45']." ".$myrow['A43']))); $authorized_position = $myrow['A46']; $authorized_phone = $myrow['A47']; $states = array( 'AA'=>"Armed Forces Americas", 'AE'=>"Armed Forces Europe", 'AL'=>"Alabama", 'AK'=>"Alaska", 'AP'=>"Armed Forces Pacific", 'AS'=>"American Samoa", 'AZ'=>"Arizona", 'AR'=>"Arkansas", 'CA'=>"California", 'CO'=>"Colorado", 'CT'=>"Connecticut", 'DE'=>"Delaware", 'DC'=>"District Of Columbia", 'FL'=>"Florida", 'FM'=>"Micronesia", 'FPO'=>"FPO", 'GA'=>"Georgia", 'GU'=>"Guam", 'HI'=>"Hawaii", 'ID'=>"Idaho", 'IL'=>"Illinois", 'IN'=>"Indiana", 'IA'=>"Iowa", 'KS'=>"Kansas", 'KY'=>"Kentucky", 'LA'=>"Louisiana", 'ME'=>"Maine", 'MD'=>"Maryland", 'MA'=>"Massachusetts", 'MH'=>"Marshall Islands", 'MI'=>"Michigan", 'MN'=>"Minnesota", 'MS'=>"Mississippi", 'MO'=>"Missouri", 'MT'=>"Montana", 'NE'=>"Nebraska", 'NV'=>"Nevada", 'NH'=>"New Hampshire", 'NJ'=>"New Jersey", 'NM'=>"New Mexico", 'NY'=>"New York", 'NC'=>"North Carolina", 'ND'=>"North Dakota", 'OH'=>"Ohio", 'OK'=>"Oklahoma", 'OR'=>"Oregon", 'PA'=>"Pennsylvania", 'PW'=>"Palau", 'RI'=>"Rhode Island", 'SC'=>"South Carolina", 'SD'=>"South Dakota", 'TN'=>"Tennessee", 'TX'=>"Texas", 'UT'=>"Utah", 'VT'=>"Vermont", 'VA'=>"Virginia", 'VI'=>"Virgin Island", 'WA'=>"Washington", 'WV'=>"West Virginia", 'WI'=>"Wisconsin", 'WY'=>"Wyoming", 'PR'=>"Puerto Rico", 'MP'=>"Northern Mariana Islands", NULL => '* (Not Available)', ); /*active and other taxonomy (non active)*/ $othertax = array(); $taxarr = array(); $switch = 50; for($i=0;$i<15;$i++) { $park = $switch + $i*4; if(!empty($myrow[$park])) { $othertax[$i][0] = $myrow[$park-3]; $othertax[$i][1] = $myrow[$park-2]; $othertax[$i][2] = $myrow[$park-1]; $othertax[$i][3] = $myrow[$park]; $taxarr[$i] = "".$myrow[$park-3].""; } if($myrow[$park]=="Y"||$myrow[$park]=="X" || $i==0) { $taxonomy = $myrow[$park-3]; $license = $myrow[$park-2]; $fullstate1 = $states[$myrow[$park-1]] ?? $myrow[$park-1]; } } $sql3 = "select * from taxonomy where code IN ('".implode("','",$taxarr)."')"; $query3 = MySQLi_query($link,$sql3); $type1 = $class1 = $special1 = $definition1 = array(); $i=0; while($myrow1 = MySQLi_fetch_array($query3, MYSQLI_BOTH)) { $code1 = $myrow1[0]; $type1[$code1] = $myrow1[1]; $class2[$code1] = $myrow1[2]; $special1[$code1] = $myrow1[3]; $definition1[$code1] = $myrow1[4]; if($special1[$code1]!="") { $class1[$code1] = $class2[$code1]." - ".$special1[$code1]; } else $class1[$code1] = $class2[$code1]; $class1[$code1] = ucwords(strtolower($class1[$code1])); $i++; } $activeclass = $class1[$taxonomy]; $activetype = $class2[$taxonomy]; /*other identifiers*/ $other = array(); $switch = 107; for($i=0;$i<50;$i++) { $park = $switch + $i*4; if($myrow[$park]!=NULL) { $other[$i][0]=$myrow[$park]; $other[$i][1]=$myrow[$park+1]; $other[$i][2]=$myrow[$park+2]; $other[$i][3]=$myrow[$park+3]; } else break; } $soleprop = $myrow['A308']; //$category = $myrow['category']; //$category = 4; $mflag = $myrow['mflag']; if($othername!="" && $flag!=4) { $fullname = ucwords(strtolower($othername)); $ofullname = ucwords(strtolower($orgname)); } else { $fullname = ucwords(strtolower($orgname)); $ofullname = ucwords(strtolower($othername)); } $fullnamewnc = $fullname; $fulladdress = "
"; if($address1!="") $fulladdress = $fulladdress.$address1."$phone";?> | |
Full Name | $fullnamewnc | "; if($mflag==1) { echo "
---|---|
Speciality | $Spec |
Speciality | $activeclass |
Location | $address1, $cityname, $fullstate |
Authorized Official Name and Position | $authorized_official ($authorized_position) |
Authorized Official Contact | $authorized_phone |
Accepts Medicare Insurance | "; if($mflag==1) echo "Yes. This clinic participates in medicare program and accept medicare insurance. "; else echo "This clinic does not participate in Medicare Program. "; echo " |
Mailing Address | Practice Location Address | $fullname $mfulladdress Ph: $mphone | $fullname $fulladdress Ph: $phone | ";
?>
---|
NPI Number | $npi | "; echo "
---|---|
Provider Enumeration Date | $enumdate |
Last Update Date | $updatedate |
Certification Date | $certificationdate |
Medicare PECOS PAC ID | $PACID |
---|---|
Medicare Enrollment ID | $PEID |
Identifier | Type | State | Issuer | $npi | NPI | - | NPPES | "; // if other identifier exist, show below table $i=0; if(isset($other[$i][0])) { $otherid = array( '01'=>"Other", '02'=>"Medicare UPIN", '04'=>"Medicare ID-Type Unspecified", '05'=>"Medicaid", '06'=>"Medicare OSCAR/CERTIFICATION", '07'=>"Medicare NSC", '08'=>"Medicare PIN" ); for($i=0;$i<50;$i++) { if(isset($other[$i][0])) { $A = $other[$i][0]; $B = $other[$i][1]; $C = $other[$i][2]; $D = $other[$i][3]; $idtype = $otherid[$B]; echo "
---|---|---|---|
$A | $idtype | $C | $D |
Taxonomy | Type | License (State) | Status | $thistax | $thisclass | $thislicense ($thisstate) | $activestatus | "; } } ?>
---|
Provider Name | $tName |
---|---|
Provider Type | $tType |
Provider Identifiers | NPI Number: $tNPI PECOS PAC ID: $tPACID Enrollment ID: $tPEID |
News Archive
You think that your immune system is there to protect you. But what happens when it starts working against you? In the earliest stages of cancer formation, the immune system is forced to make a momentous decision. It either activates and suppresses tumor growth to help the body fight disease, or it becomes dysfunctional, helping the tumor grow and making treatment more difficult. Because this tipping point occurs before a person even realizes something is wrong, doctors are unable to directly observe this critical stage.
Alpine HC Group, the manufacturer of Opera care beds and mattresses, have launched a new range of electric adjustable beds for comfort and mobility. The beds have an adjustable base for orthopedic support that enables the elderly/disabled user to sit up in bed and elevate their legs.
A group of researchers including a Concordia PhD student have developed a new method of bioprinting adult neuron cells. They're using a new laser-assisted technology that maintains high levels of cell viability and functionality.
A vaccine may one day be able to replace oral blood thinners to reduce the risk of secondary strokes caused by blood clots, without increasing the risk of serious bleeding or triggering an autoimmune response, according to new research in the American Heart Association's journal Hypertension.
› Verified 5 days ago
";
echo " $printname "; echo "Mental Health Clinic Medicare: $mflag Practice Location: $fulladdress "; echo "Phone: $phone "; if(!empty($fax)) echo "Fax: $fax"; echo " |