// ==UserScript==
// @name Allscripts IntegrationMM
// @namespace http://jewelmirror.com
// @version 0.2
// @description OpenEMR integration with Allscript ePrescribe
// @include https://eprescribe.allscripts.com/*
// @include */openemr/interface/main/main_title.php
// @include */openemr/interface/patient_file/summary/demographics.php*
// @include */opendev/master/interface/main/main_title.php
// @include */opendev/master/interface/patient_file/summary/demographics.php*
// @require http://code.jquery.com/jquery-2.0.3.min.js
// @grant GM_setValue
// @grant GM_getValue
// @grant GM_setClipboard
// @grant GM_xmlhttpRequest
// ==/UserScript==
// +-----------------------------------------------------------------------------+
// Copyright (C) 2013 IntegralEMR LLC <[email protected]>
//
//
// 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.
//
//
// A copy of the GNU General Public License is included along with this program:
// openemr/interface/login/GnuGPL.html
// For more information write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// Author: Kevin Yeh <[email protected]>
// Contributions: Marcin Matuszkiewicz <[email protected]>
//
// +------------------------------------------------------------------------------+
var pages={
interstitial: "/InterstitialAd.aspx",
addPatient: "/AddPatient.aspx",
def: "/default.aspx",
allergy: "/PatientAllergy.aspx",
search: "/SearchPatient.aspx",
Login: "/Login.aspx",
oemrMain: "/interface/main/main_title.php",
oemrDemo: "/interface/patient_file/summary/demographics.php",
oemrDemoFull: "/interface/patient_file/summary/demographics_full.php"
};
var asContID={
lblPatientName: "ctl00_lblPatientName",
lblGenderDOB: "ctl00_lblGenderDob",
txtPatLNAME: "ctl00_ContentPlaceHolder1_PatientSearch_txtLastName",
txtPatFNAME: "ctl00_ContentPlaceHolder1_PatientSearch_txtFirstName",
txtPatDOB: "ctl00_ContentPlaceHolder1_PatientSearch_rdiDOB",
tblViewPatients: "ctl00_ContentPlaceHolder1_grdViewPatients_ctl00",
btnSearch: "ctl00_ContentPlaceHolder1_PatientSearch_btnSearch"
};
function resetInfo()
{
GM_setValue("OpenEMR Server","");
GM_setValue("OpenEMR Session","");
// Patient Info
GM_setValue("patientFNAME","");
GM_setValue("patientLNAME","");
GM_setValue("patientDOBYear","");
GM_setValue("patientDOBMonth","");
GM_setValue("patientDOBDay","");
// Prescription Info
GM_setValue("MedName",""); // The Med Name
GM_setValue("MedSTR",""); // The Med Strength
GM_setValue("MedSIG",""); // The Med SIG
GM_setValue("searchState","not found");
}
//TODO: Can I add a dialog div that displays the drugs from OpenEMR?
function setOEMRDOB(DOB)
{
var DOBParts;
var DOBYear;
var DOBMonth;
var DOBDay;
if(DOB.indexOf("-")===4)
{
DOBParts=DOB.split("-");
DOBYear=DOBParts[0].substr(0,4);
DOBMonth=DOBParts[1].substr(0,2);
DOBDay=DOBParts[2].substr(0,2);
}
else if(DOB.indexOf("/")==2)
{
DOBParts=DOB.split("/");
DOBMonth=DOBParts[0].substr(0,2);
DOBDay=DOBParts[1].substr(0,2);
DOBYear=DOBParts[2].substr(0,4);
}
GM_setValue("patientDOBYear",DOBYear);
GM_setValue("patientDOBMonth",DOBMonth);
GM_setValue("patientDOBDay",DOBDay);
}
function safeFocus(id)
{
var element = document.getElementById(id);
if (element != null)
{
element.focus();
}
}
function safeClick(id)
{
var element = document.getElementById(id);
if (element != null)
{
element.click();
}
}
function safeFocusVal(id,value)
{
var element = document.getElementById(id);
if (element !== null)
{
element.focus();
element.value=value;
}
}
function patDOB()
{
retVal=GM_getValue("patientDOBMonth");
retVal=retVal.concat("/");
retVal=retVal.concat(GM_getValue("patientDOBDay"));
retVal=retVal.concat("/");
retVal=retVal.concat(GM_getValue("patientDOBYear"));
return retVal;
}
function asPopulateAndSearchPatientInfo()
{
// window.alert("Pause");
safeFocusVal(asContID['txtPatLNAME'],GM_getValue("patientLNAME"));
safeFocusVal(asContID['txtPatFNAME'],GM_getValue("patientFNAME"));
GM_setValue("searchState","searching") ;
safeClick(asContID['btnSearch']);
}
function asFindPatientInResults()
{
var myHTML=$(this).html();
var foundPatient=myHTML.indexOf(GM_getValue("patientLNAME")+", "+GM_getValue("patientFNAME"));
if(foundPatient>=0)
{
var foundDOB=myHTML.indexOf(patDOB(),foundPatient);
if(foundDOB>=0)
{
rowID=$(this).find("input[id]").attr("id");
safeClick(rowID);
}
}
}
function asCheckPatientInfo()
{
var pn=$("#"+asContID['lblPatientName']).text();
var foundPatient=pn.indexOf(GM_getValue("patientLNAME")+", "+GM_getValue("patientFNAME"));
if(foundPatient===0)
{
DOB=$("#"+asContID['lblGenderDOB']).text();
foundDOB=DOB.indexOf(patDOB());
if(foundDOB>=0)
{
GM_setValue("searchState","found");
}
}
}
function asAddOpenEMRSearch()
{
var addPtButton=$("#ctl00_ContentPlaceHolder1_PatientSearch_AddPanel");
var openSearch=$("<input type='button' id='openemr_search' value='OpenEMR '/>");
openSearch.click(asPopulateAndSearchPatientInfo);
var searchTd=$("<td></td>");
searchTd.append(openSearch);
addPtButton.after(openSearch);
}
function asSearchDispatcher()
{
if($("#txtUserName").length>0)
{
// This is the initial login screen and we should just abort.
return;
}
asAddOpenEMRSearch();
asCheckPatientInfo();
if(GM_getValue("searchState").indexOf("searching")==0)
{
var tblViewPatients=$("#"+asContID['tblViewPatients']);
if(tblViewPatients.length>0)
{
GM_setValue("searchState","results scanning");
rows=tblViewPatients.find("tbody tr");
rows.each(asFindPatientInResults);
}
}
else if(GM_getValue("searchState").indexOf("not found")==0)
{
asPopulateAndSearchPatientInfo();
}
}
var asAddPatientControls={
btnAllergy: "ctl00_ContentPlaceHolder1_btnAddAllergy",
txtPatFNAME: "ctl00_ContentPlaceHolder1_txtFName",
txtPatLNAME: "ctl00_ContentPlaceHolder1_txtLName",
txtPatDOB: "ctl00_ContentPlaceHolder1_txtDOB",
txtPatAddr1: "ctl00_ContentPlaceHolder1_txtAddress1",
txtPatPhone: "ctl00_ContentPlaceHolder1_txtPhone",
txtPatMobilePhone: "ctl00_ContentPlaceHolder1_txtMobilePhone",
txtPatCity: "ctl00_ContentPlaceHolder1_txtCity",
txtPatZIP: "ctl00_ContentPlaceHolder1_txtZip",
txtPatMRN: "ctl00_ContentPlaceHolder1_txtMRN",
selGender: "ctl00_ContentPlaceHolder1_DDLGender",
selState:"ctl00_ContentPlaceHolder1_ddlState"
};
function chooseSelect(control,option)
{
sel=document.getElementById(control);
for(idx=0;idx<sel.options.length;idx++)
{
opt=sel.options[idx];
if(opt.value==option)
{
sel.selectedIndex=idx;
opt.click();
}
}
}
function removeTags(text,tag,endTag)
{
tag="<"+tag;
loc=text.indexOf(tag);
while(loc>=0)
{
endMarker=text.indexOf(endTag,loc+tag.length);
text=text.substr(0,loc)+text.substr(endMarker+endTag.length);
loc=text.indexOf(tag);
}
return text;
}
function extractTag(text,tag,endTag)
{
loc=text.indexOf(tag);
end=text.lastIndexOf(endTag);
return text.substr(loc,end+endTag.length-loc);
}
// Get the text from the OpenEMR form and populate the appropriate Allscripts control.
function setAddPatientText(asControl,oemrcontrol)
{
val=$("#"+oemrcontrol).val();
$("#"+asAddPatientControls[asControl]).val(val);
}
// Use the results of the ajax request to OpenEMR to get the patient's demographics
function processOEMRDemographics(data)
{
$("#demoLoading").hide();
var text=data.responseText;
text=text.substr(text.indexOf("<form"));
text=removeTags(text,"img",">");
text=removeTags(text,"a","</a>");
text=extractTag(text,"<form","</form>");
$("#gmOEMRInfo").append(text);
$("#gmOEMRInfo img").remove();
patID=$("#gmOEMRInfo").find("input[name='form_pubpid']").val();
$("#"+asAddPatientControls['txtPatMRN']).val(patID);
setAddPatientText('txtPatFNAME',"form_fname");
setAddPatientText('txtPatLNAME',"form_lname");
setAddPatientText('txtPatLNAME',"form_lname");
setAddPatientText('txtPatZIP',"form_postal_code");
setAddPatientText('txtPatAddr1',"form_street");
setAddPatientText('txtPatCity',"form_city");
setAddPatientText('txtPatPhone',"form_phone_home");
setAddPatientText('txtPatMobilePhone',"form_phone_cell");
var sex=$("#form_sex").val();
var state=$("#form_state").val();
chooseSelect(asAddPatientControls['selGender'],sex[0]);
chooseSelect(asAddPatientControls['selState'],state);
var dob=$("#form_DOB").val();
setOEMRDOB(dob);
safeFocus(asAddPatientControls['txtPatDOB']);
$("#"+asAddPatientControls['txtPatDOB']).val(patDOB());
// $("#"+asAddPatientControls['txtPatDOB']).blur();
}
function loadDemographicsFromOpenEMR()
{
var demoFullURL=GM_getValue("OpenEMR Server")+pages['oemrDemoFull'];
var loading=$("#demoLoading");
if(loading.length===0)
{
$("#gmOEMRImport").before("<SPAN id='demoLoading' float:right>Loading</SPAN>");
loading=$("#demoLoading");
}
loading.show();
GM_xmlhttpRequest({
method: "GET",
url: demoFullURL,
onload: processOEMRDemographics
});
}
// Put the control to request patient data from OpenEMR on the Allscripts form.
function asAddPatientUpdate()
{
btnAll=$("#"+asAddPatientControls['btnAllergy']);
btnAll.after("<DIV id='GMControls' style='float:right;'></DIV>");
$("#GMControls").append("<input type='button' value='Load from OpenEMR' id='gmOEMRImport' >");
$("#GMControls").append("<div id='gmOEMRInfo' style='display:none;' >OpenEMRInfo</DIV");
$("#gmOEMRImport").click(loadDemographicsFromOpenEMR);
}
function OpenEMRDemographics()
{
resetInfo();
var location = window.location.href;
var server=location.substr(0,location.indexOf(pages['oemrDemo']));
GM_setValue("OpenEMR Server",server);
var whoDIV=$("td.label:contains('DOB:')").parents("div.tab");
var DOB=whoDIV.find("td.label:contains('DOB:')").next();
setOEMRDOB(DOB.text());
var Gender=whoDIV.find("td.label:contains('Sex:')").next();
var patName=$("span.title").text();
var splitName=patName.replace(" ","").split(",");
var fname=splitName[1];
var lname=splitName[0];
var patIDHREF=$("span:contains('Delete')").parent("a.css_button[href]").attr("href");
var deleterHREFInfo="../deleter.php?patient=";
var loc=patIDHREF.indexOf("deleterHREFInfo")+deleterHREFInfo.length+1;
var patID=parseInt(patIDHREF.substr(loc));
GM_setValue("patientPID",patID);
GM_setValue("patientFNAME",fname);
GM_setValue("patientLNAME",lname);
}
function OpenEMRAddLink()
{
var allScriptsLink=$("<a id='gmASLink' class='css_button_small' style='float:right;'>"+"<span>Allscripts</span>"+"</a>");
var targetCB=$("<input type='checkbox' id='gmASChoice' title='Open Allscripts in New Window'/>");
$("#current_patient_block").append(allScriptsLink).append(targetCB);
allScriptsLink.click(function()
{
if($("#gmASChoice:checked").length===0)
{
if(window.top.left_nav.document.forms[0].cb_bot.checked)
{
window.top.RBot.location="https://eprescribe.allscripts.com/SearchPatient.aspx";
window.top.left_nav.botName='All2';
}
else
{
window.top.RTop.location="https://eprescribe.allscripts.com/SearchPatient.aspx";
window.top.left_nav.topName='All2';
}
}
else
{
var winAS=window.open("https://eprescribe.allscripts.com/SearchPatient.aspx","Allscripts");
winAS.focus();
}
GM_setValue("searchState","not found");
});
}
var loc=window.location.href;
if(loc.indexOf(pages['interstitial'])>=0)
{
var adButton = document.getElementById("adControl_closeButton");
if (adButton != null)
{
adButton.click();
}
}
if(loc.indexOf("SelectAccountAndSite.aspx")>=0)
{
}
else if((loc.indexOf(pages['Login'])>=0) || (loc.indexOf(pages['search'])>=0) || (loc.indexOf("https://eprescribe.allscripts.com/")>=0) )
{
$(window).load(asSearchDispatcher);
}
handlers=[
{location: pages['oemrDemo'], handler: OpenEMRDemographics },
{location: pages['oemrMain'], handler: OpenEMRAddLink },
{location: pages['addPatient'], handler: asAddPatientUpdate}
];
function dispatch(location)
{
for(var dispatchIdx=0;dispatchIdx<handlers.length;dispatchIdx++)
{
var dispatchEntry=handlers[dispatchIdx];
if(location.indexOf(dispatchEntry.location)>=0)
{
$(document).ready(dispatchEntry.handler);
}
}
}
dispatch(loc);
