| |
| [patrimonio/cadastros/itemcorpobackup] Frame Corpo da Tela de Item - Dados Gerais: Pré-Página |
| Tipo: | Objeto |
| Descrição: | Versão da Página |
| Condição: | true |
| Objeto: | tmp.versao |
| Banco de dados: | principal |
| Filtro SQL: | %*?' |
| Instrução SQL: | Utils.Utilities.versao('Pat.Versao') |
|
| Tipo: | Objeto |
| Descrição: | Item |
| Condição: | |tmp.btn|=||(|tmp.btn|=salvar&&|tmp.salvaritem.error|=1) |
| Objeto: | tmp.item |
| Banco de dados: | principal |
| Instrução SQL: | &sql Select codItem->id,
id as idItemMoeda,
codItem->codCentroCusto->mascaraEdt as mascaraCCusto,
codItem->codCentroCusto->nome as nomeCCusto,
codItem->codEstrutura->mascaraEdt as codEstrutura,
codItem->codEstrutura as idEstrutura,
codItem->codEstrutura->descricao as descEstrutura,
codItem->codFornecedor->codigo as codFornecedor,
codItem->codFornecedor->nome as nomeFornecedor,
%EXTERNAL(dataBaixa) as dataBaixa,
%EXTERNAL(dataIncorporacao) as dataIncorporacao,
%EXTERNAL(dataInicioDepreciacao) as dataInicioDepreciacao,
%EXTERNAL(dataInicioUso) as dataInicioUso,
codItem->itemGerencial,
%EXTERNAL(quantidadeOriginal) as quantidadeOriginal,
%EXTERNAL(quantidadeAtual) as quantidadeAtual,
$$EdtVlr^CSWUTI(vlrCorrOrig,numDecMoeda) as vlrCorrOrig,
$$EdtVlr^CSWUTI(vlrDeprAtual,numDecMoeda) as vlrDeprAtual,
$$EdtVlr^CSWUTI(vlrOrig,numDecMoeda) as vlrOrig,
$$EdtVlr^CSWUTI(vlrOrigIndex,numDecIndexDepr) as vlrOrigIndex,
$$EdtVlr^CSWUTI(vlrAtual,numDecMoeda) as vlrAtual,
$$EdtVlr^CSWUTI(vlrCorrDeprAtual,numDecMoeda) as vlrCorrDeprAtual,
$$EdtVlr^CSWUTI(vlrAtualIndex,numDecIndexDepr) as vlrAtualIndex,
$$EdtVlr^CSWUTI(vlrCorrOrigIndex,numDecIndexCorr) as vlrCorrOrigIndex,
$$EdtVlr^CSWUTI(vlrDeprAtualIndex,numDecIndexDepr) as vlrDeprAtualIndex,
$$EdtVlr^CSWUTI(vlrCorrDeprAtualIndex,numDecIndexCorr) as vlrCorrDeprAtualIndex,
codItem->codigoBarras,
codItem->numeroDocumento,
codItem->observacao,
codItem->serieDocumento as serieDocumento,
codItem->tipoDocumento,
$$EdtVlr^CSWUTI(vlrIndexCorr,numDecIndexCorr) as vlrIndexCorr,
$$EdtVlr^CSWUTI(vlrIndexDepr,numDecIndexDepr) as vlrIndexDepr,
%EXTERNAL(codItem->tipoItem) as tipoItem,
codItem->tipoItem as tpItem,
%EXTERNAL(codItem->dataEmissaoDoc) as dataEmissaoDoc,
codItem->itemNrFiscal as itemNrFiscal ,
$$EdtVlr^CSWUTI(codItem->vlrContabilDoc,numDecMoeda) as vlrContabilDoc
from Pat.ItemMoeda
where codItem->codEstrutura->configuracao = |tmp.empresa|
and codItem->codigoRdz= '|tmp.codigoRdz|'
and (codItem->tipoItem=2 or codItem->tipoItem=4)
and codMoeda = codItem->codEstrutura->configuracao->codMoedaAtiva |
|
| Tipo: | Objeto |
| Descrição: | Verifica se o item já não está Baixado, Transferido ou Depreciado Totalmente |
| Condição: | |tmp.item.idItemMoeda|!= |
| Objeto: | tmp.campos |
| Banco de dados: | principal |
| Instrução SQL: | Pat.Item.verificaItensBaixTransfDepr("|tmp.item.idItemMoeda|") |
|
| Tipo: | Gravar variáveis |
| Descrição: | Inicializa a variavel tmp.campos.habilitar |
| Condição: | |tmp.campos.habilitar|= |
| Objetos: | tmp.campos.habilitar |
| Recursivo: | Não |
| Processa FALSO: | Não |
| Condição verdadeira: | class='campos' |
|
| Tipo: | Gravar variáveis |
| Descrição: | Inicializa Váriáveis que habilita o botão das demais consultas ou não |
| Condição: | |tmp.jasalvou|=&&|tmp.item.mascaraCCusto|= |
| Objetos: | tmp.jasalvou |
| Recursivo: | Não |
| Processa FALSO: | Sim |
| Condição verdadeira: | false |
| Condição falsa: | true |
|
| Tipo: | Referência a combo |
| Condição: | true |
| Nome da combo: | PatItemGerencial |
| Selecionado: | |tmp.item.itemGerencial| |
|
| Tipo: | Referência a combo |
| Condição: | true |
| Nome da combo: | FisSerieDocumento |
| Selecionado: | |tmp.item.serieDocumento| |
|
| Tipo: | Referência a combo |
| Condição: | true |
| Nome da combo: | PatTpDocItem |
| Selecionado: | |tmp.item.tipoDocumento| |
|
| Tipo: | Objeto |
| Descrição: | Seleciona as decimais da moeda ativa |
| Condição: | true |
| Objeto: | tmp.moedaativa |
| Banco de dados: | principal |
| Instrução SQL: | &sql select codMoedaAtiva->codMoeda->numeroDecimais as decimais
from Pat.Configuracao
where codEmpresa = "|tmp.empresa|" |
|
| Tipo: | Objeto |
| Descrição: | Seleciona as decimais da moeda de depreciação |
| Condição: | true |
| Objeto: | tmp.moedadepr |
| Banco de dados: | principal |
| Instrução SQL: | &sql select codMoedaAtiva->codIndexDepr->numeroDecimais as decimais
from Pat.Configuracao
where codEmpresa = "|tmp.empresa|" |
|
| Tipo: | Objeto |
| Descrição: | Seleciona as decimais da moeda correção |
| Condição: | true |
| Objeto: | tmp.moedacorr |
| Banco de dados: | principal |
| Instrução SQL: | &sql select codMoedaAtiva->codIndexCorr->numeroDecimais as decimais
from Pat.Configuracao
where codEmpresa = "|tmp.empresa|" |
|
| Tipo: | Gravar variáveis |
| Descrição: | Inicializar os combos |
| Condição: | |tmp.item.id|= |
| Objetos: | tmp.item.tipoDocumento, tmp.item.serieDocumento, tmp.item.itemGerencial, tmp.item.tipoItem |
| Recursivo: | Não |
| Processa FALSO: | Não |
| Condição verdadeira: | 4,1,0,Com Saldo |
|
| Tipo: | Objeto |
| Descrição: | Pegar a data da ultima atualização |
| Condição: | |tmp.item.id|= |
| Objeto: | tmp.dataAtu |
| Banco de dados: | principal |
| Filtro SQL: | %*?' |
| Instrução SQL: | &sql select %external(ultDataAtualizacao) as ultima
from Pat.Configuracao
where Pat.Configuracao.codEmpresa = |tmp.empresa| |
|
| Tipo: | Objeto |
| Descrição: | Retorna o indexador de Correção quando o item é novo |
| Condição: | |tmp.item.id|= |
| Objeto: | tmp.indexcorr |
| Banco de dados: | principal |
| Instrução SQL: | Pat.ItemMoeda.getValorIndexador("|tmp.empresa|","1","|tmp.dataAtu.ultima|") |
|
| Tipo: | Objeto |
| Descrição: | Retorna o indexador de Depreciação quando o item é novo |
| Condição: | |tmp.item.id|= |
| Objeto: | tmp.indexdepr |
| Banco de dados: | principal |
| Instrução SQL: | Pat.ItemMoeda.getValorIndexador("|tmp.empresa|","2","|tmp.dataAtu.ultima|") |
|
| Tipo: | Gravar variáveis |
| Descrição: | Inicializa os Indexadore de Correção e Depreciaçao se o item for novo |
| Condição: | |tmp.item.id|= |
| Objetos: | tmp.item.vlrIndexCorr, tmp.item.vlrIndexDepr |
| Recursivo: | Não |
| Processa FALSO: | Não |
| Condição verdadeira: | |tmp.indexcorr.valor|,|tmp.indexdepr.valor| |
|
| Tipo: | Gravar variáveis |
| Descrição: | Inicializa status da depreciação do bem |
| Condição: | true |
| Objetos: | tmp.statushidden |
| Recursivo: | Não |
| Processa FALSO: | Não |
| |
| [patrimonio/cadastros/itemcorpobackup] Frame Corpo da Tela de Item - Dados Gerais: Pós-Página |
| Tipo: | Objeto |
| Descrição: | Gravar o item |
| Condição: | |tmp.btn|=salvar |
| Objeto: | tmp.salvaritem |
| Banco de dados: | principal |
| Instrução SQL: | Pat.Item.gravar(
"|tmp.empresa|",
"|tmp.item.mascaraCCusto|",
"|tmp.codigoRdz|",
"|tmp.item.codEstrutura|",
"|tmp.item.dataIncorporacao|",
"|tmp.item.dataInicioDepreciacao|",
"|tmp.item.dataInicioUso|",
"|tmp.item.itemGerencial|",
"|tmp.item.quantidadeOriginal|",
"|tmp.item.quantidadeAtual|",
"|tmp.item.vlrCorrOrig|",
"|tmp.item.vlrDeprAtual|",
"|tmp.item.vlrOrig|",
"|tmp.item.vlrCorrDeprAtual|",
"|tmp.item.codigoBarras|",
"|tmp.item.numeroDocumento|",
"|tmp.item.observacao|",
"|tmp.item.serieDocumento|",
"|tmp.item.tipoDocumento|",
"2",
"|tmp.item.codFornecedor|",
"|tmp.item.dataEmissaoDoc|",
"|tmp.item.itemNrFiscal|",
"|tmp.item.vlrContabilDoc|",
"|tmp.statushidden|") |
|
| Tipo: | Gravar variáveis |
| Descrição: | Atualizar a variavel codigo Rdz da tela |
| Condição: | |tmp.salvaritem.Error|=1 |
| Objetos: | tmp.codigoRdz |
| Recursivo: | Não |
| Processa FALSO: | Não |
| Condição verdadeira: | |tmp.salvaritem.codigoRdz| |