Documentação do Projeto
WEBINTEGRATOR - Documentação de projeto
Projeto: csw Título: Sistema Web Consistem 23/07/2008 16:26

Projeto Páginas Grids Eventos Downloads Uploads Variáveis Classes Java

 
[tele/relatorio/orcamentopdf] Relatório de Orçamento: Pré-Página
Tipo:Objeto
Descrição:Seleciono os dados da empresa
Condição:true
Objeto:tmp.empresa
Banco de dados:principal
Filtro SQL:%*?'
Instrução SQL:&sql Select nome, endereco, bairro, SUBSTRING(CEP,1,5)||"-"||SUBSTRING(CEP,6,8) as CEP, nomeCidade, estado, telefone, telefax from Cad.Empresa where codigo = "|pvt.login.idEmpresa|"

Tipo:Objeto
Descrição:Verifica se o contato é um CLIENTE
Condição:true
Objeto:tmp.orc
Banco de dados:principal
Filtro SQL:%*?'
Instrução SQL:&sql Select cliente,contatos,numOrcamento as numOrcamento
from Tel.OrcamentoCapa
where Empresa->codigo = "|pvt.login.idEmpresa|"
and numOrcamento = "|tmp.numOrcamento|"

Tipo:Objeto
Descrição:Seleciono os dados da capa do Orcamento (TABELA CONTATOS)
Condição:|tmp.orc.contatos|!=
Objeto:tmp.orc
Banco de dados:principal
Filtro SQL:%*?'
Instrução SQL:&sql Select top 1 %external(orc.dataEmissao) as dataEmissao,
orc.Contatos->razaosocial as nomeCliente,
orc.Cliente->codCliente as codCliente,
orc.Contatos->endereco as endCliente,
orc.Contatos->bairro as bairroCliente,
SUBSTRING(orc.Contatos->cepCompleto,1,5)||"-"||SUBSTRING(orc.Contatos->cepCompleto,6,8) as CEPCliente,
orc.Contatos->Cidade->nome as cidadeCliente,
orc.Contatos->nomeEstado as estadoCliente,
orc.Contatos->telefone as telefone,
orc.Contatos->fax as fax,
%EXTERNAL(orc.tipoDesconto) as tipoDesconto,
%EXTERNAL(orc.desconto1) as desconto1,
%EXTERNAL(orc.desconto2) as desconto2,
%EXTERNAL(orc.desconto3) as desconto3,
%EXTERNAL(orc.desconto4) as desconto4,
%EXTERNAL(orc.desconto5) as desconto5,
%EXTERNAL(orc.desconto6) as desconto6,
%EXTERNAL(orc.percentualAcrescimo1) as percentualAcrescimo1,
%EXTERNAL(orc.percentualAcrescimo2) as percentualAcrescimo2,
%EXTERNAL(orc.percentualAcrescimo3) as percentualAcrescimo3,
%EXTERNAL(orc.percentualAcrescimo4) as percentualAcrescimo4,
orc.prazoFaturamento as prazoFaturamento,
orc.validadeOrcamento as validadeOrcamento,
orc.TipoFrete->codTipoFrete as codTipoFrete,
orc.TipoFrete->descricao as nomeTipoFrete,
orc.CondicaoPagamento->codigo as codCondicaoPagamento,
orc.CondicaoPagamento->descricao as nomeCondicaoPagamento,
%external(orc.totalOrcamentoAntes) as totalOrcamentoAntes,
%external(orc.totalOrcamento) as totalOrcamento,
%external(orc.valorDesconto) as valorDesconto,
%external(orc.valorAcrescimo) as valorAcrescimo,
orc.Atendente->codRepresent as codAtendente,
orc.Atendente->fantasia as nomeAtendente,
orc.Atendente->email as emailAtendente,
orc.Atendente->telefone as foneAtendente,
orc.observacaoOrcamento as observacao,
nvl(orc.Contatos->email,orc.Pessoas->email) as email,
orc.Contatos->codContato,
orc.Moeda->codigo as codMoeda,
orc.Moeda->descricao as nomeMoeda,
orc.Moeda->simbologia as simbologia,
orc.Pessoas->sequencial as pessoa,
orc.Pessoas->nome as pessoadesc,
orc.Pessoas->cargo as pessoacargo,
orc.Pessoas->telefone as pessoafone,
orc.Transportadora->codigo as codtransportadora,
orc.Transportadora->fantasia as transportadora,
orc.Consignatario->codigo as codconsignataria,
orc.Consignatario->fantasia as consignataria,
orc.Representante->codRepresent as codrepresentante,
orc.Representante->fantasia as representante,
orc.CondicaoPagamento1->descricao as nomeCondicaoPagamento1,
orc.CondicaoPagamento2->descricao as nomeCondicaoPagamento2,
orc.CondicaoPagamento3->descricao as nomeCondicaoPagamento3,
orc.CondicaoPagamento4->descricao as nomeCondicaoPagamento4,
orc.obsConfirmaPedido,orc.arquivoAnexo as nomeArquivo,
$$piece^CSWUTI(arquivoAnexo,'.',$$Length^CSWUTI(arquivoAnexo,'.')) as extArq,
nvl(orc.Pessoas->email,orc.Cliente->email) as emailCliente,
orc.pedidocli as pedidocli,
(select cargo from Tel.AtendenteUsuario where Empresa->codigo='|pvt.login.idEmpresa|'and atendente->codRepresent=orc.Atendente->codRepresent) as cargoAtend
from Tel.OrcamentoCapa as orc, Fat.CliComplemento2 as cli
where orc.Empresa->codigo = "|pvt.login.idEmpresa|"
and orc.numOrcamento = "|tmp.numOrcamento|"
and orc.Empresa->codigo =* cli.codEmpresa->codigo
and orc.Cliente->codCliente =* cli.codCliente

