Árvore de páginas

Função: MATA275 - Rotina automática de Bloqueio de Lotes
Abrangências: Microsiga Protheus 11 , Protheus 10
Versões: 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)
Idiomas: Português (Brasil)
Descrição:
Através dessa rotina o sistema permite bloquear lotes e sublotes para impedir que um determinado lote seja utilizado. Nesta rotina também é possível liberar um lote/sublote, de forma total ou parcial.
Sintaxe:

MATA275 - Rotina automática de Bloqueio de Lotes ( [ ExpA1 ] [ ExpN2 ] )

Retorno:
    ()
Exemplos
User Function RMATA275() Local aVetor := {}          lMsErroAuto := .F.          RpcSetEnv( "99","01",,,,,,,,,)//--- Exemplo: Bloqueio --- //aVetor := {;                {"DD_DOC"	,"1     " ,NIL},;{"DD_PRODUTO" ,"LOTE           ",NIL},;{"DD_LOCAL" ,"01",NIL},;    {"DD_LOTECTL"	,"A         "	,NIL},;    {"DD_QUANT",10	,NIL},;{"DD_MOTIVO","VV",NIL}}                                               	MSExecAuto({|x, y| mata275(x, y)},aVetor, 3)       //--- Exemplo: Liberação --- //aVetor := {;                {"DD_DOC","1     " ,NIL}}MSExecAuto({|x, y| mata275(x, y)},aVetor, 4)  If lMsErroAuto    Mostraerro()else    Alert("Ok")EndifReturn    
Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
ExpA1 Array of Record Array Bloqueio de Lotes para Rotina Automática.
ExpN2 Array of Record Opção da rotina automática, sendo: 3 - Bloqueio 4 - Liberação.