function obterExecucaoOrcamentaria($codigoprograma, $exercicio)
{
agora("Obtendo execuções orçamentárias do programa '{$codigoprograma}'.");
$configuracao = ConfigWs::factory()->getSiopConfig('quantitativo');
$programaParametros = array('credencial' => retornaCredenciais($configuracao), 'filtro' => array('anoExercicio' => $exercicio, 'programas' => array('programa' => $codigoprograma)), 'selecaoRetorno' => array('acao' => true, 'dotAtual' => true, 'empLiquidado' => true, 'empenhadoALiquidar' => true, 'programa' => true, 'unidadeOrcamentaria' => true));
$programasDTO = acessarWebServiceSOF('consultarExecucaoOrcamentaria', $programaParametros, $configuracao, 'execucoesOrcamentarias');
return $programasDTO;
}
<?php
include_once dirname(__FILE__) . '/include.soap.php';
$ambiente = 'dsv';
define('CF_APP_BASE_PATH', realpath(__DIR__) . '/../../../..');
define('CF_APP_ENVIRONMENT', $ambiente);
include_once dirname(__FILE__) . '/ConfigWs.php';
ConfigWs::factory()->buildDBConfig()->buildAppConstants()->buildAppDefines()->buildEnvironment();
$exec = obterAcoesPorPrograma('0911', '2014');
print_r($exec);
define('CF_APP_ENVIRONMENT', 'dsv');
require_once '../ConfigWs.php';
require_once '../lib/Log.php';
require_once 'arraysDominios.php';
$sqlInsert = 'INSERT INTO sgdoc.tb_pessoa_siorg_carga (co_orgao, co_orgao_pai, link_tipo_orgao, co_tipo_orgao, no_tipo_orgao, link_tipo_unidade, no_orgao, sg_orgao,
link_endereco, link_contato, in_organizacao, tx_versao_consulta)
VALUES (:co_orgao, :co_orgao_pai, :link_tipo_orgao, :co_tipo_orgao, :no_tipo_orgao, :link_tipo_unidade, :no_orgao, :sg_orgao,
:link_endereco, :link_contato, :in_organizacao, :tx_versao_consulta);';
/*
* Em virtude do tamanho do arquivo, ele será lido como um arquivo txt,
* linha a linha, e cada linha será convertida, como um string xml, para um objeto
*/
$arqDadosXml = 'dados.txt';
$log = new Log('.', 'cargaSiorg');
$log->setPrintScreen(true);
$cnnBanco = ConfigWs::factory()->getConnection();
try {
$log->addLog("Abrindo arquivo de dados [{$arqDadosXml}]");
$hdlDados = fopen($arqDadosXml, 'r');
libxml_use_internal_errors(true);
if ($hdlDados) {
$l = 0;
$tmp = '';
$strXml = '';
$cnnBanco->beginTransaction();
$log->addLog('Limpando tabela destino');
$cnnBanco->prepare('truncate sgdoc.tb_pessoa_siorg_carga;')->execute();
$stmt = $cnnBanco->prepare($sqlInsert);
$log->addLog('Início da leitura dos dados');
while (($linha = fgets($hdlDados)) !== false) {
$l++;
