Histórico da Página
CONTEÚDO
- Visão Geral
- Parâmetros
- Retorno
- Exemplo de Utilização
- Exemplo de Manipulação
01. VISÃO GERAL
O ponto de entrada CTS11INDC permite a manipulação do indicador do saldo final (IND_DC_CTA_FIN - CSE_INDVAL) e do indicador de grupo da DRE (DRE IND_GRP_DRE - CSE_INDDRE) quando a conta não tiver movimentação.
Para os registros que não tiveram movimentação o sistema utiliza como valor padrão C - Credor para o campo de Indicador da situação do valor final (IND_DC_CTA_FIN) e R - Receita Indicador de grupo da DRE (IND_GRP_DRE).
Exemplo:
|J150|0000000020|TST00000000000000002320|D|2|TST00000000000000002319|2018|1000,00|C|0,00|C|R
...
| Aviso | ||
|---|---|---|
| ||
Os impactos gerados pela utilização do ponto de entrada é de total responsabilidade do cliente que o solicitou. |
02. PARÂMETROS
Parâmetro | Tipo | DescriçãoObrigatório |
|---|---|---|
| PARAMIXB[1] | Caracter | Campo que será será manipulado |
| PARAMIXB[2] | Caracter | Código da visão gerencial |
| PARAMIXB[23] | Caracter | Código da conta na visão gerencial |
03. RETORNO
Retorno | Tipo | Descrição | Obrigatório | |||||
|---|---|---|---|---|---|---|---|---|
| cIndic | Caracter | Variável caracter retornando string HTML para mensagem de bloqueio.o indicador que deverá ser gravado para o campo.
| Sim |
04. EXEMPLO DE UTILIZAÇÃO
| Bloco de código | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
#include "protheus.ch" User Function CT010BWF()CTS11INDIC local cRet := "" Local cPEHTMLcCampo := ParamIXBParamixb[1] //campo Local cVisao := Paramixb[2] //livro Local cConta := Paramixb[3] //campo Local aArea := GetArea() Local nCont aAreaCVF := CVF->(GetArea()) cVisao := ParamIXB[2] PADR(cVisao,TamSX3("CVF_CODIGO")[1]) If cCampo == "CSE_INDVAL" //IND_DC_CTA_FIN //1 - Credito //2 - Debito //tabela CQD esta posicionada cPEHTML += ' ' + Ctb012Sx3("CQD_DTINI") + ': '+DTOC(CQD->CQD_DTINI) cPEHTML += ' ' + Ctb012Sx3("CQD_DTFIM") + ': '+DTOC(CQD->CQD_DTFIM) Return(cPEHTML)D - Devedor //C - Credor CVF->(dbSetorder(1)) //CVF_FILIAL+CVF_CODIGO+CVF_CONTAG+CVF_ORDEM If CVF->(dbSeek(xFilial("CVF")+cVisao+cConta)) If CVF->CVF_NORMAL == '1' //credito cRet := 'C' //Credor Else cRet := 'D' //devedor EndIf EndIf ElseIf cCampo == "CSE_INDDRE" //IND_GRP_DRE // D - Despesa // R - Receita cRet := "D" //despesa EndIf RestArea(aAreaCVF) RestArea(aArea) Return cRet |
05. EXEMPLO DE MANIPULAÇÃO
| Bloco de código | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
If nSaldTmp == 0 .And.lIndic If lPeHtmllLeiaute7 cHtmlPeCSE->CSE_INDDRE := ExecBlock("CT010BWFCTS11INDIC",.F.,.F.,{ cHtml"CSE_INDDRE", nContcCodVis ,cArqTmp->CONTA}) EndIf If ValType(cHtmlPe) != "C" .OR. Empty(Alltrim(cHtmlPE)) Help(" ",1,"CT010BWF_ERR",,"Error PE WF - HTML!",3,1) Else cHtml := cHtmlPe EndIf EndIf CSE->CSE_INDVAL := ExecBlock("CTS11INDIC",.F.,.F.,{"CSE_INDVAL", cCodVis ,cArqTmp->CONTA}) EndIf |
| HTML |
|---|
<!-- esconder o menu -->
<style>
div.theme-default .ia-splitter #main {
margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
display: none;
}
#main {
padding-left: 10px;
padding-right: 10px;
overflow-x: hidden;
}
.aui-header-primary .aui-nav, .aui-page-panel {
margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
margin-left: 0px !important;
}
</style>
|