Tipo:Objeto
Descrição:Seleciono os dados da capa do Orcamento (TABELA CLIENTES)
Condição:|tmp.orc.contatos|=
Objeto:tmp.orc
Banco de dados:principal
Filtro SQL:%*?'
Instrução SQL:&sql Select %external(orc.dataEmissao) as dataEmissao,
orc.Cliente->nome as nomeCliente,
orc.Cliente->codCliente as codCliente,
orc.Cliente->endereco as endCliente,
orc.Cliente->bairro as bairroCliente,
SUBSTRING(orc.Cliente->CEP,1,5)||"-"||SUBSTRING(orc.Cliente->CEP,6,8) as CEPCliente,
orc.Cliente->nomecidade as cidadeCliente,
orc.Cliente->nomeEstado as estadoCliente,
orc.Contatos->telefone as telefone,
orc.Contatos->fax as fax,
%EXTERNAL(orc.tipoDesconto) as tipoDesconto,
%EXTERNAL(orc.desconto1) as desconto1,
%EXTERNAL(orc.desconto2) as desconto2,
%EXTERNAL(orc.desconto3) as desconto3,
%EXTERNAL(orc.desconto4) as desconto4,
%EXTERNAL(orc.desconto5) as desconto5,
%EXTERNAL(orc.desconto6) as desconto6,
%EXTERNAL(orc.percentualAcrescimo1) as percentualAcrescimo1,
%EXTERNAL(orc.percentualAcrescimo2) as percentualAcrescimo2,
%EXTERNAL(orc.percentualAcrescimo3) as percentualAcrescimo3,
%EXTERNAL(orc.percentualAcrescimo4) as percentualAcrescimo4,
orc.prazoFaturamento as prazoFaturamento,
orc.validadeOrcamento as validadeOrcamento,
orc.TipoFrete->codTipoFrete as codTipoFrete,
orc.TipoFrete->descricao as nomeTipoFrete,
orc.CondicaoPagamento->codigo as codCondicaoPagamento,
orc.CondicaoPagamento->descricao as nomeCondicaoPagamento,
%external(orc.totalOrcamentoAntes) as totalOrcamentoAntes,
%external(orc.totalOrcamento) as totalOrcamento,
%external(orc.valorDesconto) as valorDesconto,
%external(orc.valorAcrescimo) as valorAcrescimo,
orc.Atendente->codRepresent as codAtendente,
orc.Atendente->fantasia as nomeAtendente,
orc.Atendente->email as emailAtendente,
orc.Atendente->telefone as foneAtendente,
orc.observacaoOrcamento as observacao,
nvl(orc.Contatos->email,orc.Pessoas->email) as email,
orc.Contatos->codContato,
orc.Moeda->codigo as codMoeda,
orc.Moeda->descricao as nomeMoeda,
orc.Moeda->simbologia as simbologia,
orc.Pessoas->sequencial as pessoa,
orc.Pessoas->nome as pessoadesc,
orc.Pessoas->cargo as pessoacargo,
orc.Pessoas->telefone as pessoafone,
orc.Transportadora->codigo as codtransportadora,
orc.Transportadora->fantasia as transportadora,
orc.Consignatario->codigo as codconsignataria,
orc.Consignatario->fantasia as consignataria,
orc.Representante->codRepresent as codrepresentante,
orc.Representante->fantasia as representante,
orc.CondicaoPagamento1->descricao as nomeCondicaoPagamento1,
orc.CondicaoPagamento2->descricao as nomeCondicaoPagamento2,
orc.CondicaoPagamento3->descricao as nomeCondicaoPagamento3,
orc.CondicaoPagamento4->descricao as nomeCondicaoPagamento4,
orc.obsConfirmaPedido,orc.arquivoAnexo as nomeArquivo,
$$piece^CSWUTI(arquivoAnexo,'.',$$Length^CSWUTI(arquivoAnexo,'.')) as extArq,
nvl(orc.Pessoas->email,orc.Cliente->email) as emailCliente,
orc.pedidocli,
(select cargo from Tel.AtendenteUsuario where Empresa->codigo='|pvt.login.idEmpresa|'and atendente->codRepresent=orc.Atendente->codRepresent) as cargoAtend
from Tel.OrcamentoCapa as orc
where orc.Empresa->codigo = "|pvt.login.idEmpresa|"
and orc.numOrcamento = "|tmp.numOrcamento|"

