/**
 * Controller class for AnalysisRequest add view
 */
function HealthAnalysisRequestAddView() {

    var that = this;

    // ------------------------------------------------------------------------
    // PUBLIC ACCESSORS
    // ------------------------------------------------------------------------


    // ------------------------------------------------------------------------
    // PUBLIC FUNCTIONS
    // ------------------------------------------------------------------------

    /**
     * Entry-point method for AnalysisRequestAddView
     */
    this.load = function () {
        datafilled = false;
        frombatch = window.location.href.search('/batches/') >= 0;
        frompatient = document.referrer.search('/patients/') >= 0;

        if (frombatch) {
            // The current AR add View comes from a batch. Automatically fill
            // the Client, Patient and Doctor fields and set them as readonly.
            batchid = window.location.href.split("/batches/")[1].split("/")[0];
            datafilled = fillDataFromBatch(batchid);

        } else if (frompatient) {
            // The current AR add View comes from a patient AR folder view.
            // Automatically fill the Client and Patient fields and set them
            // as readonly.
            pid = document.referrer.split("/patients/")[1].split("/")[0];
            datafilled = fillDataFromPatient(pid);
        }

        if (!datafilled) {
            // The current AR Add View doesn't come from a batch nor patient or
            // data autofilling failed. Handle event firing when Patient or
            // ClientPatientID fields change.
            $('[id$="_ClientPatientID"]').bind("selected paste blur change", function () {
                colposition = $(this).closest('td').attr('column');
                if (colposition == undefined){
                    // we are on the specific health template
                    colposition = 0}
                loadPatient($(this).val(), colposition);
                checkClientContacts();
            });

            $('[id$="_Patient"]').bind("selected paste blur change", function () {
                colposition = $(this).closest('td').attr('column');
                if (colposition == undefined){
                    // we are on the specific health template
                    colposition = 0}
                uid = $("#" + this.id + "_uid").val();
                loadClientPatientID(uid, colposition);
                checkClientContacts();
            });

            // When the user selects an earlier sample (from storage say) and creates a
            // secondary AR for it, the Patient field should also be looked up and
            // uneditable.
            // See https://github.com/bikalabs/bika.health/issues/100
            $('[id$="_Sample"]').bind("selected paste blur", function () {
                colposition = $(this).closest('td').attr('column');
                if (colposition == undefined){
                    // we are on the specific health template
                    colposition = 0}
                uid = $("#" + this.id + "_uid").val();
                loadPatientFromSample(uid, colposition);
                checkClientContacts();
            });

            // The Batch, Patient and PatientCID combos must only show the
            // records from the current client
            filterComboSearches();
        }


        // Check if the current selected client has contacts. If client has no
        // contacts, prevent from saving the AR and inform the user
        checkClientContacts();
    };

    // ------------------------------------------------------------------------
    // PRIVATE FUNCTIONS
    // ------------------------------------------------------------------------
    /**
     * Searches a patient using the Client Patient ID. If found, fill the Patient's input
     * fields from the same AR add column. If no patient found, set the values to
     * Anonymous.
     * @param id Client Patient ID
     * @param colposition AR add column position
     */
    function loadPatient(id, colposition) {
        if (id != '') {
            $.ajax({
                url: window.portal_url + "/getpatientinfo",
                type: 'POST',
                data: {
                    '_authenticator': $('input[name="_authenticator"]').val(),
                    'ClientPatientID': id
                },
                dataType: "json",
                success: function (data, textStatus, $XHR) {
                    if (data['PatientUID'] != '') {
                        $("#ar_" + colposition + "_Patient").val(data['PatientFullname']);
                        $("#ar_" + colposition + "_Patient").attr('uid', data['PatientUID']);
                        $("#ar_" + colposition + "_Patient_uid").val(data['PatientUID']);
                        $("#ar_" + colposition + "_Patient").combogrid("option", "disabled", false);
                    } else {
                        // No patient found. Set anonymous patient
                        $("#ar_" + colposition + "_Patient").val(_('Anonymous'));
                        $("#ar_" + colposition + "_Patient").attr('uid', 'anonymous');
                        $("#ar_" + colposition + "_Patient_uid").val('anonymous');
                    }
                }
            });
        } else {
            // Empty client patient id. Reset patient fields
            $("#ar_" + colposition + "_Patient").val('');
            $("#ar_" + colposition + "_Patient").attr('uid', '');
            $("#ar_" + colposition + "_Patient_uid").val('');
            $("#ar_" + colposition + "_Patient").combogrid("option", "disabled", false);
        }
    }

    /**
     * Searches a patient using the Patient UID. If found, fill the Client Patient
     * ID from the same AR add column. If no patient found, set the value to empty.
     * @param uid Patient UID
     * @param colposition AR add column position
     */
    function loadClientPatientID(uid, colposition) {
        if (uid == 'anonymous') {
            // Anonymous Patient, do nothing.
            return;
        }
        if (uid != '') {
            $.ajax({
                url: window.portal_url + "/getpatientinfo",
                type: 'POST',
                data: {
                    '_authenticator': $('input[name="_authenticator"]').val(),
                    'PatientUID': uid
                },
                dataType: "json",
                success: function (data, textStatus, $XHR) {
                    $("#ar_" + colposition + "_ClientPatientID").val(data['ClientPatientID']);
                    $("#ar_" + colposition + "_ClientPatientID").attr('uid', uid);
                    $("#ar_" + colposition + "_ClientPatientID_uid").val(uid);
                }
            });
        } else {
            // Empty client patient id. Reset patient fields
            $("#ar_" + colposition + "_ClientPatientID").val('');
            $("#ar_" + colposition + "_ClientPatientID").attr('uid', '');
            $("#ar_" + colposition + "_ClientPatientID_uid").val('');
        }
    }

    /**
     * Searches a batch using the Batch ID. If found, fill the Client, Patient,
     * ClientPatientID and Doctor fields and set them as readonly for all columns.
     * If no batch found, does nothing.
     * @param id Batch ID
     * @return true if the batch was found and input fields were filled.
     */
    function fillDataFromBatch(id) {
        if (id != '') {
            $.ajax({
                url: window.portal_url + "/batches/" + batchid + "/getBatchInfo",
                type: 'POST',
                data: {'_authenticator': $('input[name="_authenticator"]').val()},
                dataType: "json",
                async: false,
                success: function (data, textStatus, $XHR) {
                    if (data['PatientUID'] != '') {
                        $(".dynamic-field-label").remove();
                        for (var col = 0; col < parseInt($("#col_count").val()); col++) {
                            $("#ar_" + col + "_Client").val(data['ClientTitle']);
                            $("#ar_" + col + "_Client").attr('uid', data['ClientUID']);
                            $("#ar_" + col + "_Client").attr('cid', data['ClientSysID']);
                            $("#ar_" + col + "_Client_uid").val(data['ClientUID']);

                            $("#ar_" + col + "_Patient").val(data['PatientTitle']);
                            $("#ar_" + col + "_Patient").attr('uid', data['PatientUID']);
                            $("#ar_" + col + "_Patient_uid").val(data['PatientUID']);

                            $("#ar_" + col + "_Doctor").val(data['DoctorTitle']);
                            $("#ar_" + col + "_Doctor").attr('uid', data['DoctorUID']);
                            $("#ar_" + col + "_Doctor_uid").val(data['DoctorUID']);

                            $("#ar_" + col + "_ClientPatientID").val(data['ClientPatientID']);

                            // Hide the previous fields and replace them by labels
                            $("#ar_" + col + "_Client").hide();
                            $("#ar_" + col + "_Patient").hide();
                            $("#ar_" + col + "_Doctor").hide();
                            $("#ar_" + col + "_ClientPatientID").hide();
                            $("#ar_" + col + "_Client").after("<span class='dynamic-field-label'>" + $("#ar_" + col + "_Client").val() + "</span>");
                            $("#ar_" + col + "_Patient").after("<span class='dynamic-field-label'>" + $("#ar_" + col + "_Patient").val() + "</span>");
                            $("#ar_" + col + "_Doctor").after("<span class='dynamic-field-label'>" + $("#ar_" + col + "_Doctor").val() + "</span>");
                            $("#ar_" + col + "_ClientPatientID").after("<span class='dynamic-field-label'>" + $("#ar_" + col + "_ClientPatientID").val() + "</span>");

                            // Contact searches
                            element = $("#ar_" + col + "_Contact")
                            base_query = $.parseJSON($(element).attr("base_query"));
                            base_query['getParentUID'] = data['ClientUID'];
                            applyComboFilter(element, base_query);
                        }
                        return true;
                    }
                }
            });
        }
        return false;
    }

    /**
     * Searches a patient using the Patient ID. If found, fill the Client, Patient,
     * and ClientPatientID fields and set them as readonly for all columns.
     * If no patient found, does nothing.
     * @param id Patient ID
     * @return true if the patient was found and input fields were filled.
     */
    function fillDataFromPatient(id) {
        var succeed = false;
        if (id != '') {
            $.ajax({
                url: window.portal_url + "/getpatientinfo",
                type: 'POST',
                data: {
                    '_authenticator': $('input[name="_authenticator"]').val(),
                    'PatientID': pid,
                },
                dataType: "json",
                async: false,
                success: function (data, textStatus, $XHR) {
                    if (data['PatientUID'] != '') {
                        $(".dynamic-field-label").remove();
                        for (var col = 0; col < parseInt($("#col_count").val()); col++) {
                            fillPatientData(col, data);
                        }
                    }
                }
            });
            return $("#ar_0_Patient").attr('uid') != '';
        }
        return false;
    }

    function filterComboSearches() {
        // Only allow the selection of batches, patients, contacts and CPIDs
        // from the current client
        for (var col = 0; col < parseInt($("#col_count").val()); col++) {
            clientuid = $("#ar_" + col + "_Client_uid").val();

            // Batch searches
            element = $("#ar_" + col + "_Batch");
            if (element.length > 0){
                base_query = $.parseJSON($(element).attr("base_query"));
                if (base_query != null) {
                    base_query['getClientUID'] = clientuid;
                    applyComboFilter(element, base_query);
                }
            }

            // Patient searches
            element = $("#ar_" + col + "_Patient");
            if (element.length > 0) {
                base_query = $.parseJSON($(element).attr("base_query"));
                if (base_query != null) {
                    base_query['getPrimaryReferrerUID'] = clientuid;
                    applyComboFilter(element, base_query);
                }
            }

            // CPID searches
            element = $("#ar_" + col + "_ClientPatientID")
            if (element.length > 0) {
                base_query = $.parseJSON($(element).attr("base_query"));
                if (base_query != null) {
                    base_query['getPrimaryReferrerUID'] = clientuid;
                    applyComboFilter(element, base_query);
                }
            }

            // Contact searches
            element = $("#ar_" + col + "_Contact")
            if (element.length > 0) {
                base_query = $.parseJSON($(element).attr("base_query"));
                if (base_query != null) {
                    base_query['getParentUID'] = clientuid;
                    applyComboFilter(element, base_query);
                }
            }
        }
    }

    function applyComboFilter(element, base_query) {
        if (element.length > 0) {
            $(element).attr("base_query", $.toJSON(base_query));
            options = $.parseJSON($(element).attr("combogrid_options"));
            options.url = window.location.href.split("/ar_add")[0] + "/" + options.url
            options.url = options.url + '?_authenticator=' + $('input[name="_authenticator"]').val();
            options.url = options.url + '&catalog_name=' + $(element).attr('catalog_name');
            options.url = options.url + '&base_query=' + $.toJSON(base_query);
            options.url = options.url + '&search_query=' + $(element).attr('search_query');
            options.url = options.url + '&colModel=' + $.toJSON($.parseJSON($(element).attr('combogrid_options'))["colModel"]);
            options.url = options.url + '&search_fields=' + $.toJSON($.parseJSON($(element).attr('combogrid_options'))["search_fields"]);
            options.url = options.url + '&discard_empty=' + $.toJSON($.parseJSON($(element).attr('combogrid_options'))["discard_empty"]);
            options['force_all'] = 'false';
            $(element).combogrid(options);
            $(element).addClass("has_combogrid_widget");
            $(element).attr('search_query', '{}');
        }
    }

    /**
     * Checks if the current client has contacts. If no contacts, show a message
     * informing the user
     */
    function checkClientContacts() {
        cids = new Array();
        // Check if comes from a Client view
        if (window.location.href.search("/clients/") >= 0) {
            cid = window.location.href.split("/clients/")[1].split("/")[0];
            cids.push(cid);
        }
        // Populate an array of cids first in order to avoid excessive request
        // calls via ajax. Must of the cases will have the same client for all
        // columns.
        for (var col = 0; col < parseInt($("#col_count").val()); col++) {
            cid = $("#ar_" + col + "_Client").attr('cid');
            if (cid != null && cid != '' && $.inArray(cid, cids) < 0) {
                cids.push(cid);
            }
        }
        $('div[id="contactsempty_alert"]').remove();
        for (var i = 0; i < cids.length; i++) {
            // Retrieve the client and check if has contacts
            cid = cids[i];
            $.ajax({
                url: window.portal_url + "/clients/" + cid + "/getClientInfo",
                type: 'POST',
                async: false,
                data: {'_authenticator': $('input[name="_authenticator"]').val()},
                dataType: "json",
                success: function (data, textStatus, $XHR) {
                    if (data['ContactUIDs'] == '' || data['ContactUIDs'].length == 0) {
                        $('table.analysisrequest').before("<div id='contactsempty_alert' class='alert'>"
                        + _("Client contact required before request may be submitted")
                        + ". <a href='" + window.portal_url + "/clients/" + cid + "/contacts'>"
                        + _("Add contacts") + " " + data['ClientTitle']
                        + "</a></div>");
                    }
                }
            });
        }
    }

    /**
     * Loads the patient from the selected sample when the user creates
     * a secondary AR for it. Sets the Patient-related fields as readonly.
     * If id is empty or null, the Patient fields gets reseted and editable.
     * @param uid Sample UID
     * @param colposition AR add column position
     * @return true if the sample has been found and patient fields has been set.
     * Otherwise, returns false
     */
    function loadPatientFromSample(uid, colposition) {
        var col = colposition;
        if (uid != null && uid != '') {
            $.ajax({
                url: window.portal_url + "/getsamplepatient",
                type: 'POST',
                data: {
                    '_authenticator': $('input[name="_authenticator"]').val(),
                    'uid': uid,
                },
                dataType: "json",
                async: false,
                success: function (data, textStatus, $XHR) {
                    if (data['PatientID'] != '') {
                        fillPatientData(col, data);
                    } else {
                        resetPatientData(col);
                    }
                }
            });
        } else {
            resetPatientData(col);
        }
    }

    function fillPatientData(col, data) {
        $("#ar_" + col + "_Client").val(data['ClientTitle']);
        $("#ar_" + col + "_Client").attr('uid', data['ClientUID']);
        $("#ar_" + col + "_Client").attr('cid', data['ClientSysID']);
        $("#ar_" + col + "_Client_uid").val(data['ClientUID']);

        $("#ar_" + col + "_Patient").val(data['PatientFullname']);
        $("#ar_" + col + "_Patient").attr('uid', data['PatientUID']);
        $("#ar_" + col + "_Patient_uid").val(data['PatientUID']);

        $("#ar_" + col + "_ClientPatientID").val(data['ClientPatientID']);
        $("#ar_" + col + "_ClientPatientID").attr('uid', data['PatientUID']);
        $("#ar_" + col + "_ClientPatientID_uid").val(data['PatientUID']);

        // Only allow the selection of batches from this patient
        element = $("#ar_" + col + "_Batch")
        base_query = $.parseJSON($(element).attr("base_query"));
        if (base_query != null) {
            base_query['getPatientUID'] = data['PatientUID'];
            applyComboFilter(element, base_query);
        }
        // Contact searches
        element = $("#ar_" + col + "_Contact")
        base_query = $.parseJSON($(element).attr("base_query"));
        if (base_query != null) {
            base_query['getParentUID'] = data['ClientUID'];
            applyComboFilter(element, base_query);
        }
    }

    function resetPatientData(col) {
        // Empty client patient id. Reset patient fields
        $("#ar_" + colposition + "_Patient").val('');
        $("#ar_" + colposition + "_Patient").attr('uid', '');
        $("#ar_" + colposition + "_Patient_uid").val('');
        $("#ar_" + colposition + "_Patient").combogrid("option", "disabled", false);

        $("#ar_" + col + "_ClientPatientID").val('');
        $("#ar_" + col + "_ClientPatientID").attr('uid', '');
        $("#ar_" + col + "_ClientPatientID_uid").val('');
        $("#ar_" + colposition + "_ClientPatientID").combogrid("option", "disabled", false);

        frombatch = window.location.href.search('/batches/') >= 0;
        frompatient = document.referrer.search('/patients/') >= 0;

        if (frombatch) {
            // The current AR add View comes from a batch. Automatically fill
            // the Client, Patient and Doctor fields and set them as readonly.
            batchid = window.location.href.split("/batches/")[1].split("/")[0];
            datafilled = fillDataFromBatch(batchid);

            // The Batch, Patient and PatientCID combos must only show the
            // records from the current client
            filterComboSearches();

            // Check if the current selected client has contacts. If client has no
            // contacts, prevent from saving the AR and inform the user
            checkClientContacts();

        } else if (frompatient) {
            // The current AR add View comes from a patient AR folder view.
            // Automatically fill the Client and Patient fields and set them
            // as readonly.
            pid = document.referrer.split("/patients/")[1].split("/")[0];
            datafilled = fillDataFromPatient(pid);

            // The Batch, Patient and PatientCID combos must only show the
            // records from the current client
            filterComboSearches();

            // Check if the current selected client has contacts. If client has no
            // contacts, prevent from saving the AR and inform the user
            checkClientContacts();

        } else {

            // Clear the batches selection from this patient
            element = $("#ar_" + col + "_Batch")
            base_query = $.parseJSON($(element).attr("base_query"));
            delete base_query['getPatientUID'];
            applyComboFilter(element, base_query);

            // Contact searches
            element = $("#ar_" + col + "_Contact")
            base_query = $.parseJSON($(element).attr("base_query"));
            delete base_query['getParentUID'];
            applyComboFilter(element, base_query);
        }
    }
}