Ponto-de-Entrada: TMA330FIL - Determina geração do seguro
| Versões: | Microsiga Protheus 8.11 , Microsiga Protheus 10 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
| Idiomas: | Espanhol , Inglês |
Descrição:
Este Ponto de Entrada, localizado no TMSA330 (Fechamento de Seguro), é executado no processo de gravação do fechamento do seguro. Caso o Retorno do Ponto de Entrada seja (.F.) ele não irá gerar seguro para aquele documento, irá para os próximos registros entre todos os documentos.
Eventos
Programa Fonte
TMSA330.PRW
Sintaxe
TMA330FIL - Determina geração do seguro ( [ cFilDoc ], [ cDoc ], < cSerie> ) --> lRet
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| cFilDoc | Array of Record | PARAMIXB[1] - Filial do Documento. | |||||||||||||||
| cDoc | Array of Record | PARAMIXB[2] - Documento. | |||||||||||||||
| cSerie | Array of Record | X |
Retorno
-
lRet(logico)
- Caso o retorno seja (.F.) não irá gerar seguro para aquele documento.
Observações
Exemplos
User Function TMA330FIL() Local cFilDoc := PARAMIXB[1]Local cDoc := PARAMIXB[2]Local cSerie := PARAMIXB[3]Local lRet := .T. If cDoc == '000004' .Or. cDoc == '000005' .Or. cDoc == '000007' lRet := .F. MsgAlert('Não gerar seguro para o documento ' + cFilDoc+ '-' + cDoc + '-' + cSerie+ ' ,pesquisando próximos documentos')EndifReturn lRet