| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | CTBA110 |
| País: | Brasil |
| Ticket: | Interno |
| Requisito/Story/Issue | DSERCTR1-46829 |
O ponto de entrada CTB110LBC permite a gravação de dados adicionais nas tabelas CVL e CVM (Controle de Correlativos). Ao incluir ou alterar um dos correlativos, as tabelas CVL e CVM estão posicionadas no momento da execução do ponto de entrada, permitindo sua edição.
Esse ponto de entrada tem melhor funcionalidade se utilizado em conjunto com o parâmetro MV_CTBLBSQ (permite inclusão de novos códigos de correlativo, evitando a validação padrão do sistema. Esse parâmetro está disponível no chamado TGLSV7 e no compatibilizador com data igual ou superior à 02/02/2013).
ExecBlock("CTB110LBC",.F.,.F.) |
User Function CTB110LBC()
Local aArea := GetArea()
Local aAreaCVL := CVL->(GetArea())
Local aAreaCVM := CVM->(GetArea())
RecLock("CVL",.F.)
Replace CVL->CVL_CTBCLA With "P2"
MsUnlock()
RestArea(aAreaCVM)
RestArea(aAreaCVL)
RestArea(aArea)
Return |
|