lnappExport.prg

<?php


  // ** Load the current database

  // **

require_once(dirname(__FILE__) . "/../../monitor/library/cu_top.i");

require_once(dirname(__FILE__) . "/../../eforms/library/lnappfunctions.i"); // TODO: that reference isn't going to work (probably).

  /*
   *
   *
   *
   * Export the loan details, exported in the configured format
   *
   *
   *
   *
   */
  $lnappConfigOptions = Array('configHomeLogin' => 'Allow Home Banking Login',
                              'configDisableEmail' => 'Disable Email Login',
                              'configSSOOnly' => 'SSO Only',
                              'configLoanSubmit' => 'Post Loan Applications to Core',
                              'configLoanSubmitMember' => 'Post Primary Member With Loan App',
                              'configLoanFormat' => ' Post Loan Applications Format',
                              'configLoanMIR' => 'Allow Member Info to Populate From Core',
                              'configLoanCSS' => 'Loan App Stylesheet',
                              'configLoanIntroMbr' => 'Loan Login Message for Members',
                              'configLoanIntroNonHBMbr' => 'Loan Login Message for non-Home Banking Members',
                              'configLoanIntroNon' => 'Loan Login Message for non-Members',
                              'configLoanDataOnly' => 'Submit Fields With Data Only');


  /*
   * Variables
   */
  $DB_TABLE_PREFIX = 'lnapp';
  $FORM_VALIDATION_ERROR = "";


try
{

  $dms_ok = array('action'=>'string', 'cu'=>'string', 'LoanId'=>'string',
                  'Title'=>'string', 'LastModified'=>'string', 'Fragment'=>'string',
                  'loanid'=>'string', 'option' => 'string', 'ConfigField' => 'string',
                  'ConfigValue' => 'string', 'CopyFrom' => 'string');

  HCU_ImportVars($DATA_PARAMETERS, "TOP_LEVEL", $dms_ok);
  $cu = $DATA_PARAMETERS['TOP_LEVEL']['cu'];
  $loanid = $DATA_PARAMETERS['TOP_LEVEL']['loanid'];

  $dbh = $link;


  /*
   *  Retrieve the configuration for the credit union
   *
   */

  $currentConfig = Array();     // Declare as an empty array
  $recordFound = false;
  // ** This will handle the data options for Configuration Options
  $sql = "SELECT cu, appconfig
          FROM lnappconfig
          WHERE cu = '" . prep_save($cu, 12) . "'";
  $config_rs = db_query($sql, $dbh);
  if ($config_row = db_fetch_assoc($config_rs)) {
    $recordFound = true;
    // ** Retrieve the text
    $currentConfigJson = trim($config_row['appconfig']);
    // ** Validate this object may be json
    $currentConfig = HCU_JsonDecode($currentConfigJson, true);
    if (json_last_error() != JSON_ERROR_NONE) {
      // AN ERROR WAS DETECTED - revert the Value back to an array
      $currentConfig = Array();
    }
  }


  $sql = "SELECT schemadetail.*
          FROM {$DB_TABLE_PREFIX}schemadetail as schemadetail
          JOIN {$DB_TABLE_PREFIX}schemamaster as schemamaster ON
            schemamaster.loanid = schemadetail.loanid
          WHERE schemadetail.loanid = " . intval($loanid) . "
            AND schemamaster.cu = '$cu'
          ORDER BY schemadetail.loanid, schemadetail.pageid, schemadetail.groupid, schemadetail.lineid ";

  $loan_rs = db_query($sql, $dbh);

  $App_SchemaDetail = Array();
  $App_SchemaFields = Array();
  $App_AnswerDetail = Array();
  $App_ConditionalFields = Array();     // ** this is the list of conditional fields on the posted form..

  // ** IF NO RECORD

  if ($loan_rs) {
    $loan_idx = 0;
    while ($loan_row = db_fetch_assoc($loan_rs, $loan_idx++)) {
      // ** Need to create the Loan Master Schema Array
      // ** Make the detailid the key so I can look it up quickly
      $App_SchemaDetail[$loan_row['detailid']] = $loan_row;

      // ** The Haystack was in the wrong position for the function
      if (strpos(":YNR:YNR01:YNS:YNS01:GN:GA:GT:AS:AR:", ":" . trim($loan_row['fieldtype']) . ":") !== false) {
        // * This appears to be a valid type... This is a field that should be saved
        // to the database field response
        // ** All fields save will be the field name "formfield_{detailid}"
        $fieldname = "formfield_" . $loan_row['detailid'];
        $App_SchemaFields[$fieldname] = "";

        // ** If we are posting the form.. There are situations that I want to
          // ** record something.. This is when
        if (isset($_POST['btnFormPost'])) {
          $fieldattr = HCU_JsonDecode($App_SchemaDetail[$loan_row['detailid']]['fieldattr'], true);
          if ($fieldattr['validation_conditionname'] != '') {

            // This value is set as a conditional value -- I will set the value in the array here
            $App_ConditionalFields[$fieldattr['validation_conditionname']] = trim($_POST[$fieldname]);
          }
        }
      }

    }
  } elseif ($FORM_VALIDATION_ERROR != '') {
    // ** PROBLEM LOADING MASTER SCHEMA -- If validation error is not set, then set something
    $FORM_VALIDATION_ERROR = "<li>A problem was encountered that is preventing the loan application from loading.</li>";
  }


  print BuildObject($currentConfig);

} catch(Exception $ex) {
    //Return error message
  print "An error occurred exporting the schema";
}


