| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | CTBA230 |
| País: | Brasil |
| Ticket: | Interno |
| Requisito/Story/Issue | DSERCTR1-46829 |
O ponto de entrada CT230TRB é executado no momento da gravação do registro de consolidação, permitindo validações adicionais durante esse processo.
lRet := ExecBlock("CT230TRB",.F.,.F.,{CTB->CTB_CTADES,CTB->CTB_CCDES,CTB->CTB_ITEMDE,CTB->CTB_CLVLDE}) |
User Function CT230TRB()
Local cConta := ParamIxb[1]
Local cCCusto := ParamIxb[2]
Local cItem := ParamIxb[3]
Local cCLVL := ParamIxb[4]
Local lRet := .T.
If Empty(cCusto)
Alert('Registro invalido.')
lRet := .F.
Endif
Return lRet |
|