#include "hgupstorematlist.h"
#define SQLCA_STORAGE_CLASS extern
#define ORACA_STORAGE_CLASS extern
#include <oraca.h>
#include <sqlca.h>

#define MAXCOMP 5

// ************************************************************************
// ----------------------  storeObj  -----------------------------------------
// ************************************************************************

long HGupStoreMatlist::storeObj() {

  // stores a new object in MATLIST

  if (materialIndex <= 0) {
    cerr << "error in HGupStoreMatlist::storeObj: materialIndex = "
         << materialIndex << endl;
    return -1;
  };

  EXEC SQL BEGIN DECLARE SECTION;
    int Material_Index[MAXCOMP];
    int Comp_Index[MAXCOMP];
    float Matlist_Weight[MAXCOMP];
    int RowsToInsert;
  EXEC SQL END DECLARE SECTION;

  nComp=compIndex.length();
  RowsToInsert=nComp;  
  if (nComp>MAXCOMP) {
    cerr << "number of components = " << nComp << " too large" << endl;
    return -1;
  }
  for (int i=0;i<nComp;i++) {
    Material_Index[i]=materialIndex;  
    Comp_Index[i]=compIndex[i];
    Matlist_Weight[i]=weight[i];
  }

  EXEC SQL WHENEVER SQLERROR DO
    sqlHandleError("sql error in HGupStoreMatlist::storeObj");

  EXEC SQL FOR : RowsToInsert INSERT INTO HADES_OPER.MATLIST
    (MATERIAL_INDEX, COMP_INDEX, MATLIST_WEIGHT)
    VALUES
    (:Material_Index, :Comp_Index, :Matlist_Weight);

  return sqlca.sqlcode;
}


// ************************************************************************
// ----------------------  printInput  ------------------------------------
// ************************************************************************

void HGupStoreMatlist::printInput() {

  HString bl="  ";
  cout << "Insert in table MATLIST" << '\n';
  cout << "MATERIAL_INDEX, COMP_INDEX, MATLIST_WEIGHT" << '\n';
  for (int i=0;i<nComp;i++) {
    cout << materialIndex << bl << compIndex[i] << bl << weight[i] << '\n';
  }
  cout << "-------------------------------------------------------"<< '\n';
  return;
}


// ************************************************************************
// ----------------------  writeInput  ------------------------------------
// ************************************************************************

void HGupStoreMatlist::writeInput(ofstream & fout) {
  // writes input to logfile

  HString bl="  ";
  fout << "Insert in table MATLIST" << '\n';
  fout << "MATERIAL_INDEX, COMP_INDEX, MATLIST_WEIGHT" << '\n';
  for (int i=0;i<nComp;i++) {
    fout << materialIndex << bl << compIndex[i] << bl << weight[i] << '\n';
  }
  fout << "-------------------------------------------------------"<< '\n';
  return;
}