// * App_Response -- this is the applicatn response in an array based on fields..
// * The array for CORE WILL BE BUILT HERE
function BuildObject($pCurrentConfig) {
  global $App_SchemaDetail, $DB_TABLE_PREFIX, $FORM_VALIDATION_ERROR;

  $core_values_array = Array();
  $local_values_array = Array();
  $core_values_serial = "";

  $App_AnswerDetail = $GLOBALS['App_AnswerDetail'];
  // ** Need to assign
  foreach ($App_SchemaDetail as $schema_detailid => $schema_detailvalue) {

    // ** For each postable value -- Look up and assign the value on
    $fieldattr = HCU_JsonDecode($App_SchemaDetail[$schema_detailid]['fieldattr'], true);
    $fieldval = $App_SchemaDetail[$schema_detailid]['fieldvalue'];
    $fieldkey = "formfield_" . $schema_detailid;

    $sampleData = '';
            // ** data type
    switch ($App_SchemaDetail[$schema_detailid]['fieldtype']) {
      case "YNR":
      case "YNS":
        // ** Values may be Y / N or Blank
        if ($fieldval != "" && !strstr(":Y:N:", $fieldval)) {
          $FORM_VALIDATION_ERROR .= "<li>" . $App_SchemaDetail[$schema_detailid]['fieldvalue'] . " contains an invalid option.</li>";
        }
        $sampleData = '{Y/N}';
        break;
      case "YNR01":
      case "YNS01":
        // ** Values may be 0 / 1 or Blank
        if ($fieldval != "" && !strstr(":0:1:", $fieldval)) {
          $FORM_VALIDATION_ERROR .= "<li>" . $App_SchemaDetail[$schema_detailid]['fieldvalue'] . " contains an invalid option.</li>";
        }
        $sampleData = '{1/0}';
        break;
      case "AS":
      case "AR":
        $ansId = $fieldattr['fieldansid'];


        if (!isset($GLOBALS['App_AnswerDetail'][$ansId])) {
          // ** Send to load the answer
          Load_AnswerList($ansId);
        }

        // ** THESE COULD BE NUMERIC OR TEXT -- The ultimate test is to know the type and look it up as a valid option
        // ** values may be an integer only -- not larger than???
        if (is_array($GLOBALS['App_AnswerDetail'][$ansId])) {
          $sampleData = "{" . implode('/', array_keys($GLOBALS['App_AnswerDetail'][$ansId])) . "}";
        }
        break;
      // ** GN AND GA types may be phased out
      case "GN":
        // ** value must be numeric
        $sampleData = '######';
        break;
      case "GA":
        // ** value must be an amount
        $sampleData = '######.##';
        break;
      case "GT":
        // ** value is a generic text
        // ** The data type is determined by validation_match under the fieldattr object
        if (isset($fieldattr['validation_match'])) {
          switch ($fieldattr['validation_match']) {
            case "date":
              $sampleData = 'MM/DD/YYYY';
              break;
            case "ssn":
              $sampleData = '###-##-####';
              break;
            case "phone":
              $sampleData = '###-###-####';
              break;
            case "url":
              $sampleData = 'www.url.com';
              break;
            case "email":
              $sampleData = 'sampleemail@url.com';
              break;
            case "usd":
              $sampleData = '$#####.##';
              break;
            case "integer":
              $sampleData = '#######';
              break;
            case "zip":
              $sampleData = '######-####';
              break;
            case "number":
              $sampleData = '#######';
              break;
            default:
              $sampleData = 'string';
          }
        } else {
          $sampleData = 'string';
        }

        // ** Be sure the field is NOT too large
        if (isset($fieldattr['maxlength'])) {
          if (intval($fieldattr['maxlength']) && intval($fieldattr['maxlength']) > 0) {
            $FORM_VALIDATION_ERROR .= "<li>" . $App_SchemaDetail[$schema_detailid]['fieldvalue'] . " has exceeded the max length of " . intval($fieldattr['maxlength']) . ".</li>";
            $sampleData .= ' max ' . intval($fieldattr['maxlength']);
          }
        }
    }

    // ** ONLY add this field if the fieldcorename is set and is not a local only field
    // * localfieldonly will only be available if it is set to 1, otherwise the field won't exist.
    $hasKey_fieldCoreName = HCU_array_key_exists('fieldcorename', $fieldattr);
    $hasKey_localFieldOnly = HCU_array_key_exists('localfieldonly', $fieldattr);
    if ($hasKey_fieldCoreName && !$hasKey_localFieldOnly) {
      // localfieldonly == 0 / doesn't exist in array
      if ($fieldattr['fieldcorename'] != '') {
        if (isset($fieldattr['validation_match'])) {
        // * Create sample data based on the data type
         switch ($fieldattr['validation_match']) {
            case "number":
              $sampleData = '#######';
              break;
            default:
              $sampleData = 'string';
          }
        } else {
          $sampleData = 'string';
        }

        // ** Be sure the field is NOT too large
        if (isset($fieldattr['maxlength'])) {
          if (intval($fieldattr['maxlength']) && intval($fieldattr['maxlength']) > 0) {
            $FORM_VALIDATION_ERROR .= "<li>" . $App_SchemaDetail[$schema_detailid]['fieldvalue'] . " has exceeded the max length of " . intval($fieldattr['maxlength']) . ".</li>";
            $sampleData .= ' max ' . intval($fieldattr['maxlength']);
          }
        }

        // * Create sample data based on the data type
        // ** Assign the value -- There may be an Index associated with the row
        // ** IF so then assign that here
        // IF fieldcorename contains a ',' then I will explode the list out into an
        // array and call each each key to add it to the master list
        if (strpos($fieldattr['fieldcorename'], ",") === FALSE) {
          if (isset($fieldattr['fieldcorearrayindex'])) {
            $core_values_array[$fieldattr['fieldcorearrayindex']][$fieldattr['fieldcorename']] = $sampleData;
          } else {
            $core_values_array[$fieldattr['fieldcorename']] = $sampleData;
          }
        } else {
          // The fieldcorename will be treated as a list
          $pieces = explode(",", $fieldattr['fieldcorename']);
          foreach ($pieces as $fieldcorename_piece) {
            $fieldcorename_piece = trim($fieldcorename_piece);
            if (isset($fieldattr['fieldcorearrayindex'])) {
              $core_values_array[$fieldattr['fieldcorearrayindex']][$fieldcorename_piece] = $sampleData;
            } else {
              $core_values_array[$fieldcorename_piece] = $sampleData;
            }
          }
        }
      }
    } else if ($hasKey_fieldCoreName && $hasKey_localFieldOnly) {
      // localfieldonly == 1
      // * add to local values array
      $local_values_array[$fieldattr['fieldcorename']] = $sampleData;
    }
  }

  // ** This is sort of hard coded for now..
  // ** But I do NOT want to send a co-applicant if dmsapp_coapp_status is set to N
  if (!HCU_array_key_exists('dmsapp_coapp_status', $local_values_array) || $local_values_array['dmsapp_coapp_status'] == "N") {
    // ** REMOVE the "C" co-applicant from array
    unset($core_values_array['C']);
  }

  // ** Based on the return format, format the code appropriately
  $formatData = HCU_array_key_exists('configLoanFormat', $pCurrentConfig) ? 
    $pCurrentConfig['configLoanFormat'] :
    "";
  switch ($formatData) {
    case 'XML':
      $dataExport = assocArrayToXML('NewLoanApplication', $core_values_array);
      // $dataExport = generate_valid_xml_from_array($core_values_array,"NewLoanApplication");
      // header ('Content-type: text/xml');
      break;
    case 'SERIAL':
      $dataExport = serialize($core_values_array);
      break;
    case 'JSON':
      // header ('Content-type: application/json');
      $dataExport = HCU_JsonEncode($core_values_array);
      break;
    default:
      $dataExport = print_r($core_values_array, true);

  }
  return $dataExport;
}


