Histórico da Página

Produto:

PROTHEUS

Ocorrência:

Ao incluir um lançamento partida simples a débito por exemplo, é permitido digitar a conta crédito e vice versa. Como bloquear o campo da conta contábil quando o lançamento for partida simples?

Passo a passo:

Utilize o ponto de entrada CT105VLENT - Entidade contábil -- 23493 

User Function CT105VLENT() 

Local lRet := .T. 

Local cDC,cDebito,cCredito, cContCCD,cContCCC, cItemD,cItemC, cCLVLD,cCLVLC 

cDc := ParamIxb[1] 

cDebito := ParamIxb[2] 

cCredito := ParamIxb[3] 

//cContCCD:= ParamIxb[4]

//cContCCC:= ParamIxb[5] 

//cItemD:= ParamIxb[6] 

//cItemC:= ParamIxb[7] 

//cCLVLD:= ParamIxb[8] 

//cCLVLC:= ParamIxb[9] 

//ATRIBUIR OUTROS PARAMETROS CC /ITEM / CLASSE DE VALOR 

If cDc == "1" //Debito 

lRet := !Empty(cDebito) .And. Empty(cCredito) 

ElseIf cDc == "2" //Credito 

lRet := !Empty(cDebito) .And. Empty(cCredito) 

ElseIf cDc == "4" //Cont. Historico 

lRet := .T. 

Else 

lRet := !Empty(cDebito) .And. !Empty(cCredito) 

EndIf 

//VALIDADAR OUTRAS ENTIDADES

If !lRet 

MsgAlert("Ponto de Entrada CT105VLENT - Verifique Conta a Debito / Credito!") 

EndIf

Trata-se de um legado do módulo contábil a possibilidade de mostrar a contrapartida de débito ou crédito, mesmo não sendo um lançamento de partida dobrada. 

o   Vocês têm 2 opções:

§  Bloquear este processo na validação do documento contábil, com o ponto de entrada CT105VLENT (http://tdn.totvs.com/pages/viewpage.action?pageId=6068647Return(lRet)