<?php
/**
 * Copyright 2005-2017 de Solis Soluções Livres Ltda.
 *
 * Este arquivo é parte do programa Gnuteca.
 *
 * O Gnuteca é um software de propriedade da SOLIS, sendo desenvolvido
 * e mantido exclusivamente por esta empresa.
 *
 * A licença de uso está disponível mediante aquisição exclusiva junto à
 * SOLIS. A licença é concedida sem caráter de exclusividade ao licenciado.
 * Os direitos de uso são perpétuos.
 *
 * Embora os códigos fontes sejam fornecidos, o software é de propriedade
 * da SOLIS, não sendo permitido ao adquirente da licença a sua revenda,
 * empréstimo ou cessão (onerosa ou não) à terceiros. Também não é permitido,
 * a qualquer título e tempo, promover no software qualquer tipo de alienação,
 * reprodução, distribuição, divulgação, registro, licenciamento, transferência
 * ou qualquer outro ato que prejudique ou comprometa os direitos de propriedade
 * de software, o nome e a imagem da sua proprietária e do próprio software,
 * além de configurar concorrência à SOLIS.
 *
 * O licenciado, com o acesso ao código fonte do software, terá o direito de
 * promover mudanças no respectivo código. No entanto, nas situações em que ele
 * contar com o suporte oficial prestado pela SOLIS, não poderá promover mudanças
 * no código fonte, sob pena de perda do referido suporte.
 *
 * Para conhecer em detalhes o Termo de Licenciamento do Software Gnuteca
 * leia o arquivo “LICENCA.txt” disponível junto ao código deste software.
 * 
 * 
 * Business da verificação de inventário
 *
 *
 *
 *
 *
 **/

class BusinessGnuteca3BusInventoryCheck extends GBusiness
{
    public $libraryUnitId,
           $exemplaryStatusId,
           $beginClassification,
           $endClassification,
           $inventory;
    
    /**
     * Obtem exemplares não encontrados e fora de lugar 
     * 
     * @return array de dados 
     */
    public function inventoryCheck()
    {
        $MIOLO = MIOLO::getInstance();
        
        //prepara o conteúdo por PHP por questões de otimização
        $this->beginClassification = strtoupper(BusinessGnuteca3BusMaterial::prepareSearchContent('090.a', $this->beginClassification));
        $this->endClassification = strtoupper(BusinessGnuteca3BusMaterial::prepareSearchContent('090.a', $this->endClassification));
        
        //cria tabela temporária
        $this->db->execute("CREATE TEMP TABLE gtcTmpInventary (itemNumber varchar)");
        $exemplarys = explode("\n", $this->inventory);
        
        //insere exemplares na tabela temporária
        if ( is_array($exemplarys) )
        {
            foreach( $exemplarys as $i => $itemNumber )
            {
                if ( strlen($itemNumber) > 0 )
                {
                    $this->db->execute($sq[$i] = "INSERT INTO gtcTmpInventary VALUES (trim('{$itemNumber}', '\r')); \n");
                }
            }
        }
       
        $result = array();
        
        $missing = $this->verifyMissedExemplarys(); //busca exemplares não encontrados
       
        $wrong = $this->verifyWrongExemplarys(); //busca exemplares que estão fora de lugar
        
        //faz o merge dos perdisos e fora de lugar
        if ( is_array($missing) && is_array($wrong) )
        {
            $result = array_merge($missing, $wrong);
        }
        else if ( is_array($missing) )
        {
            $result = $missing;
        }
        else if ( is_array($wrong) )
        {
            $result = $wrong;
        }
        
        return $result;
    }
    
