01.
...
GENERAL DATA
Product | Produto: | | Solucoes_totvs_cross |
|---|
| SolucaoCross | TOTVS Backoffice |
|---|
|
| Solucoes_totvs_parceirosexptotvs |
|---|
|
|
Linha de ProdutoProduct Line: | | Linhas_totvs |
|---|
| Linha | Linha Protheus Line
SegmentoSegment: | | Services |
Module: | Módulo: | | Modulos_cross_segmentos |
|---|
ModulosCrossSegmentos | TOTVS Backoffice (Linha Protheus Line) - Contabilidade Gerencial Managerial Accounting (SIGACTB)| Modulos_totvs_prestadores_de_servicos |
|---|
|
|---|
FunçãoFunction: | CTBA102 |
PaísCountry: | Brasil |
Ticket: | Interno |
RequisitoRequisite/ | StoryStory/Issue | DSERCTR1-46829 |
02.
...
Ponto de entrada utilizado após a gravação dos dados da tabela de lançamento.
No exemplo abaixo, o ponto de entrada DPCTB102GR é utilizado para aplicar uma validação/ajuste adicional após a gravação de um lançamento contábil. Caso a operação seja de estorno (indicada pelo parâmetro nOpc == 6), o ponto de entrada pode ajustar um campo específico do lançamento recém gravado, conforme uma lógica de negócios definida pelo usuário.
...
DESCRIPTION
Entry point used after recording the data in the booking table.
In the example below, the DPCTB102GR entry point is used to apply an additional validation/adjustment after an accounting entry is recorded. If the operation is a reversal (indicated by the parameter nOpc == 6), the entry point can adjust a specific field of the recently recorded entry, according to a user-defined business logic.
03. OTHER INFORMATION
| Bloco de código |
|---|
| language | cpp |
|---|
| theme | RDark |
|---|
| title | Manipulação de PE no sistemaEntry Point (EP) manipulation in the system |
|---|
|
If nOpc == 6
ExecBlock("DPCTB102GR",.F.,.F.,{ nOpc,dDataEst,cLoteEst,cSubLtEst,cDocEst } )
Else
ExecBlock("DPCTB102GR",.F.,.F.,{ nOpc,dDataAux,cLoteAux,cSubLtAux,cDocAux } )
EndIf |
| Bloco de código |
|---|
| language | cpp |
|---|
| theme | RDark |
|---|
| title | Exemplo de PEEP Example |
|---|
|
User Function DPCTB102GR()
Local nOpc := PARAMIXB[1]
Local dDataEst := PARAMIXB[2]
Local cLoteEst := PARAMIXB[3]
Local cSubLtEst := PARAMIXB[4]
Local cDocEst := PARAMIXB[5]
// ChecaChecks sewhether athe operaçãotransaction éis dea estornoreversal
If nOpc == 6
// DefineDefines umaa lógicalogic parafor ajustefield deadjustment campoafter apósthe o estornoreversal
DbSelectArea("CT2")
DbSetOrder(1)
If MsSeek(xFilial("CT2") + DTOS(dDataEst) + cLoteEst + cSubLtEst + cDocEst)
//VAIDACAOCUSTOMER DO CLIENTEVALIDATION
EndIf
EndIf
Return |
| Aviso |
|---|
|
- Observa-se que a utilização do PE e os impactos dele no sistema são de responsabilidade do cliente.
- Os exemplos utilizados nessa documentação são apenas para fins de demonstração, cada cliente deve verificar qual comportamento deseja realizar de acordo com o escopo do ponto de entrada.
|
04. ASSUNTOS RELACIONADOS
- It should be noted that the use of the Entry Point (PE) and its impacts on the system are the customer's responsibility.
- The examples used in this documentation are for demonstration purposes only; each customer must determine the behavior they wish to implement according to the scope of the entry point.
|
04. RELATED SUBJECTS