Árvore de páginas

Função: TM200CTR - Boqueio de Lote
Versões: Microsiga Protheus 8.11 , Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Nível de Acesso: Nível 1 (Acesso Clientes)
Descrição:
Ponto de entrada para bloquear Lote, caso número de CTRC's que serão gerados exceda o permitido, de acordo com o limite estabelecido pelo ponto de entrada.
Programa Fonte:
TMSA200.PRW
Sintaxe:

TM200CTR - Boqueio de Lote ( [ nNumCTRC ] ) --> aRet

Retorno:
    aRet()
  • Se aRet[1] = .T. - Lote é calculado normalmente.Se aRet[1] = .F. - Lote é bloqueado.aRet[2] = Deve conter um array contendo as mensagens que serão exibidas pelo bloqueio de Cálculo.
Exemplos
#INCLUDE "PROTHEUS.CH"User function TM200CTR()  Local nNumCTRC  := ParamIXB[1]Local aRet 		    := {NIL,{}}If MsgYesNo("Bloqueia Lote?")	If nNumCTRC > 1		aRet[1] := .F.		AAdd( aRet[2], {"PE bloqueou CTRC"} )		AAdd( aRet[2], {"mensagem 2"} )			EndIf EndIfReturn aRet
Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
nNumCTRC Numérico Número de CTRC que serão gerados de acordo com a quebra do perfil do cliente.