Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Mayara Alves Da Silva

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Mayara Alves Da Silva

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

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
titleImportante

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]CaracterCódigo da conta na visão gerencial

...

Retorno

Tipo

Descrição

Obrigatório

cIndicCaracter

 Variável caracter retornando string

HTML para mensagem de bloqueio.

o indicador que deverá ser gravado para o campo.

  • IND_DC_CTA_FIN ( CSE_INDVAL )
    • D - Devedor
    • C - Credor
  • IND_GRP_DRE (CSE_INDDRE)
    • D - Despesa
    • R - Receita


Aviso
titleImportante

O retorno deverá respeitar o manual do ECD para o seu leiaute. 

Sim

04. EXEMPLO DE UTILIZAÇÃO

...

Bloco de código
languagegroovy
themeDJango
titleExemplo do Ponto de Entrada
collapsetrue
#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
languagegroovy
themeDJango
titleEvento de chamada do Ponto de Entrada
collapsetrue
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>