ACD168FLIB - Forçar a liberação de itens do pedido de venda

01. DADOS GERAIS

Linha de Produto:	Microsiga Protheus®
Segmento:	Backoffice
Módulo:	ACD - Automação Coleta de Dados
Função:	ACDV168 - Geração NFs / Ordem de separação

02. DESCRIÇÃO

O ponto de entrada é chamado dentro da função de liberação de itens para faturamento.

Mesmo que a rotina default não tenha efetuado a liberação, é possível forçar a liberação dos itens do pedido, retornando .T. no ponto de entrada.

Tabelas posicionadas:

SC5 - Pedido de Vendas

SC6 - Itens Pedido de Vendas

SC9 - Liberação Itens Pedido de Vendas

CB8 - Itens de ordem de separação

03. PARÂMETROS

Não possui.

04. RETORNO

Nome

Tipo

Obrigatório

Default

Observação

lRet

Lógico

Sim

.F.

.T. - libera o item

.F. - não libera o item

05. EXEMPLO DE UTILIZAÇÃO

ACD168FLIB

/*/{Protheus.doc} User Function ACD168FLIB
    Permite validar a liberação do item para geração da NFs
    @type  Function
    @author TOTVS
    /*/
User Function ACD168FLIB()
    Local aArea    := GetArea()
    Local aAreaSB1 := SB1->( GetArea() )
    Local lRet     := .F.
    Local cGrupo   := ""

    // validação do cliente
    cGrupo := POSICIONE( "SB1", 1, xFilial( "SB1" ) + SC6->C6_PRODUTO, "B1_GRUPO" )
    If cGrupo $ GetNewPar( "MV_XGRPPLB", "9999" )
       lRet := .T.
    Endif    

    RestArea( aAreaSB1 )
    RestArea( aArea )
Return lRet

Árvore de páginas