setAction( $pgProc ); $obForm->setTarget( "oculto" ); $obRFolhaPagamentoFolhaSituacao = new RFolhaPagamentoFolhaSituacao(new RFolhaPagamentoPeriodoMovimentacao); $obTFolhaPagamentoBeneficioEvento = new TFolhaPagamentoBeneficioEvento; $obTFolhaPagamentoBeneficioEvento->recuperaRelacionamento($rsBeneficioEvento," AND beneficio_evento.cod_tipo = 1 ","",$boTransacao); //DEFINICAO DOS COMPONENTES $obHdnAcao = new Hidden; $obHdnAcao->setName ( "stAcao" ); $obHdnAcao->setValue( $stAcao ); $obHdnCtrl = new Hidden; $obHdnCtrl->setName ( "stCtrl" ); $obHdnCtrl->setValue( $stCtrl ); $obIBscEvento = new IBscEvento("inCodigoEvento","stEvento"); $obIBscEvento->obBscInnerEvento->setRotulo( "Evento de Desconto de Vale-Transporte" ); $obIBscEvento->addNaturezasAceitas ( "D" ); $obIBscEvento->setNaturezaChecked ( "D" ); $obIBscEvento->setEventoSistema ( true ); $obIBscEvento->obBscInnerEvento->obCampoCod->setValue( $rsBeneficioEvento->getCampo("codigo") ); $obIBscEvento->obBscInnerEvento->setValue( trim($rsBeneficioEvento->getCampo("descricao")) ); $obIBscEvento->obBscInnerEvento->obCampoCodHidden->setValue( $rsBeneficioEvento->getCampo("cod_evento") ); $obIBscEventoPlanoSaude = new IBscEvento('inCodigoEventoSaude','stEventoSaude'); $obIBscEventoPlanoSaude->obBscInnerEvento->setRotulo ( "Evento de Desconto de Plano de Saúde" ); $obIBscEventoPlanoSaude->addNaturezasAceitas( "D" ); $obIBscEventoPlanoSaude->setNaturezaChecked( "D" ); $obIBscEventoPlanoSaude->setEventoSistema( true ); // aqui é montado campo para se buscar o fornecedor do plano que será vinculado com o layout. $obCGMFornecedor = new IPopUpCGMVinculado($obForm); $obCGMFornecedor->setTabelaVinculo( 'compras.fornecedor' ); $obCGMFornecedor->setCampoVinculo( 'cgm_fornecedor' ); $obCGMFornecedor->setNomeVinculo( 'Fornecedor do plano' ); $obCGMFornecedor->setRotulo( 'Fornecedor do plano' ); $obCGMFornecedor->setName( 'stCGMFornecedor' ); $obCGMFornecedor->setId( 'stCGMFornecedor' ); $obCGMFornecedor->obCampoCod->setName( 'inCGMFornecedor' ); $obCGMFornecedor->obCampoCod->setId( 'inCGMFornecedor' ); $obCGMFornecedor->stTipo = "vinculadoPlanoSaude"; $obCGMFornecedor->setNull(true); //Botão para Incluir / Limpar $obBtnIncluir = new Button; $obBtnIncluir->setId('btnIncluir'); $obBtnIncluir->setValue('Incluir'); $obBtnIncluir->obEvento->setOnClick("montaParametrosGET('incluirPlano', 'inCGMFornecedor,inCodigoEventoSaude');"); $obBtnLimpar = new Button; $obBtnLimpar->setValue('Limpar'); $obBtnLimpar->obEvento->setOnClick("executaFuncaoAjax('limparPlano');"); $obSpnLista = new Span; $obSpnLista->setId('spnLista'); $obSpnLista->setValue($stHTML); //DEFINICAO DO FORMULARIO $obFormulario = new Formulario; $obFormulario->addForm ( $obForm ); $obFormulario->addTitulo( $obRFolhaPagamentoFolhaSituacao->consultarCompetencia() ,"right" ); $obFormulario->addHidden( $obHdnAcao ); $obFormulario->addHidden( $obHdnCtrl ); $obFormulario->addTitulo( "Configuração do Cálculo de Benefícios" ); $obFormulario->addTitulo( "Vale-Transporte" ); $obIBscEvento->geraFormulario( $obFormulario ); $obFormulario->addTitulo( "Plano de Saúde" ); $obFormulario->addComponente( $obCGMFornecedor ); $obIBscEventoPlanoSaude->geraFormulario( $obFormulario ); $obFormulario->agrupaComponentes(array($obBtnIncluir, $obBtnLimpar)); $obFormulario->addSpan($obSpnLista); $obFormulario->Ok(); $obFormulario->show(); $jsOnLoad = "executaFuncaoAjax('carregaPlanos');"; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php';