Tipo:Objeto
Descrição:Busca o total de IPI e total liquido c/ IPI
Condição:true
Objeto:tmp.orc
Banco de dados:principal
Filtro SQL:%*?'
Instrução SQL:&sql select $$EdtVlr^CSWUTI(Sum(valorIPI),2) as totIPI,
$$EdtVlr^CSWUTI(Sum(valorIPI)+sum(totalItem),2) as totIPILiq
from tel.orcamentoitem
where numOrcamento="|tmp.numOrcamento|"
and Empresa->codigo="|pvt.login.idEmpresa|"

Tipo:Objeto
Descrição:Verifica se tem Moeda
Condição:true
Objeto:tmp.temmoeda
Banco de dados:principal
Filtro SQL:%*?'
Instrução SQL:&sql Select variasMoedas
from Fat.Configuracao
where codEmpresa->codigo="|pvt.login.idEmpresa|"


Tipo:Objeto
Descrição:Seleciono a Consignátaria
Condição:false
Objeto:tmp.orc
Banco de dados:principal
Filtro SQL:%*?'
Instrução SQL:&sql select
codConsignatario->codigo as codconsignataria,
codConsignatario->fantasia as consignataria
from Fat.CliTransportadora
where codEmpresa->codigo = '|pvt.login.idEmpresa|'
and codTransportadora->codigo = '|tmp.orc.codtransportadora|'
and codigo = '|tmp.orc.codCliente|'

Tipo:Objeto
Descrição:Seleciono as condicoes de Pagamento caso tenha cadastrado 99
Condição:true
Objeto:tmp.condpagto
Banco de dados:principal
Filtro SQL:%*?'
Instrução SQL:Tel.OrcamentoCondVenda.retornaDescricoes("|pvt.login.idEmpresa|","|tmp.numOrcamento|")

Tipo:Gravar variáveis
Descrição:Inicializo a variavel tmp.orc.codCondPagamento
Condição:|tmp.orc.codCondicaoPagamento|=
Objetos:tmp.orc.codCondicaoPagamento, tmp.orc.nomeCondicaoPagamento
Recursivo:Não
Processa FALSO:Não
Condição verdadeira:99,|tmp.condpagto.descricao|

