Ponto-de-Entrada: HSPM50ILO - Atribuição do Lote
Abrangências: | Microsiga Protheus 10 |
Versões: | Microsiga Protheus 10 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Descrição:
Ponto de Entrada executado antes da atribuição do lote à guia. Ele será acionado para cada registro selecionado no browse.
Programa Fonte
Sintaxe
HSPM50ILO - Atribuição do Lote ( [ ParamIXB[1] ], [ ParamIXB[2] ], [ ParamIXB[3] ] ) --> lRet
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
ParamIXB[1] | Caracter | Registro Atendimento | |||||||||||||||
ParamIXB[2] | Array of Record | Número Lote | |||||||||||||||
ParamIXB[3] | Array of Record | Seqüência da Guia |
Retorno
-
lRet(logico)
- .T. - Atribui Lote.F. - Não Atribui Lote
Exemplos
#Include 'Protheus.ch'User Function HSPM50ILO()Local lRet := .T.Local cRegAte := ParamIXB[1]Local cNumLot := ParamIXB[2]Local cNrSeqg := ParamIXB[3]If !MsgYesNo('Número Registro de Atendimento: [' + cRegAte + '] Número Lote: [' + cNumLot + '] Número Seqüência Guia [' + cNrSeqg + ']') lRet := .F.EndIfReturn(lRet)
Variáveis
Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
Array of Record | Global | Não |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas