Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Backoffice
Módulo:ACD - Automação Coleta de Dados
Função:

ACDI10OP ACDI010 - Impressão de Etiquetas Produçãode produtos

02. DESCRIÇÃO

O Este ponto de entrada é chamado antes da impressãono início da rotina de impressão de etiquetas de produtos por ordem de produção, para validar se permite ou não a impressão da etiqueta.


Tabelas Posicionadas:

SD3 - Movimentação interna

03. PARÂMETROS

...

Não possui.


04.

...

RETORNO

NomeTipoObrigatórioDefaultObservação
LRET
lRet
L
LógicoSim

.T. - continua impressão da etiqueta

.F. - não imprime a etiqueta

05. EXEMPLO DE UTILIZAÇÃO

Bloco de código
languagevb
themeMidnight
firstline1
titleAI10OPIMP
linenumberstrue
/*/{Protheus.doc} User Function AI10OPIMP
    Valida dese continua comefetua a impressão da etiqueta
    @type  Function
    @author TOTVS
    /*/
User Function  AI10OPIMP()     
    Local aArea    := GetArea()
    Local aAreaSB1 := SB1->( GetArea() )
    Local lRet     := .T.
    Local cGrupo   := ""
 
    // Validações do Cliente

    // retornavalidação do cliente
    cGrupo := POSICIONE( "SB1", 1, xFilial( "SB1" ) + SD3->D3_COD, "B1_GRUPO" )
    If cGrupo $ GetNewPar( "MV_XGRPPIM", "8888" )
       lRet := .F.
    Endif   
 
    RestArea( aAreaSB1 )
    RestArea( aArea ) 
Return( lRet)




Templatedocumentos