* @author Brady Miller
* @copyright Copyright (c) 2019 Brady Miller
* @license https://github.com/openemr/openemr/blob/master/LICENSE GNU General Public License 3
*/
require_once(dirname(__FILE__) . "/FeeSheet.class.php");
require_once(dirname(__FILE__) . "/api.inc");
class FeeSheetHtml extends FeeSheet
{
// Dynamically generated JavaScript to maintain justification codes.
public $justinit = "var f = document.forms[0];\n";
function __construct($pid = 0, $encounter = 0)
{
parent::__construct($pid, $encounter);
}
// Build a drop-down list of providers. This includes users who
// have the word "provider" anywhere in their "additional info"
// field, so that we can define providers (for billing purposes)
// who do not appear in the calendar.
//
public static function genProviderOptionList($toptext, $default = 0, $inactive = false)
{
$s = '';
// Get user's default facility, or 0 if none.
$drow = sqlQuery("SELECT facility_id FROM users where username = ?", [$_SESSION['authUser']]);
$def_facility = 0 + $drow['facility_id'];
//
$sqlarr = array($def_facility);
$query = "SELECT id, lname, fname, facility_id FROM users WHERE " .
"( authorized = 1 OR info LIKE '%provider%' ) AND username != '' ";
if (!$GLOBALS['include_inactive_providers']) {
$query .= " AND active = 1 AND ( info IS NULL OR info NOT LIKE '%Inactive%' )";
}
// If restricting to providers matching user facility...
if (!empty($GLOBALS['gbl_restrict_provider_facility'])) {
$query .= " AND ( facility_id = 0 OR facility_id = ? )";
$query .= " ORDER BY lname, fname";
} else { // If not restricting then sort the matching providers first.
$query .= " ORDER BY (facility_id = ?) DESC, lname, fname";
}
$res = sqlStatement($query, $sqlarr);
$s .= "" . text($toptext) . " ";
while ($row = sqlFetchArray($res)) {
$provid = $row['id'];
$s .= "";
}
return $s;
}
// Does the above but including ... .
//
public static function genProviderSelect($tagname, $toptext, $default = 0, $disabled = false, $tooltip = '')
{
$s = " got_warehouses) {
// Normally would use generate_select_list() but it's not flexible enough here.
$s .= "";
$lres = sqlStatement("SELECT * FROM list_options " .
"WHERE list_id = 'warehouse' AND activity = 1 ORDER BY seq, title");
while ($lrow = sqlFetchArray($lres)) {
$s .= " 0 && $lrow['option_id'] == $default)) &&
($is_sold || $allowed)
) {
$s .= " selected";
} else {
// Hide this warehouse option if not selected and has no permission or no inventory.
if (!$allowed) {
$s .= " disabled style='display:none'";
}
}
}
$s .= ">" . text(xl_list_label($lrow['title'])) . " \n";
}
$s .= " ";
$lres = sqlStatement(
"SELECT lo.*, p.pr_price " .
"FROM list_options AS lo " .
"LEFT JOIN prices AS p ON p.pr_id = ? AND p.pr_selector = ? AND p.pr_level = lo.option_id " .
"WHERE lo.list_id = 'pricelevel' AND lo.activity = 1 ORDER BY lo.seq, lo.title",
array($pr_id, $pr_selector)
);
$standardPrice = 0;
while ($lrow = sqlFetchArray($lres)) {
$price = empty($lrow['pr_price']) ? 0 : $lrow['pr_price'];
// if percent-based pricing is enabled...
if ($GLOBALS['enable_percent_pricing']) {
// Set standardPrice as the first price level (sorted by seq)
if ($standardPrice === 0) {
$standardPrice = $price;
}
// If price level notes contains a percentage,
// calculate price as percentage of standard price
$notes = $lrow['notes'];
if (!empty($notes) && strpos($notes, '%') > -1) {
$percent = intval(str_replace('%', '', $notes));
if ($percent > 0) {
$price = $standardPrice * ((100 - $percent) / 100);
}
}
}
if ($price != 0 && !$this->pricesAuthorized()) {
// This user is not authorized to see nonzero prices.
$price = 'X';
}
$s .= " 0 && $lrow['option_id'] == $default)
) {
$s .= " selected";
}
$s .= ">" . text(xl_list_label($lrow['title'])) . " \n";
}
$s .= " \n";
$s .= " " . xlt('First Modern Contraceptive Use (Lifetime)') . " \n";
$s .= " " . xlt('First Modern Contraception at this Clinic (with Prior Contraceptive Use)') . " \n";
$s .= " " . xlt('Method Change at this Clinic') . " \n";
$s .= " \n";
$s .= " " . xlt('First Modern Contraceptive Use (Lifetime)') . " \n";
$s .= " " . xlt('First Modern Contraception at this Clinic (with Prior Contraceptive Use)') . " \n";
$s .= " " . xlt('Method Change at this Clinic') . " \n";
$s .= " getPriceLevel();
$plres = sqlStatement("SELECT option_id, title FROM list_options " .
"WHERE list_id = 'pricelevel' AND activity = 1 ORDER BY seq");
while ($plrow = sqlFetchArray($plres)) {
$key = $plrow['option_id'];
$val = $plrow['title'];
$s .= "";
}
$s .= "