Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • HSPM50ILO - Atribuição do Lote

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