Tipo:Objeto
Descrição:Seleciono da Configuracao o email de contato da empresa
Condição:true
Objeto:tmp.email
Banco de dados:principal
Filtro SQL:%*?'
Instrução SQL:&sql Select emailContatoEmpresa from Tel.Configuracao where Empresa->codigo = "|pvt.login.idEmpresa|"

Tipo:Gravar variáveis
Descrição:Inicializa a variavel tmp.mostrar.moeda
Condição:|tmp.temmoeda.variasMoedas|=0
Objetos:tmp.mostrar.moeda
Recursivo:Não
Processa FALSO:Não
Condição verdadeira:none

Tipo:Objeto
Descrição:Verifica se existe imagem cadastrada
Condição:true
Objeto:tmp.
Banco de dados:principal
Filtro SQL:%*?'
Instrução SQL:&sql select imagem,imagem2,
Upper(imagem->extensaoArquivo) extImg,
Upper(imagem2->extensaoArquivo) extImg2
from tel.configuracao
where Empresa->codigo="|pvt.login.idEmpresa|"

Tipo:Gravar variáveis
Descrição:Download imagem
Condição:|tmp.imagem|!=
Objetos:tmp.logo
Recursivo:Não
Processa FALSO:Sim
Condição verdadeira:

Tipo:Gravar variáveis
Descrição:Download imagem secundaria
Condição:|tmp.imagem2|!=
Objetos:tmp.logo2
Recursivo:Não
Processa FALSO:Sim
Condição verdadeira:



Tipo:Objeto
Descrição:Verifica quais campos não devem aparecer no orçamento
Condição:true
Objeto:tmp.cpBloq
Banco de dados:principal
Filtro SQL:%*?'
Instrução SQL:&sql
select
tel.bloqImpVlrLiq as bloqImpVlrLiq,
tel.visImpIPI,possuiAnexo,
tel.mostrarITDadosTrefilacao,
tel.mostrarITICMS,
tel.mostrarCPAssinaturaCli,
ISNULL(tel.mostrarCPAssinaturaAtend,1) as mostrarCPAssinaturaAtend,
tel.mostrarCPPedCli,
fat.dtPrevisaoItem as permitirDataPrevisaoItem,
fat.habilitarObsItem as permitirObsItem,
ISNULL(tel.posicaoDadosAtendOrc,0) as posicao,
ISNULL(tel.mostrarDadosCliente,1) as mostrarDadosCliente,
tel.mostrarCompOrcamento as mostrarCompOrcamento,
$$TrocaPalavra^CSWUTI(tel.complementoOrcamento,{fn CHAR(13)},"
") as complementoOrcamento,
tel.mostrarDadosRepres as mostrarDadosRepres,
substring(%External(tel.mostrarTxtPrazo),1,3) as txtPrazo,
ISNULL(tel.mostrarDadosEmpresa,1) as mostrarDadosEmpresa,
ISNULL(tel.formatoEmail,0) as formatoEmail
from Tel.Configuracao as tel,Fat.Configuracao as Fat
where
Tel.Empresa->codigo = |pvt.login.idEmpresa|
and Tel.Empresa->codigo=fat.codEmpresa->codigo


Tipo:Incluir arquivo
Descrição:Importa o arquivo
Condição:|tmp.orc.extArq|=TXT&&|tmp.cpBloq.possuiAnexo|=1
Objeto:tmp.arquivo
Processa variáveis:Não

Tipo:Gravar variáveis
Descrição:Download arquivo anexos
Condição:((|tmp.orc.extArq|=BMP) || (|tmp.orc.extArq|=JPG) || (|tmp.orc.extArq|=GIF))&&(|tmp.cpBloq.possuiAnexo|=1)
Objetos:tmp.arquivo
Recursivo:Não
Processa FALSO:Não
Condição verdadeira:

Tipo:Referência a grid
Condição:true
Tipo de grid:SQLS
Nome do grid:TelItensOrcRel

Tipo:Gravar variáveis
Descrição:Grava os totais - ( Mostrar Valor liquido e mostrar IPI)
Condição:|tmp.cpBloq.bloqImpVlrLiq|=1&&|tmp.cpBloq.visImpIPI|=1
Objetos:tmp.gridTotais
Recursivo:Não
Processa FALSO:Não
Condição verdadeira:








Totais |$if(|tmp.orc.codMoeda|=,,|tmp.orc.simbologia|)$| |tmp.orc.totalOrcamento| |tmp.orc.totIPI| |tmp.orc.totIPILiq|

Tipo:Gravar variáveis
Descrição:Grava os totais - ( Mostrar Valor liquido e Não mostrar IPI)
Condição:|tmp.cpBloq.bloqImpVlrLiq|=1&&|tmp.cpBloq.visImpIPI|=0
Objetos:tmp.gridTotais
Recursivo:Não
Processa FALSO:Não
Condição verdadeira:




|$if(|tmp.cpBloq.mostrarITICMS|=1,,$|


Totais |$if(|tmp.orc.codMoeda|=,,|tmp.orc.simbologia|)$| |tmp.orc.totalOrcamento|

Tipo:Gravar variáveis
Descrição:Grava os totais - ( Não Mostrar Valor liquido e Mostrar IPI)
Condição:|tmp.cpBloq.bloqImpVlrLiq|=0&&|tmp.cpBloq.visImpIPI|=1
Objetos:tmp.gridTotais
Recursivo:Não
Processa FALSO:Não
Condição verdadeira:











Totais |$if(|tmp.orc.codMoeda|=,,|tmp.orc.simbologia|)$| |tmp.orc.totalOrcamentoAntes| |tmp.orc.valorDesconto| |tmp.orc.valorAcrescimo| |tmp.orc.totalOrcamento| |tmp.orc.totIPI| |tmp.orc.totIPILiq|

Tipo:Gravar variáveis
Descrição:Grava os totais - ( Não Mostrar Valor liquido e Não mostrar IPI)
Condição:|tmp.cpBloq.bloqImpVlrLiq|=0&&|tmp.cpBloq.visImpIPI|=0
Objetos:tmp.gridTotais
Recursivo:Não
Processa FALSO:Não
Condição verdadeira:







|$if(|tmp.cpBloq.mostrarITICMS|=1,,$|

Totais |$if(|tmp.orc.codMoeda|=,,|tmp.orc.simbologia|)$| |tmp.orc.totalOrcamentoAntes| |tmp.orc.valorDesconto| |tmp.orc.valorAcrescimo| |tmp.orc.totalOrcamento|


Tipo:Gravar variáveis
Descrição:Gravar complementos do orçamento
Condição:|tmp.cpBloq.mostrarCompOrcamento|=0
Objetos:tmp.cpBloq.complementoOrcamento
Recursivo:Não
Processa FALSO:Não

Tipo:Objeto
Descrição:Busca os dados do representante
Condição:|tmp.cpBloq.mostrarDadosRepres|=1
Objeto:tmp.rep
Banco de dados:principal
Filtro SQL:%*?'
Instrução SQL:&sql select
nome,telefone,teleFax,telexCelular,email from fat.representante
where codRepresent="|tmp.orc.codrepresentante|"
and codEmpresa->codigo="|pvt.login.idEmpresa|"

Tipo:Gravar variáveis
Descrição:Grava os dados do Representante
Condição:|tmp.cpBloq.mostrarDadosRepres|=1
Objetos:tmp.dadosRep
Recursivo:Não
Processa FALSO:Não
Condição verdadeira:






















C/ Cópia:  
Representante: |tmp.rep.nome|
Telefone : |tmp.rep.telefone| Fax : |tmp.rep.teleFax| Celular : |tmp.rep.telexCelular|
E-mail : |tmp.rep.email|

Tipo:Gravar variáveis
Descrição:Grava os dados do Representante abaixo do atendente
Condição:|tmp.cpBloq.mostrarDadosRepres|=1
Objetos:tmp.dadosRep2
Recursivo:Não
Processa FALSO:Não
Condição verdadeira:





Representante: 
|tmp.orc.representante|


Tipo:Incluir arquivo
Descrição:Importar Modelo de e-mail
Condição:|tmp.numOrcamento|!=&&|tmp.cpBloq.formatoEmail|=0
Objeto:tmp.arqteste
Processa variáveis:Sim