PE MA330MOD Customiza cálculo do custo de mão de obra

01. DADOS GERAIS

02. DESCRIÇÃO

LOCALIZAÇÃO: Function MA330Mod - Função que calcula o custo das requisições de mão de obra feitas no período.

EM QUE PONTO: O Ponto de entrada é executado no início da função MA330Mod, e utilizado para que se possa customizar o cálculo do custo das requisições de mão de obra feitas no período utilizando grupo e centro de custo.

OBSERVAÇÃO: Durante a execução do Cálculo da Mão de Obra, para produtos que o código não inicia por "MOD", este retornará no vetor "PARAMIXB" os respectivos conteúdos identificados nos campos B1_COD (Codigo do Produto), B1_CCCUSTO (Centro de Custo Custeio) e B1_GCCUSTO (Grupo Contábil Custeio).
Porém, caso seja identificado pelo menos um produto que possua o código iniciado por "MOD", ex: "MOD00001", este retornará no parâmetro "PARAMIXB[1]" apenas o código "MOD" seguido de conteúdo vazio nos parâmetros "PARAMIXB[2]" e "PARAMIXB[3]". Para estes cenários, o ponto de entrada busca apenas identificar se existe ou não algum código iniciado por "MOD" para cada filial.

03. DEMAIS INFORMAÇÕES

PARÂMETROS

EXEMPLO DE UTILIZAÇÃO ADVPL

#INCLUDE 'totvs.ch'

/*/{Protheus.doc} User Function MA330MOD 
Utilizado para executar o ponto de entrada
MA330MOD passando os produtos. 
@type User Function
@author TOTVS
/*/ Exemplos
User Function MA330MOD()
Local cCodPesq := PARAMIXB[1] //B1_COD
Local cCodCC   := PARAMIXB[2] //B1_CCUSTO
Local cGrupo   := PARAMIXB[3] //B1_GCCUSTO

// Produtos SEM código iniciado por "MOD"
If cCodPesq == 'EST00001'
	If cCodCC == '000001' 
		If cGrupo == '000001'
			//--Tratamento lógico....
		EndIf
	EndIf
EndIf

// Produtos COM código iniciado por "MOD"
If cCodPesq == 'MOD'
	If Empty(cCodCC)
		If Empty(cGrupo)
			//--Tratamento lógico....
		EndIf
	EndIf
EndIf   

Return Nil

04. ASSUNTOS RELACIONADOS

• Não se aplica