function generate_xml_from_array($array, $node_name) {
    $xml = '';

    if (is_array($array) || is_object($array)) {
        foreach ($array as $key=>$value) {
            if (is_numeric($key)) {
                $key = $node_name;
            }

            $xml .= '<' . $key . '>' . "\n" . generate_xml_from_array($value, $node_name) . '</' . $key . '>' . "\n";
        }
    } else {
        $xml = htmlspecialchars($array, ENT_QUOTES) . "\n";
    }

    return $xml;
}
function generate_valid_xml_from_array($array, $node_block='nodes', $node_name='node') {
  $xml = '<?xml version="1.0" encoding="UTF-8" ?>' . "\n";

  $xml .= '<' . $node_block . '>' . "\n";
  $xml .= generate_xml_from_array($array, $node_name);
  $xml .= '</' . $node_block . '>' . "\n";

  return $xml;
}
function assocArrayToXML($root_element_name,$ar)
{
    $xml = new SimpleXMLElement("<?xml version=\"1.0\"?><{$root_element_name}></{$root_element_name}>");
    $f = create_function('$f,$c,$a','
            foreach($a as $k=>$v) {
                if(is_array($v)) {
                    $ch=$c->addChild($k);
                    $f($f,$ch,$v);
                } else {
                    $c->addChild($k,$v);
                }
            }');
    $f($f,$xml,$ar);
    return $xml->asXML();
}