Árvore de páginas

Versões comparadas

Chave

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

...

Quando é realizada a aglutinação das SC´s, esse ponto de entrada não será considerado.

LocalizaçãoFunction MontEstru() - Responsável por montar array com estrutura do produto.
Parâmetros

.

NomeTipoDescriçãoObrigatório
PARAMIXBArrayArray contendo a linha do aCols posicionadaSim

.

Retorno

.

NomeTipoObrigatórioDescrição
cRetLocalCaracterSimCódigo do armazém

.


03. DEMAIS INFORMAÇÕES


Bloco de código
firstline1
titleExemplo de implementação
#INCLUDE 'TOTVS.CH'
#INCLUDE 'PROTHEUS.CH'
#INCLUDE 'RWMAKE.CH'
 
User Function A650LEMP()
	Local aLinCol   := aClone(PARAMIXB)  //Conteudo da linha do aCols possicionado
	Local cRetLocal := aLinCol[3]        //Verifca se o produto é 'MP' e o Armazém é '87' altera conteúdo para '20'
	Local cTipo     := Posicione('SB1',1,xFilial('SB1')+aLinCol[1],'B1_TIPO') //Busca o contúedo do campo B1_TIPO
 
	If cTipo == 'MP' .And. (aLinCol[3] == '87')      
    	cRetLocal := '20'
	EndIf
 
Return cRetLocal

...