    /**
     * Método que busca exemplares que não se encontram na lista de exemplares
     * 
     * @return array de dados 
     */
    private function verifyMissedExemplarys()
    {
        $MIOLO  = MIOLO::getInstance();
        $module = MIOLO::getCurrentModule();
        $busSearchFormat = $MIOLO->getBusiness($module, 'BusSearchFormat');
        
        $data = array($this->beginClassification, 
                      $this->endClassification);
        
        $sql = " SELECT A.controlnumber,
                        'data',
                        B.itemNumber,
                        C.description,
                        'Não encontrado'
                   FROM gtcMaterial A
             INNER JOIN gtcExemplaryControl B
                     ON (A.controlNumber = B.controlNumber)
             INNER JOIN gtcExemplaryStatus C
                     ON (B.exemplaryStatusId = C.exemplaryStatusId)
                  WHERE A.fieldid = '090' 
                    AND A.subfieldid = 'a'
                    AND UPPER(split_part(A.searchcontent, '@', 1)) BETWEEN ? AND ?
                    AND B.itemnumber NOT IN (SELECT itemNumber FROM gtcTmpInventary)";
        
        if ( $this->exemplaryStatusId )
        {
            $status = implode(',', $this->exemplaryStatusId);
            $sql .= " AND B.exemplaryStatusId IN ({$status}) ";
        }
        
        if ( $this->libraryUnitId )
        {
            $sql .= " AND B.libraryUnitId = ? ";
            $data[] = $this->libraryUnitId;
        }
        
        $sql = $this->prepare($sql, $data);

        $result = $this->query($sql);
        
        foreach ( $result as $key => $line )
        {
            $result[$key][1] = strip_tags($busSearchFormat->getFormatedString($line[0], ADMINISTRATION_SEARCH_FORMAT_ID));
        }
        
        return $result;
    }
    
    /**
     * Método que busca exemplares que se encontram na lista e não se encontram na base de dados
     * 
     * @return array de dados 
     */
    private function verifyWrongExemplarys()
    {
        $MIOLO  = MIOLO::getInstance();
        $module = MIOLO::getCurrentModule();
        $busSearchFormat = $MIOLO->getBusiness($module, 'BusSearchFormat');
        
        //sql interno
        $this->MSQL->clear();
        
        $data = array($this->beginClassification, 
                      $this->endClassification);
        
        $this->setTables('gtcMaterial A
               INNER JOIN gtcExemplaryControl B
                       ON (A.controlNumber = B.controlNumber)');

        $this->setColumns("B.itemnumber");
        
        $this->setWhere ("A.fieldid = '090' 
                      AND A.subfieldid = 'a'
                      AND UPPER(split_part(A.searchcontent, '@', 1)) BETWEEN ? AND ?");
        
        if ( $this->exemplaryStatusId )
        {
            $status = implode(',', $this->exemplaryStatusId);
            $this->setWhere("B.exemplaryStatusId IN ({$status})");
        }
        
        if ( $this->libraryUnitId )
        {
            $this->setWhere('B.libraryUnitId = ?');
            $data[] = $this->libraryUnitId;
        }
        
        $internalSql = $this->select($data);
        
        //sql externo
        $this->MSQL->clear();
        
        $this->setColumns('*');
        $this->setTables("gtcTmpInventary");
        $this->setWhere("itemNumber NOT IN ({$internalSql})");
       
        $sqlItemNumber = $this->select();
        
        $this->clear();
        $this->setTables('gtcExemplaryControl A
               INNER JOIN gtcExemplaryStatus B
                       ON (A.exemplaryStatusId = B.exemplaryStatusId)');
        
        $this->setColumns("A.controlnumber,
                          'data',
                          A.itemnumber,
                          B.description,
                          'Fora de lugar'");
        
        $this->setWhere("A.itemnumber IN ($sqlItemNumber)");
                
        $sql = $this->select();

        $result = $this->query($sql);
        
        foreach ( $result as $key => $line )
        {
            $result[$key][1] = strip_tags($busSearchFormat->getFormatedString($line[0], ADMINISTRATION_SEARCH_FORMAT_ID));
        }
        
        return $result;
    }
    

}
?>
