91199875 Ponto de Entrada Estoque e Custos

Embed Size (px)

Citation preview

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    1/582

    PONTOS DE ENTRADAESTOQUE E CUSTOS

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    2/582

    A010TOKLOCALIZAÇÃO : Function A010TudoOK - Função de Validação para inclusão ou alteração do Produto.

    EM QUE PONTO: No início das validações após a confirmação da inclusão ou alteração, antes da gravação

    do Produto; deve ser utilizado para validações adicionais para a INCLUSÃO ou ALTERAÇÃO do Produto.Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA010.PRX

    Sintaxe

    A010TOK ( ) --> lExecuta

    Retorno

    lExecuta(logico)

    Deve retornar .T. se validação OK, para continuar e incluir ou atualizar o produto ou .F. para retornar a tela de inclusao ou

    alteracao, interrompendo o processo.

    Observações

    Exemplos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    3/582

    User Function A010TOK()

    Local lExecuta := .T.

    // Validações do usuário para inclusão ou alteração do produto

    Return (lExecuta)

    A018INCLOCALIZAÇÃO : Function A018Inclui() - Responsável pela Inclusao de Indicadores de Produtos.

    EM QUE PONTO : O ponto de entrada 'A018INC' é executado após a gravação dos dados na rotina deinclusão de indicadores de produto.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA018.PRX

    Sintaxe

    A018INC ( < PARAMIXB> ) --> Nil

    Parâmetros

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    4/582

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB NuméricoSe o conteúdo desta variável for igual a "1", indica que o operador confirmou a

    inclusão do indicador de produto.

    X

    Retorno

    Nil(nulo)

    Nil

    Observações

    Exemplos

    User Function A018INC

    Local nOpcA := paramixb[1]

    If nOpcA==1 //Inclusao confirmada

    //Fazer aqui a analise/alteração

    EndIf

    Return Nil

    A020DELELOCALIZAÇÃO : Function FCanAvalSA2 - Função de Validação da digitação, na inclusão, alteração ouexclusão do Fornecedor.

    EM QUE PONTO: Na primeira validação após a confirmação da exclusão, antes de excluir o fornecedor,deve ser utilizado para validações adicionais para a EXCLUSÃO do fornecedor, para verificar algumarquivo/campo criado pelo usuário, para validar se o movimento será efetuado ou não.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    5/582

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA020.PRX

    Sintaxe

    A020DELE ( ) --> lRet

    Retorno

    lRet(logico)

    Caso verdadeiro, prossegue com o processo de delecao. Caso falso, abandona o processo de delecao.

    Observações

    Exemplos

    User Function A020DELE()

    Local lExecuta := .T.

    // Validações do usuário para exclusão do fornecedor

    Return (lExecuta)

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    6/582

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    7/582

    Exemplos

    User Function A020EOK()

    Local lExecuta := .T.

    // Validações do usuário para exclusão do fornecedor

    Return (lExecuta)

    LOCALIZAÇÃO : Function MA060Delet() - Responsável pela atualizacao de Amarracao Produto xFornecedor.

    EM QUE PONTO: Apos confirmacao da exclusao do registro na Enchoice (tela). Pode ser utilizado paraverificar algum arquivo antes de apagar a amarracao Produto X Fornecedor ou atualizar algum campo, ouseja, pode validar se o movimento sera efetuado ou nao.Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA060.PRX

    Sintaxe

    A060DELE ( < UPAR> ) --> lRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    UPAR Qualquer Nenhum X

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    8/582

    Retorno

    lRet(logico)

    Logico. Caso verdadeiro prossegue com o processo de delecao. Caso falso • abandona processo de delecao.

    A093ACODLOCALIZAÇÃO : Function A093VldCod - Valida se um codigo inteligente é valido.

    EM QUE PONTO : O ponto se encontra após a validação do código inteligente e /ou inclusão de códigonão padrão. Este PE permite que o código do produto informado pelo operador seja manipulado, porémesta alteração deve se executada com muita cautela, pois após a execução deste ponto não existe maisnenhuma validação do código informado.

    Eventos

    Versões

    Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA093.PRW

    Sintaxe

    A093ACOD ( < ParamIXB[1]> , < ParamIXB[2]> , < ParamIXB[3]> , < ParamIXB[4]> , < ParamIXB[5]> )

    --> cRet

    Parâmetros

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    9/582

    Nome Tipo Descrição Default Obrigatório Referência

    ParamIXB[1] Caracter Código do produto a ser gerado X

    ParamIXB[2] Caracter Descrição padrão para o produto gerado X

    ParamIXB[3] Array of

    Record

    Array com informações das caracateristicas selecionadas: (Vide

    Observações)X

    ParamIXB[4] Array of

    RecordArray com os IDs de caracteristicas tipo grade. X

    ParamIXB[5] Lógico Verifica se gera SB1 e SG1 do codigo fornecido X

    Retorno

    cRet(caracter)

    Novo código do produto.

    ObservaçõesParamIXB[3] = Array contendo:

    * ID da característica

    * Código da opção selecionada

    * Descrição da opção

    * Descrição da opção a ser usada na descrição do produto

    Exemplos

    User Function A093ACOD()

    Local cCodPrd := PARAMIXB[1]

    Local cDesPrd := PARAMIXB[2]

    Local aCod := PARAMIXB[3]

    Local aCodGrd := PARAMIXB[4]

    Local lGera := PARAMIXB[5]

    Local aArea := GetArea()

    Local cNewCod := Nil

    If Substr(cCodPrd,1,3)=='MIC'

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    10/582

    cNewCod := cCodPrd + '090'

    Else

    cNewCod := cCodPrd + '001'

    EndIf

    RestArea(aArea)

    Return (cNewCod)

    A093Gera

    LOCALIZAÇÃO : Function A093InclOk() - Responsável pela validaçãp do ponto de entrada A093Gera.

    EM QUE PONTO : Retorna se um produto da família de produto (passada como parametro em array)poderá ser incluída no cadastro de produtos

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA093.PRX

    Sintaxe

    A093Gera ( < PARAMIXB> ) --> lPodeIncluir

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    11/582

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Caracter Código base da família a ter produto incluído X

    Retorno

    lPodeIncluir(logico)

    Informa se o produto da família de produto poderá ou não ser incluído

    Observações

    A093SBRLOCALIZAÇÃO : Function A063PadSBP - Função de Inclusão/Alteração dos Dados Padrões no configuradorde Produtos, após sua gravação nas tabelas SBR (Dados basicos dos Produtos) e SBU (Composição deEstrutura).

    EM QUE PONTO: Após incluir ou alterar os Dados Padrões do Produto, este Ponto de Entrada nemconfirma nem cancela a operação, deve ser utilizado para gravar arquivos/campos do usuário,complementando a inclusão/alteração.

    Eventos

    Versões

    Microsiga Protheus 8.11

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    12/582

    MATA093.PRX

    Sintaxe

    A093SBR ( ) --> Nil

    Retorno

    Nil(nulo)

    Nil

    ObservaçõesPonto de Entrada para complementar a inclusão/alteração no cadastro de Configurador de Produtos / Dados Padrões.

    Exemplos

    User Function A093SBR()

    // Atualização de arquivos ou campos do usuário após a alteração dos Dados Padrões do

    produtos.

    Return Nil

    A100DISTLOCALIZAÇÃO : Function A100Distri - Função responsável pela distribuição automática de um produtopara uma localização/número de série específica.

    EM QUE PONTO : No inico da função. Utilizado para validar a distribuição.Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    13/582

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    SIGACUSB.PRX

    Sintaxe

    A100DIST ( < PARAMIXB> ) --> lRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB VetorÉ passado um array com duas dimensões onde: PARAMIXB[1] -> Código do Produto

    ; PARAMIXB[2] -> AlmoxarifadoX

    Retorno

    lRet(logico)

    É esperado como retorno uma variável lógica onde:

    .T. -> Realiza a distribuição

    .F. -> Não realiza a distribuição

    Observações

    Exemplos

    User Function A100DIST()

    Local cProd := PARAMIXB[1]Local cLoc := PARAMIXB[2]

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    14/582

    Local lRet := .T.

    If //Validação do usuário

    lret := .F.

    Endif

    Return(lRet)

    A100SEGCPOLOCALIZAÇÃO: Em rotinas onde existe o tratamento da primeira e segunda unidade de medida deprodutos, como por exemplo, "Documento de Entrada", "Solicitação de Compras" e "Pedidos deCompras". Na rotina "Pedido de Vendas" embora exista o mesmo tipo de tratamento esse ponto deentrada não será utilizado pois não haverá conflito de nomes de campos.

    EM QUE PONTO: Ao informar um produto que possua as duas unidades de medida devidamentecadastradas.

    OBJETIVO: Permitir que o sistema ignore os campos criados pelo usuário no momento em que estiverprocessando o cálculo das unidades de medida.

    Esse ponto de entrada foi criado para evitar que o sistema processe os campos criados por usuáriosdurante o cálculo das unidades de medida.

    Por exemplo: na tabela "SD1" (rotina "Documento de Entrada") não existe o campo "D1_PRODUTO", mascaso o usuário crie um campo com esse nome ocorrerá um problema no momento em que as unidadesde medida estiverem sendo calculadas. Isso ocorre porque o sufixo do nome do campo "_PRODUTO" éutilizado em outras tabelas e o tratamento das unidades de medida não funcionará corretamente. Para

    evitar este conflito o sistema poderá, através do ponto de entrada, ignorar os campos que o usuáriodeterminar.

    Será enviado como parâmetro para o ponto de entrada o nome de cada um dos campos da tabela quedeverão ser processados durante o cálculo das unidades de medida.

    O valor de retorno deste ponto de entrada deverá ser do tipo lógico: Verdadeiro (.T.) ou Falso (.F.).

    Se o retorno for verdadeiro (.T.) o campo será processado normalmente. Se o retorno for falso (.F.) ocampo será ignorado.

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    15/582

    Caso o valor de retorno não seja do tipo lógico, o sistema assumirá automaticamente o valor falso (.F.) e ocampo não será processado.

    Eventos

    Versões

    Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    SIGACUSA.PRW

    Sintaxe

    A100SEGCPO ( < @PARAMIXB> ) --> lRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Caracter Nome do campo que será processado X X

    Retorno

    lRet(logico)

    Processa (.T.) ou não (.F.) o campo.

    Observações

    Exemplos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    16/582

    User Function A100SEGCPO()

    Local lRet := .T.

    If ParamIxb $ 'D1_PRODUTO|D1_NOMEPRO|D1_DESCPRO' //

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    17/582

    A105DELOK ( < uPar> ) --> lRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    uPar Qualquer Nenhum X

    Retorno

    lRet(caracter)

    .T. ou .F.

    A175CQLOCALIZAÇÃO : Function A175Grava() - Responsável por realizar a Liberacao/Rejeicao do Material no CQ.

    EM QUE PONTO : BAIXAS DO CQ

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA175.PRX

    Sintaxe

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    18/582

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    19/582

    A175GRV ( < UPAR> ) --> URET

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    UPAR Qualquer Nenhum X

    Retorno

    URET(qualquer)

    Nenhum

    A200BOKLOCALIZAÇÃO : Function Btn200Ok() - Responsável por acionar o botão de confirmação da estrutura.

    EM QUE PONTO : Ponto de Entrada que valida TODAS as alteracoes efetuadas na estrutura do produto.Executado no botao ok, presente na mesma dialog da arvore da estrutura. Devera ser retornado um valorlogico validando ou nao as alteracoes.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA200.PRW

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    20/582

    Sintaxe

    A200BOK ( < PARAMIXB> ) --> lRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB VetorSao passados 2 parametros (2 elementos no array PARAMIXB). Consulte campo de

    observaçõesX

    Retorno

    lRet(logico)

    Retorno .T.: Grava normalmente os dados no SG1

    Retorno .F.: Nada sera feito

    Observações

    PARAMETROS

    Sao passados 2 parametros (2 elementos no array PARAMIXB).

    Para obter seus conteudos:

    aRegs:= PARAMIXB[1]

    cCod := PARAMIXB[2]

    aRegs: Array de uma dimensao contendo os numeros dos registros que foram • incluidos ou excluidos. Este array tem utilidade apenas

    informativa e nao • devera o Ponto de Entrada, deletar ou efetual recall nos registros deste • array.

    Isto sera feito automatico, de acordo com o retorno do PE:

    .T. Assume as alteracoes, mantendo as alteracoes no SG1;

    .F. Desfaz todas as alteracoes efetuadas no SG1 (semelhante ao teclar botao • cancela, presente na mesma tela);Qualquer retorno nao-logico, sera ignorado pelo programa.

    PS: Cada registro do array pode estar deletado ou nao. Se estiver deletado, • foi deletado durante a alteracao atual, se nao estiver deletado

    foi incluido.

    O Array podera tambem estar vazio (Len(aRegs)=0), o que significa que nenhuma • inclusao ou alteracao foi realizada no SG1 na estrutura do

    produto.

    cCod: Codigo do produto que esta tendo a estrutura incluida ou alterada.

    ------------------------------------------------------------------------------------------------------------------------------------------------

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    21/582

    RETORNO

    .T. ou .F., validando ou nao as alteracoes na estrutura.

    Note que durante a manipulacao na estrutura, os registros no SG1 sempre serao • deletados ou incluidos. Podendo inclusive ser checado o

    SG1 pelo PE.

    Retorno .T.: Grava normalmente os dados no SG1

    Retorno .F.: Nada sera feito, aguardando nova acao do usuario, ja que janela • da estrutura nao sera fechada, dando a chance de fazer novas

    alteracoes e • acionar novamente o botao ok, quando o PE fara nova verificacao.

    Exemplos

    User Function A200BOK

    aRegs := PARAMIXB[1]

    cCod := PARAMIXB[2]

    Alert("Produto sendo alterado: " + cCod)

    For x := 1 to Len(aRegs)

    Alert("Foi alterado o registro " + AllTrim(Str(aRegs[x])) + " no SG1")

    Next

    Return(.T.) // aceito as alteracoes. Para nao aceitar, retornar .F.

    A200GRVELOCALIZAÇÃO : Final da função ('Ma200Fecha') que finaliza e verifica integridade na execução dasseguintes transações ( Visualização, Inclusão, Alteração e Exclusão ), podendo também ser utilizado emalgum tratamento após determinada transação executada.

    EM QUE PONTO : Chamado quando necessario para gravacao de campos customizados pelo cliente naestrutura(Manutencao na gravacao de estruturas de produtos). GRAVACAO NA ESTRUTURA DE PROD. -CLIENTE

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    22/582

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA200.PRW

    Sintaxe

    A200GRVE ( < ExpN1> , < ExpL1> ) --> URET

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    ExpN1 NuméricoÉ passado como parâmetro a opção que esta sendo executado pela função, onde:ParamIxb = 2 // Visualização ; ParamIxb = 3 // Inclusão ; ParamIxb = 4 // Alteração ;

    ParamIxb = 5 // Exclusão

    X

    ExpL1 LógicoÉ passado como parâmetro se o mapa de divergências de quantidade na estrutura

    está ativo ou não.X

    Retorno

    URET(qualquer)

    Grava os possiveis campos customizados pelo cliente.

    Observações

    Exemplos

    User function A200GrvE()

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    23/582

    Local ExpN1 := ParamIxb[1]

    Local ExpL1 := ParamIxb[2]

    If ExpN1 == 2 // Visualizar

    // Tratamento na Visualização

    ElseIF ExpN1 == 3 //Inclusao

    // Tratamento na Inclusão

    ElseIF ExpN1 == 4 //Alteracao

    //Tratamento na Alteração

    ElseIF ExpN1 == 5 //Exclusao

    //Tratamento na Exclusão

    EndIf

    Return Nil

    A200UNDOLOCALIZAÇÃO : Function Ma200Undo() - Responsável por desfazer as Inclusões/Exclusões/Alterações

    EM QUE PONTO : Ponto de entrada no cancelamento da operacao de inclusao, alteracao ou exclusao deum registro. Para desfazer as alteracoes, exclusoes, inclusoes do usuario.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    24/582

    Programa Fonte

    MATA200.PRW

    Sintaxe

    A200UNDO ( < PARAMIXB> ) --> Nil

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Vetor

    PARAMIXB[nX,1] = Nro. do Registro ; PARAMIXB[nX,2] = Tipo:

    1.Inclusao/2.Exclusao/3.Alteracao ; PARAMIXB[nX,3,nY] = Campos Alterados do

    componente.

    X

    Retorno

    Nil(nulo)

    Nil

    A240WMSOLOCALIZAÇÃO : Function a240Atu() - Responsável por atualizar arquivos.

    EM QUE PONTO : Ponto de Entrada A240WMSO utilizado para permitir que a informacao do Endereco eda Estrutura de Origem seja passado via ponto de entrada. Os parametros deste Ponto de Entrada são :Produto /Quantidade e NumSeq

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    25/582

    Base de Dados

    Todos

    Programa Fonte

    MATA240.PRX

    Sintaxe

    A240WMSO ( [ PARAMIXB1 ], [ PARAMIXB2 ], [ PARAMIXB3 ] ) --> Array

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB1 Caracter Codigo do Produto

    PARAMIXB2 Caracter Quantidade

    PARAMIXB3 Caracter Numero da Sequencia do movimento (NumSeq)

    Retorno

    Array(vetor)

    aArray[1] = Endereco

    aArray[2] = Estrutura

    Observações

    Exemplos

    User Function a240WMSO()

    Local cCodPro := ParamIXB[1]

    Local nQuant := ParamIXB[2]

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    26/582

    Local cNumSeq := ParamIXB[3]

    //-- Validações do Usuario

    Return {aEnder, aEstru}

    A250ARD4LOCALIZAÇÃO : Função A250Atu - Função utilizada para atualização das tabelas relacionadas à produção.

    EM QUE PONTO : Ponto de Entrada executado na tela de atualização da rotina MATA250. O ponto deentrada poderá ser utilizado para selecionar os dados da tabela SD4 e ordenar quais empenhos serao

    considerados primeiro.Eventos

    Versões

    Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250ARD4 ( < ParamIxb> ) --> aExpA

    Parâmetros

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    27/582

    Nome Tipo Descrição Default Obrigatório Referência

    ParamIxb Vetor (Para mais detalhes vide Obs) X

    Retorno

    aExpA(vetor)

    Retorna array ,se existir, um novo array com a nova ordem dos empenhos

    Observações

    O ponto de entrada recebe como parâmetro um array (ParamIXB), contendo o os dados com a ordenação original da tabela SD4.

    ParamIXB[1] -- Possui como parametro o proprio cArraySD4 que contém os empenhos da ordem original, ou seja , os dados dos empenhos

    antes de ser executado o ponto de entrada.

    aItensSD4 -- Array que irá devolver os itens processados com as alterações definidas pelo usuário .

    Exemplos

    User Function A250ARD4()

    Local aItensSD4 := ParamIXB[1] //-- Array com os itens a serem processados

    Local aRetSD4 := aItensSD4 //-- Array que ira retornar as alterações processadas

    pelo cliente

    //-- Rotina de customização do usuário no array aRetSD4

    Return aRetSD4 //-- Retorna o array com as alterações customizadas

    A250ATSD4LOCALIZAÇÃO : Function A250Atu - Função utilizada para atualizar das tabelas relacionadas a produção.

    EM QUE PONTO : O ponto de entrada 'A250ATSD4' permite a atualização ou não da tabela de empenhosquando na atualização de saldos do apontamento de produção simples ao pesquisa OP pocissionadaverifica-se que a mesma é OP original de algum empenho. Onde é gravado o numero do lote e/ou quebrade empenho em 2 , gerando outro empenho com a diferenca da quantidade.

    Eventos

    Versões

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    28/582

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250ATSD4 ( ) --> lRet

    Retorno

    lRet(logico)

    Atualiza empenho

    Observações

    Exemplos

    User Function A250ATSD4

    Loca lRet := .T.

    //-- Customizações do Cliente

    Return lRet //-- Retorno permite atualizar o empenho ou nao

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    29/582

    A250CHENLOCALIZAÇÃO : Function A250Estoq - Função utilizada para verificar a quantidade em estoque dosempenhos da Ordem de Produção.

    EM QUE PONTO : Executado quando a rotina não encontrar saldo nos empenhos do SDC ou quando osaldo empenhado na tabela SDC não possuir quantidade empenhada suficiente, nestes casos o ponto deentrada e utilizado para forçar um endereço especifico para que a rotina que verifica saldos 'SALDOSBF'force esse endereço informado para verificação de quantidade fisica para produção. Atenção: Este pontode entrada e utilizado em conjunto com o ponto de entrada A250ENDE.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250CHEN ( ) --> cEnd

    Retorno

    cEnd(caracter)

    cEnd - Endereço valido para forçar verificação de saldos na tabela SBF.

    Observações

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    30/582

    Exemplos

    User Function A250CHEN()

    Local aSD4 := ParamIXB[1] //-- Informações do Empenho SD4

    Local nItem := ParamIXB[2] //-- Posição do Registro processado

    Local nCampo := ParamIXB[3] //-- Posição do Item Processado

    Local cEnd := 'Endereço a ser forçado para verificação de saldos'

    //-- Customizações do Cliente

    Return cEnd //-- Retorna um endereço valida para verificação de saldo

    A250DEVAUTLOCALIZAÇÃO : Localizado nas funções A250Estorn, A250Atu, A250Estoq, ExplodeSD4, A250DevAut.

    EM QUE PONTO : O Ponto de Entrada 'A250DEVAUT' permite manipular o conteudo de MV_REQAUT nosapontamentos. Como a leitura do parâmetro poderá ser feito em várias funções diferentes, isto deveráser considerado no ponto de entrada.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    31/582

    Todos

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250DEVAUT ( < PARAMIXB> ) --> cRetDevAut

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Caracter Indica se é A -> Automático ou D -> Digitado X

    Retorno

    cRetDevAut(caracter)

    Retorna se deverá ser A -> Automático ou D -> Digitado

    Observações

    Exemplos

    User Function A250DEVAUT

    Local cReqAut := PARAMIXB[1]

    Local cProgMenu := FunName()Local cFunction := ProcName(3) + ' / ' + ProcName(4)

    Local cOp := If(cProgMenu == 'MATA250', M->D3_OP, '')

    ConOut('-------------------------------------------')

    ConOut('cDevAut : ' + cDevAut)

    ConOut('cProgMenu: ' + cProgMenu)

    ConOut('cFunction: ' + cFunction)

    ConOut('cOp : ' + cOp)

    ConOut('-------------------------------------------')

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    32/582

    Return('D')

    A250ENDELOCALIZAÇÃO : Function A250Atu - Função utilizada para atualizar a tabela de empenhos SD4.

    EM QUE PONTO : Ponto de Entrada executado antes da atualização dos registros de empenhos, esteponto de entrada e utilizado para forçar um endereço especifico na atualização dos empenhos da tabelaSD4.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250ENDE ( ) --> cEnd

    Retorno

    cEnd(caracter)

    cEnd - Endereço valido com quantidade disponivel.

    Observações

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    33/582

    Exemplos

    User Function A250ENDE()

    Local nRegSD4 := ParamIXB[1] //-- Numero do Registro da tabela SD4 que esta sendo

    atualizada

    Local cEnd := 'Endereço valido com saldo disponivel'

    //-- Customizações do Cliente

    Return cEnd //-- Retorna um endereço valida para verificação de saldos

    A250ENOKLOCALIZAÇÃO : Executado na função A250EndOk( ) que e responsavel por validar se pode realizar oencerramento de uma determinada ordem de produção.

    EM QUE PONTO : O ponto é disparado apos a confirmação do encerramento e antes da gravação. Deveser utilizado para validar se o encerramento pode ser efetuado ou nao.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    34/582

    MATA250.PRX

    Sintaxe

    A250ENOK ( ) --> lRet

    Retorno

    lRet(logico)

    Deve retornar um valor logico

    Se retornar .T. o encerramento pode ser feito, se retornar .F. o encerramento nao sera efetuado.

    Se o retorno nao for um valor logico o sistema assume o retorno com valor .T.

    Observações

    Exemplos

    User Function A250ENOK()

    Local lRet := .T.

    //-- Validações Adicionais

    Return lRet //-- Se Verdadeiro valida Encerramento da OP

    A250ENOP

    LOCALIZAÇÃO : Executado na função A250End( ) que e responsavel por encerrar as ordens de produção.

    EM QUE PONTO : O ponto de entrada 'A250ENOP' é executado após o encerramento da Ordem deProdução do produto acabado, antes do encerramento das Ordens de Produção de produtosintermediarios. Criado para definir se processa ou não o encerramento das OPs intermadiarias (filhas)independente do conteudo do parametro MV_PRODAUT.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    35/582

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250ENOP ( ) --> lRet

    Retorno

    lRet(logico)

    Retornar .T. para executar o encerramento das OPs filhas.

    Observações

    Exemplos

    User Function A250ENOP()

    Local lRet := .F.

    //-- Customizações do Cliente

    Return lRet

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    36/582

    A250ETRANLOCALIZAÇÃO : Executado na função A250Inclui( ) que e responsavel por incluir apontamentos deprodução.

    EM QUE PONTO : O ponto de entrada 'A250ETRAN' é executado após gravação total dos movimentos, nainclusão do apontamento de produção simples.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250ETRAN ( ) --> Nil

    Retorno

    Nil(nulo)

    Nil

    Observações

    Exemplos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    37/582

    User Function A250ETRAN()

    //-- Customizações do Cliente

    Return NIL

    A250FLDSLOCALIZAÇÃO : Executado nas funções A250Visual( ), A250Inclui( ) e Mata250( ). Possibilita a Inclusao deCampos do SD3 na Tela da digitacao das Producoes.

    EM QUE PONTO : O Ponto de Entrada e executado na Inclusao e na Visualizacao. Se o retorno for

    diferente de CARACTER ou ARRAY nao inclui nenhum campo.Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250FLDS ( ) --> aNewCampos

    Retorno

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    38/582

    aNewCampos(vetor)

    cVar: Nome do campo a ser incluido

    E.g.: "D3_RATEIO"

    aVar: Array com os campo a serem incluidos.

    E.g.: {"D3_RATEIO"}

    Observações

    Exemplos

    User Function A250FLDS()

    Local aNewCampos := {'D3_OBS','D3_RATEIO'} //-- Array com os campos a serem incluidos

    //-- Validações Adicionais

    Return aNewCampos

    A250FSD4LOCALIZAÇÃO : Executado nas funções A250Atu( ), A250Estoq( ), LoteSD4( ) e ExplodeSD4( ).FILTRO DE REQUISICOES DE EMPENHOS

    EM QUE PONTO : O Ponto de entrada e executado na tela de atualizacao do MATA250. Utilizado parafiltrar as requisições empenhadas na atualização do mesmo. Um retorno logico (.T.) confirma a requisicaodo empenho e um retorno falso não empenha o produto. Se o retorno nao for logico o sistema iraassumir .T.(verdadeiro).

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    39/582

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250FSD4 ( ) --> lRet

    Retorno

    lRet(logico)

    Um retorno logico (.T.) confirma a requisicao do empenho e um retorno falso nao empenha o produto. Se o retorno nao for

    logico o sistema ira assumir .T.(verdadeiro).

    Observações

    Exemplos

    User Function A250FSD4()

    Local lRet := .T.

    //-- Validações Adicionais

    Return lRet

    A250INDILOCALIZAÇÃO : Executado na função A250Atu( ) que e responsavel por atualizar as tabelas relacionadas aprodução.

    EM QUE PONTO : O ponto de entrada 'A250INDI' permite a alteração do índice utilizado no cálculo doEmpenho.

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    40/582

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250INDI ( < cProduto> , < nQtd> , < nPerda> , < nQtdOp> , < nIndice> , < lProdTot> ) --> nRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    cProduto Caracter Código do Produto X

    nQtd Numérico Quantidade a ser apontada X

    nPerda Numérico Quantidade da Perda X

    nQtdOp Numérico Quantidade da Op X

    nIndice Vetor Índice calculado pelo sistema X

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    41/582

    lProdTot Lógico Produção Total (True) ou Parcial(False) X

    Retorno

    nRet(numerico)

    Indice de Perda

    Observações

    Exemplos

    User Function A250INDILocal cProduto := PARAMIXB[01] // Codigo do Produto

    Local nQtd := PARAMIXB[02] // Quantidade a ser apontada

    Local nPerda := PARAMIXB[03] // Quantidade da Perda

    Local nQtdOP := PARAMIXB[04] // Quantidade da OP

    Local nIndice := PARAMIXB[05] // Indice calculado pelo Sistema

    Local lProdTot := PARAMIXB[06] // Protucao Total (True) ou Parcial (False)

    Local nRet := NIL

    If Upper(Substr(cProduto,1,3))=='MIC'

    //-- Customizações do Cliente

    nRet := 10

    EndIf

    Return nRet

    A250ITOK

    O ponto de entrada permite executar qualquer customização antes da gravação de um apontamento deprodução.

    Eventos

    O ponto de entrada é acionado imediatamente após a confirmação da inclusão de um apontamento de produção (botão OK).

    Versões

    Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    42/582

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA250.PRW

    Sintaxe

    A250ITOK ( [ lAtuEmp ] )

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    lAtuEmp Lógico Indica se os empenhos serão atualizados.

    Retorno

    ()

    Observações

    Exemplos

    User Function A250ITOK()

    Local lAtuEmp := ParamIXB

    //Customizações

    Return Nil

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    43/582

    A250PRLTLOCALIZAÇÃO : Executado na função A250DigLot( ) que e responsavel por fazer a digitatação dos Lotesque devem ser criados. NA DIG. DOS LOTES QDO UTILIZA PROD. AUTO

    EM QUE PONTO : O ponto de entrada é chamado linha a linha para trocar / tratar o lote a ser produzido equal sera sua data de validade. Com este ponto é possivel interferir com relação a estes dois valores.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250PRLT ( < PARAMIXB> ) --> aRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Vetor

    Recebe como parametro um array bi-dimensional com as informações:

    PARAMIXB[1] - Lote sugerido pelo sistema ; [2] - Data de Validade sugerida pelo

    sistema ; PARAMIXB[3] - Campo logico (.T.) que ira exibir a getdados para

    confirmacao da sugestao do lote na tela. (PARAMIXB[3], apenas a partir da versao

    X

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    44/582

    5.08)

    Retorno

    aRet(vetor)

    O P.E. deve retornar um array bidimensional com as informacoes:

    [1] Lote a ser utilizado

    [2] Data de validade a ser utilizada

    A partir da versao 508:

    [3] Campo logico onde ira inibir a tela de getdados da sugestao do lote. .F. NÃO exibe a tela

    Observações

    Exemplos

    User Function A250PRLT

    Local cLote := ParamIXB[1] //-- Lote sugerido pelo sistema

    Local cData := ParamIXB[2] //-- Data de Validade sugerida pelo sistema

    Local lExibeLt := ParamIXB[3] //-- Exibir a getdados para confirmação da sugestão do

    lote na tela.

    Local aRet := {}

    //-- Customizações do Cliente

    Return aRet

    A250PRPILOCALIZAÇÃO : Executado na função ExplodeSD4() que e responsavel por processar as produções atravesdo empenho.

    EM QUE PONTO : O ponto de entrada 'A250PRPI' é executado na explosão da estrutura e indica se deve

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    45/582

    ou não fazer produção de produtos intermediários, utilizando o retorno que indica a quantidade que nãodeve ser produzida.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250PRPI ( < PARAMIXB> ) --> nQtdNaoProd

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Numérico Quantidade a ser produzida X

    Retorno

    nQtdNaoProd (numerico)

    Quantidade a não ser produzida para o produto intermediário.

    Observações

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    46/582

    Exemplos

    User Function A250PRPI

    Local nQtdProd:= PARAMIXB[1]

    Local nQtdNProds := 0

    //-- Customizações do Cliente

    If

    nQtdNProds := 12

    EndIf

    Return nQtdNProds

    A250REQAUT (manipula MV_REQAUT nos apontamentos)LOCALIZAÇÃO : Executado nas funções A250Atu( ), A250Estoq( ), LoteSD4( ) e ExplodeSD4( ).

    DESCRIÇÃO : O Ponto de Entrada A250REQAUT permite manipular o conteudo de MV_REQAUT nosapontamentos.Como a leitura do parâmetro poderá ser feito em várias funções diferentes, isto deverá serconsiderado no ponto de entrada.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    47/582

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250REQAUT (manipula MV_REQAUT nos apontamentos) ( < PARAMIXB> ) --> cReqAut

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Vetor Informa MV_REQAUT atual na primeira posição do Array (PARAMIXB[1]) X

    Retorno

    cReqAut(caracter)

    Deverá retornar o valor a ser assumido para MV_REQAUT

    Observações

    Exemplos

    User Function A250REQAUT

    Local cReqAut := PARAMIXB[1]

    Local cProgMenu := FunName()

    Local cFunction := ProcName(3) + ' / ' + ProcName(4)

    Local cOp := If(cProgMenu == 'MATA250', M->D3_OP, '')

    ConOut('-------------------------------------------')

    ConOut('cReqAut : ' + cReqAut)

    ConOut('cProgMenu: ' + cProgMenu)

    ConOut('cFunction: ' + cFunction)

    ConOut('cOp : ' + cOp)

    ConOut('-------------------------------------------')

    Return('D')

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    48/582

    A250SPRCPonto de entrada que pode ser utilizado para substituir a função padrão, que verifica a existência desaldos em processo, quando for acionado o encerramento de uma Ordem de Produção.

    Eventos

    O ponto de entrada será executado quando for acionado o encerramento de uma Ordem de Produção, a partir de um apontamento parcial,

    previamente incluído. O ponto de entrada está localizado no início da função A250Encer, que é responsável pelo encerramento de uma

    Ordem de Produção.

    Versões

    Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    mata250.PRW

    Sintaxe

    A250SPRC ( [ cOP ], [ dDtRef ] ) --> lRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    cOP Caracter Código da ordem de produção que está sendo encerrada.

    dDtRef Data Data de emissão do último apontamento de produção.

    Retorno

    lRet(logico)

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    49/582

    Indica se a OP pode ser encerrada (.T.) ou não (.F.).

    Observações

    Caso o retorno do ponto de entrada seja falso, ou seja, a ordem de produção não pode ser encerrada, será exibido o help

    A250NOENC, alertando sobre a existência de saldo em processo.Importante: Este ponto de entrada deve ser utilizado com cautela, pois ao pemitir o encerramento de uma ordem de produção, com saldo

    em processo, pode acarretar problemas no relatório Registro de Inventário, pois o saldo em processo não poderá ser manipulado, ficando

    neste estado permanentemente.

    Exemplos

    User Function A250SPRC()

    cOP := PARAMIXB[1]

    dDtRef := PARAMIXB[2]lRet := .T.

    //Customizações

    Return lRet

    A250WMSOLOCALIZAÇÃO : Executado na função A250Atu( ) que e responsavel por realizar as atualizações doapontamento de produção.

    DECRIÇÃO : O ponto de entrada 'A250WMSO' permite informar o endereço e a estrutura de origemquando existir o serviço do WMS cadastrado no campo D3_SERVIC.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    50/582

    Todos

    Programa Fonte

    MATA250.PRX

    Sintaxe

    A250WMSO ( < cProduto> , < cOp> ) --> aRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    cProduto Caracter Código do Produto corrente X

    cOp Caracter Código da Op corrente X

    Retorno

    aRet(vetor)

    Retorno esperado do RDMAKE:

    Array[1] = Endereco

    Array[2] = Estrutura

    Observações

    Exemplos

    User Function A250WMSO

    Local cProduto := PARAMIXB[1]

    Local cOp := PARAMIXB[2]

    Local aRet := {}

    If Upper(Substr(cProduto,1,3))=='MIC'

    //-- Customizações do Cliente

    aRet := {'END01'+Space(TamSX3(DB_LOCALIZ)[1]-5),'09'+Space(TamSX3(DB_ESTFIS)[1]-2)}

    EndIf

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    51/582

    Return aRet

    A260GRVLOCALIZAÇÃO : Function a260Processa() - Responsável pelo Processamento da inclusao.

    EM QUE PONTO : Apos confirmada a transferencia, antes de atualizar qualquer arquivo.Pode ser utilizado para validar o movimento ou atualizar o valor de alguma das variaveis disponiveis nomomento.

    Eventos

    Versões

    Advanced Protheus 5.08 , Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA260.PRX

    Sintaxe

    A260GRV ( < UPAR> ) --> lRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    UPAR Qualquer Nenhum X

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    52/582

    Retorno

    lRet(logico)

    Logico:.F. ou .T.

    Observações

    As variaveis utilizadas nos Gets desta rotina sao do tipo PRIVATE, portanto podem ter seu conteudo alterado antes da gravacao efetiva do

    movimento.

    A260INILOCALIZAÇÃO : Function A260IniCpo() - Responsável por inicializar campos a partir do codigo do produto.

    VALIDACAO DOS CODIGOS DE PRODUT

    EM QUE PONTO : E chamado na validacao do codigo do produto origem e na validacao do codigo doproduto destino. Utilizado para validar os codigos ja mencionados.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA260.PRX

    Sintaxe

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    53/582

    A260INI ( < UPAR> ) --> lRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    UPAR Qualquer Nenhum X

    Retorno

    lRet(logico)

    Logico. Caso verdadeiro prossegue com a digitacao. Caso falso bloqueia o • movimento validando o GET e impedindo a

    digitacao de valores incorretos.

    A260LOCLOCALIZAÇÃO : Function A260Local() - Validação do campo cLocOrig.

    EM QUE PONTO : Objetivo desde P.E. é criar no SB2, o produto de origem/local de origem digitados namovimentação

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA260.PRX

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    54/582

    Sintaxe

    A260LOC ( < PARAMIXB> ) --> URET

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Caracter Codigo do Produto e local de origem digitados na movimentação. X

    Retorno

    URET(qualquer)

    Nenhum

    A261LOCLOCALIZAÇÃO : Localizado na função A261Almox( ) antes da validação do produto origem / local origemna tabela SB2.

    EM QUE PONTO : O objetivo deste ponto de entrada e criar na tabela SB2 o produto de origem e local deorigem informados no item da transferencia antes da validação de armazem da função A261Almox( ).

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    55/582

    MATA261.PRX

    Sintaxe

    A261LOC ( < PARAMIXB[1]> , < PARAMIXB[2]> , < PARAMIXB[3]> ) --> Nil

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB[1] Caracter Codigo do Produto. X

    PARAMIXB[2] Caracter Local Informado pelo usuario. X

    PARAMIXB[3] Numérico Tipo de Movimento: 1 - Movimento de Origem ; 2 - Movimento de Destino X

    Retorno

    Nil(nulo)

    Nil

    Observações

    Exemplos

    User Function A261LOC( )

    Local cProduto := ParamIXB[1] //-- Codigo do Produto

    Local cLocInf := ParamIXB[2] //-- Local Informado

    Local nOriDest := ParamIXB[3] //-- 1 - Origem / 2 - Destino

    If nOriDest == 1

    CriaSB2(cProduto,cLocInf) //-- Cria registro no SB2 referente a produto e localinexistente

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    56/582

    EndIf

    Return Nil

    A261PRODLOCALIZAÇÃO : Localizado no final da função A261VldCod( ).

    EM QUE PONTO : Este ponto tem o objetivo de realizar inicializações adicionais de campos da tabela SD3quando o usuario informar o codigo do produto no array do acols . Este ponto e executado no final dafunção A261VldCod( ).

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA261.PRX

    Sintaxe

    A261PROD ( < PARAMIXB[1]> , < PARAMIXB[2]> ) --> lRet

    Parâmetros

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    57/582

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB[1] Caracter Codigo do Produto. X

    PARAMIXB[2] Numérico Tipo de Movimento: 1 - Movimento de Origem ; 2 - Movimento de Destino X

    Retorno

    lRet(logico)

    .T. ou .F.

    Observações

    Exemplos

    User Function A261VldCod( ).

    Local nPosCampo := aScan(aHeader, {|x| AllTrim(Upper(x[2]))=='Campo do Usuario' })

    Local cProduto := ParamIXB[1] //-- Produto

    Local nOrigDest := ParamIXB[2] //-- 1 - Movimento de Origem / 2 - Movimento de Destino

    aCols[n,nPosCampo] := 'Conteudo do Usuario'

    Return lRet

    A261TOKLOCALIZAÇÃO : Localizado no inicio da função A261TudoOk( ) . VALIDACAO DA TRANSFERENCIA M

    EM QUE PONTO : O ponto sera disparado no inicio da chamada da funcao de validacao geral dos itensdigitados. Serve para validar se o movimento pode ser efetuado ou nao.

    Eventos

    Versões

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    58/582

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA261.PRX

    Sintaxe

    A261TOK ( ) --> lRet

    Retorno

    lRet(logico)

    Deve retornar um valor logico indicando:

    RETORNO .T. - Confirma movimento

    RETORNO .F. - Impede execucao do movimento

    Observações

    Exemplos

    User Function A261TOK( )

    Local lRet := .T.

    // 'Validações do Usuario

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    59/582

    Return lRet

    A265COLLOCALIZAÇÃO : Function A265Inclui (inclusão da Distribuição do Produto).

    EM QUE PONTO: É chamado antes da apresentação da Getdados e permite que o conteúdo da mesmaseja alterado (preenchimento ou alteração do aCols), através da manipulação do array aCols, respeitandoos critérios das colunas definidos no array aHeader. Os dois arrays podem ser visualizados no ponto deentrada.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA265.PRX

    Sintaxe

    A265COL ( ) --> ExpL1

    Retorno

    ExpL1(logico)

    Nao precisa haver retorno, o ponto de entrada deve alterar o valor do array aCols diretamente

    Caso retorne .T., continua o processo de inclusão, Caso retorne .F., volta para o browse abandonando a inclusão.

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    60/582

    Observações

    Caso a variavel aCols seja retornada com um tipo diferente de array , sera ignorada pela rotina.

    Exemplos

    User Function A265COL()

    Local nx := 0

    Local nCounter:=Len(aCols)

    Local nPosData

    If nCounter == 1

    For nx = 1 To Len(aHeader)If Trim(aHeader[nx][2]) == 'DB_DATA'

    nPosData:=nX

    EndIf

    Next

    aCols[nCounter][nPosData] := dDataBase

    EndIf

    Return

    A280OKLOCALIZAÇÃO : Function MATA280 - Virada de Saldos no Estoque.

    EM QUE PONTO : Executada após a confirmação da virada dos saldos, ponto utilizado para validar se serápermitida a execução da rotina.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    61/582

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA280.PRX

    Sintaxe

    A280OK ( [ dDataFec ] ) --> lRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    dDataFec data Data de Fechamento de Estoque

    Retorno

    lRet ( logico )

    Retornando falso (.F.), não efetuará o processamento, caso contrário seguirá executando a rotina.

    Observações

    Exemplos

    User Function A280OK()

    Local lRet := .T.

    //-- Validações Adicionais do usuário

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    62/582

    Return lRet

    A290ABCLOCALIZAÇÃO : Este Ponto de Entrada está localizado na função A290CalLot (Cálculo do Lote Econômico).

    EM QUE PONTO : É executado APÓS a gravação da CLASSE. Com o arquivo de demandas (SB3) locado eposicionados: cad.produtos (SB1) ou, a partir da MP8.11, indicadores do produto (SBZ), permite amanipulação do registro do SB3.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA290.PRX

    Sintaxe

    A290ABC ( ) --> Nil

    Retorno

    Nil(nulo)

    Nil

    Observações

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    63/582

    Exemplos

    User Function A290ABC()

    // Rotina do usuário para manipulação do arquivo de demandas (SB3)

    Return NIL

    A290AJULLOCALIZAÇÃO : Este Ponto de Entrada está localizado na função A290AjuLot (Ajusta o lote econômico

    pelo valor disponível para compras).

    EM QUE PONTO : É executado APÓS o cálculo; seu objetivo é que o usuário possa manipular os valorescalculados do lote econômico que serão ajustados pela rotina A290AjuLot().

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA290.PRX

    Sintaxe

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    64/582

    A290AJUL ( < PARAMIXB> ) --> nLote

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Vetor Array com 2 posições { cProduto , nLote } X

    Retorno

    nLote(numerico)

    Novo lote econômico ajustado a ser gravado para o produto.

    Observações

    IMPORTANTE:Somente ajusta se o valor informado nao conseguir comprar pelo menos 85% da necessidade calculada.

    Exemplos

    User Function A290Ajul()

    Local cProduto := ParamIxb[1] // Código do ProdutoLocal nLote := ParamIxb[2] // Lote Econômico atual calculado * nDif

    /*

    (valor de ajuste normal que seria gravado no lote econômico)

    Obs.: nDif = (Valor Disponível / Total das compras no mês), sendo nDif sempre < 0.85

    */

    // Rotina para ajuste da qtde. do lote econômico desenvolvida pelo usuário

    Return (nLote)

    A290CALLLOCALIZAÇÃO : Este Ponto de Entrada está localizado na função A290CalLot (Cálculo do Lote Econômico).

    EM QUE PONTO : É executado APÓS o cálculo; seu objetivo é que o usuário possa manipular o valor dolote econômico calculado para o produto.

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    65/582

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA290.PRX

    Sintaxe

    A290CALL ( < PARAMIXB> ) --> nLote

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB VetorPARAMIXB[1]-> Código do Produto ; PARAIXB[2]->Qtde. do Lote Econômico atual

    calculadoX

    Retorno

    nLote(numerico)

    Nova qtde. do lote econômico a ser gravado para o produto.

    Observações

    Exemplos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    66/582

    User Function A290CALL()

    Local cProduto := ParamIxb[1]

    Local nLote := ParamIxb[2]

    // Rotina para ajuste da qtde. do lote econômico desenvolvida pelo usuário

    Return (nLote)

    A290CALPLOCALIZAÇÃO : Executado na função A290CalNor, que realiza o cálculo normal da média de consumos(utiliza os pesos).

    EM QUE PONTO : O ponto de entrada 'A290CALP' é executado antes do cálculo da média, e deve serutilizado para manipular o número de meses considerados para cálculo, entre os meses inicial deconsumo (B1_CONINI) e o mês referência para o cálculo (desde que o ponto de entrada retorne umarray).

    Eventos

    Versões

    Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA290.PRX

    Sintaxe

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    67/582

    A290CALP ( < ParamIxb> ) --> ExpA1

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    ParamIxb Vetor (Para mais detalhes vide Obs) X

    Retorno

    ExpA1(vetor)

    Retornar um array dos pesos dos meses considerados para cálculo.

    Observações

    O ponto de entrada recebe como parâmetro um array (ParamIXB), contendo o número de meses que serão considerados e o alias das

    tabelas SB1 e SB3.

    ParamIxb[1] --- No.de meses considerados p/ cálculo.

    ParamIxb[2] --- Array com os pesos dos meses considerados p/ cálculo

    ParamIxb[3] --- Array com os pesos configurados no parâmetro MV_PESOS

    ParamIxb[4] --- Alias da tabela SB1

    ParamIxb[5] --- Alias da tabela SB3

    Exemplos

    User Function A290CALP()

    Local nMeses := ParamIxb[1]

    Local aPesos := ParamIxb[2]

    Local aPesosOrig := ParamIxb[3]

    Local cAliasSB1 := ParamIxb[4]Local cAliasSB3 := ParamIxb[5]

    //-- Rotina de customização do usuário.

    Return (aPesos)

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    68/582

    A290CAPPLOCALIZAÇÃO : Este Ponto de Entrada está localizado na função A290CalLot (Cálculo do Lote Econômico).

    EM QUE PONTO : É executado APÓS o cálculo e ANTES da gravação do ponto de pedido; seu objetivo é

    que o usuário possa manipular o valor do ponto de pedido calculado para o produto.Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA290.PRX

    Sintaxe

    A290CAPP ( [ PARAMIXB ] ) --> nPtPed

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB VetorPARAMIXB[1]->Código do Produto ; PARAMIXB[2]->Qtde. do Ponto de Pedido atual

    calculado

    Retorno

    nPtPed (numerico)

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    69/582

    Nova qtde. do Ponto de Pedido a ser gravado para o produto.

    Observações

    Exemplos

    User Function A290CAPP()

    Local cProduto := ParamIxb[1]

    Local nPtPed := ParamIxb[2]

    // Rotina desenvolvida pelo usuário para ajuste do ponto de pedido

    Return (nPtPed)

    A290CONSLOCALIZAÇÃO : Este Ponto de Entrada está localizado na função A290CalCon (Recálculo do consumomédio do mês)

    EM QUE PONTO : É executado ANTES da gravação do consumo mensal calculado pelo sistema e seuobjetivo é que o usuário possa manipular a quantidade do consumo mensal a ser gravado para o produto.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    70/582

    MATA290.PRX

    Sintaxe

    A290CONS ( [ PARAMIXB ] ) --> nConsumo

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Vetor

    O ponto de entrada recebe como parametro um array com as seguintes

    informacoes: PARAMIXB[1]->Código do Produto ; PARAMIXB[2]->Quantidade do

    consumo mensal do produto

    Retorno

    nConsumo(numerico)

    O retorno (quando numérico), será o novo consumo mensal do produto.

    Observações

    Exemplos

    User Function A290CONS()

    Local cProduto := ParamIxb[1]

    Local nConsumo := ParamIxb[2]

    // Rotina desenvolvida pelo usuário para ajuste do consumo mensal do produto

    Return (nConsumo)

    A290CSD2LOCALIZAÇÃO : Este Ponto de Entrada está localizado na função A290CalCon (Recálculo do consumomédio do mês)

    EM QUE PONTO : É executado DURANTE o cálculo; seu objetivo é que o usuário possa validar itens dasNFs de Saída (SD2), que farão parte do recálculo do consumo médio do mês.

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    71/582

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA290.PRX

    Sintaxe

    A290CSD2 ( [ PARAMIXB ] ) --> lRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Vetor ParamIxb[1] = expressão caracter, indicando o Alias do arquivo SD2.

    Retorno

    lRet(logico)

    .T. - Recalcula o registro corrente SD2

    .F. - Nao recalcula o registro corrente SD2

    Observações

    A partir da MP8.11, utilize preferencialmente o Ponto de Entrada M290QSD2 para filtro no arquivo SD2.

    Exemplos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    72/582

    User Function A290CSD2()

    Local lRet := .T.

    // Validação do usuário, no registro do arquivo SD2

    Return (lRet)

    A320CUSMLOCALIZAÇÃO: Na função MA320STRU() (cálculo do custo standard pela estrutura).

    EM QUE PONTO: Será executado no momento em que a rotina obtém o custo standard do produto(B1_CUSTD).

    Este ponto de entrada permite ao usuário obter um novo custo standard para o produto através de umafórmula ou outra regra desejada. Por exemplo, se o custo standard da matéria-prima estiver em moedadiferente do produto acabado, será possível obter a taxa referente à moeda da MP e converter o custopara a moeda do PA.

    Importante: deve-se observar o uso do parâmetro "MV_ARQPROD" para se obter corretamente asinformações de indicadores do produto (custo standard, moeda do custo standard, estoque máximo,

    etc.). Este tratamento ficará a cargo da rotina a ser criada pelo usuário.

    PARÂMETROS:

    O parâmetro enviado ao ponto de entrada estará no array PARAMIXB, sendo:

    { cProduto }, onde:

    cProduto: Código do produto para se obter o custo standard

    O valor de retorno do ponto de entrada deverá ser do tipo numérico, representando o novo custostandard para o produto.

    Eventos

    Versões

    Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    73/582

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA320.PRW

    Sintaxe

    A320CUSM ( [ @PARAMIXB ] ) --> nCusto

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Array of Record { cProduto } : código do produto a se obter o custo standard X

    Retorno

    nCusto(numerico)

    Novo valor do custo standard para o produto.

    Observações

    Exemplos

    User Function A320CUSM()

    Local cProduto := PARAMIXB[1]

    Local nCusto := 0

    // Rotina criada pelo usuário para localizar a taxa

    // diária da moeda 2 (Dólar)

    nCusto := CustMoeda2( cProduto )

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    74/582

    Return (nCusto)

    A320CUSTLOCALIZAÇÃO : Function MA320CalcT() - Função utilizada para gravar o custo de acordo com o calculo dosimpostos.

    EM QUE PONTO : Executada após a gravação dos custos com o calculo dos impostos. Calculo do Custo deReposição com IPI e ICM - Chamado no programa de atualizacao do custo Standard. Este ponto executa ocalculo do custo com os impostos ICM e IPI.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA320.PRX

    Sintaxe

    A320CUST ( < PARAMIXB> ) --> Nil

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Array of Possui como parametro um vetor contendo o valor do Icm e do Ipi ja X

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    75/582

    Record calculados.

    Retorno

    Nil(nulo)

    Nil

    Observações

    Exemplos

    User Function A320CUST()

    nIcms := ParamIXB[1] // Valor Icms

    nIpi := ParamIXB[2] // Valor Ipi

    //-- Customizações

    Return Nil

    A320CUSTDLOCALIZAÇÃO : Function MA320LCust() - Função utilizada para atualizar o custo standard (B1_CUSTD)baseado no ultimo custo de NF de compra .

    EM QUE PONTO : Executada após a gravação dos custos nas tabelas SB1 / SBZ.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    76/582

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA320.PRX

    Sintaxe

    A320CUSTD ( ) --> Nil

    Retorno

    Nil(nulo)

    Nil

    Observações

    Exemplos

    User Function A320CustD()

    // Customizações do Usuario

    Return Nil

    A320CUSTRPonto de entrada executado após o cálculo e gravação do custo standard para cada produto, calculadopela estrutura, permitindo customizações do usuário.

    Eventos

    Chamado na função MA320Estru() - Cálculo do custo standard pela estrutura.

    Versões

    Protheus 10

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    77/582

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA320.PRX

    Sintaxe

    A320CUSTR ( [ ParamIxb[1] ], [ ParamIxb[2] ] ) --> Null

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    ParamIxb[1] Array of Record Cód.do Produto

    ParamIxb[2] Array of Record Valor do novo custo gravado

    Retorno

    Null()

    Observações

    Exemplos

    User Function A320CUStr()

    Local cCodProd := ParamIXB[1] // Codigo do ProdutoLocal nCusto := ParamIXB[2] // Valor do novo custo gravado

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    78/582

    // Customizações do Usuario

    Return Nil

    Aprovado Pela Qualidade

    Sim

    Nível Acesso

    Nível 1 (Acesso Clientes)

    Idioma

    Espanhol , Inglês

    Variáveis

    Nome Tipo Escopo Pode Alterar? Descrição

    cFilAnt Caracter Público Sim Código da filial sendo processada

    A320LOOPLOCALIZAÇÃO : Function MostraProc() - Função utilizada para realizar o acertos dos niveis do SG1

    EM QUE PONTO : Este ponto de Entrada permite manipular o arquivo de trabalho do SG1.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    79/582

    Base de Dados

    Todos

    Programa Fonte

    MATA320.PRX

    Sintaxe

    A320LOOP ( < PARAMIXB[1]> , < PARAMIXB[2]> , < PARAMIXB[3]> ) --> Nil

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB[1] Caracter PARAMIXB[1] - Nome do Arquivo de Trabalho do SG1 Temporario; X

    PARAMIXB[2] Caracter PARAMIXB[2] - Componente 'G1_COMP' que gerou a recusividade; X

    PARAMIXB[3] Caracter PARAMIXB[3] - Nivel Atual do Componente 'G1_NIVEL' X

    Retorno

    Nil(nulo)

    Nil

    Observações

    Exemplos

    User Function A320LOOP()

    Local cArqTrab := ParamIXB[1]

    Local cComp := ParamIXB[2]

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    80/582

    Local cNivelCom := ParamIXB[3]

    //-- Customizações

    Return Nil

    A330CDEV

    Ponto de Entrada utilizado para permitir que os movimentos de devolução de compras sejamcontabilizados nas rotinas Recálculo do Custo Médio (MATA330) e Contabilização do Custo Médio(MATA331).

    Versões

    Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA330.PRX e MATA331.PRX

    Sintaxe

    A330CDEV ( [ ] ) --> LRET

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    81/582

    Array of Record

    Retorno

    LRET( )

    .T. = CONTABILIZA 678 .F. = NÃO CONTABILIZA

    Observações

    Exemplos

    #INCLUDE “RWMAKE.CH”

    User Function A330CDEV()

    Local lRet := .T.

    Return lRet

    A330D1CPLOCALIZAÇÃO : Este Ponto de Entrada está localizado na função GravaCusCP (Grava os custos em partesdos movimentos)

    EM QUE PONTO : É executado na atualização dos custos na rotina de recalculo do custo medio'MATA330', seu objetivo é que o usuario possa manter os custos em partes já informados na execução darotina de recalculo do custo medio.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    82/582

    Todos

    Programa Fonte

    SIGACUSA.PRX

    Sintaxe

    A330D1CP ( ) --> Nil

    Retorno

    Nil(nulo)

    Nil

    Observações

    Exemplos

    User Function A330D1CP( )

    Local lRet := .T.

    //Validações Adicionais

    Return lRet

    A330E6CPLOCALIZAÇÃO : Function GravaCusCP - Função utilizada para atualizar o custo em partes dos movimentos.

    EM QUE PONTO : Executada antes de realizar a atualização do custo em partes. O Ponto de Entrada eutilizado para verificar se deseja manter o valores do custo em partes para movimentos internosRE6/DE6.

    Eventos

    Versões

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    83/582

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    SIGACUSA.PRX

    Sintaxe

    A330E6CP ( ) --> lRet

    Retorno

    lRet(logico)

    .T. - Não devera atualizar o custo em partes do movimento SD3

    .F. - Atualizar todos os movimentos SD3 ("Padrão do Sistema")

    Observações

    o ponto de entrada devera retornar uma variavel logica, sendo:

    .T. - Mantem os custos em partes já informados no SD3, porem se houver divergencias entres o conteudo

    informado dos custos em partes com o D3_CUSTO1 o sistema ira recalcular o custo em partes.

    .F. Padrão do sistema, atualiza automaticamente o custo em partes.

    Exemplos

    User Function A330E6CP()

    Local lRet := .T.

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    84/582

    //-- Validações do Cliente

    Return lRet

    A330GRUP

    O ponto de entrada A330GRUP será utilizado para definir se na apuração do custo da mão-de-obra,será considerado o grupo contábil informado no cadastro do produto por meio do campo 'Gr cnt Custo'(B1_GCCUSTO).

    Versões

    Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todas TotvsDbAccess

    Programa Fonte

    MATA330.PRX

    Sintaxe

    A330GRUP ( [ cCodPesq ], [ cCodCC ], [ cGrupo ], [ ] ) --> lGrupo

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    cCodPesq Caracter codigo do produto

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    85/582

    cCodCC Array of Record codigo do centro de custo

    cGrupo Array of Record grupo contabil

    Array of Record

    Retorno

    lGrupo ( )

    .T. -> Considera o grupo contabil na apuração do custo da mão-de-obra. .F. -> Não sera considerado o grupo contabil na

    apuração do custo da mão-de-obra.

    Observações

    Exemplos

    #INCLUDE "RWMAKE.CH"

    USER FUNCTION A330GRUP()

    Local lRet := .T.

    // Customizacoes do cliente

    RETURN lRet

    A330QTMOLOCALIZAÇÃO : Function A330MOD - Função utilizada para recalcular os movimentos para produtos MOD.

    DESCRIÇÃO : Ponto de entrada utilizado para realizar ajustes na quantidade apurada da mão-de-obra,este ponto e executado antes da gravação do registro do MOD na tabela SB2

    Eventos

    Versões

    Microsiga Protheus 8.11

    Países

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    86/582

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA330.PRX

    Sintaxe

    A330QTMO ( ) --> Nil

    Retorno

    Nil(nulo)

    Nil

    Observações

    Exemplos

    User Function A330QTMO()

    Local cProduto:= SB2->B2_COD

    Local cLocal := SB2->B2_LOCAL

    Local nNewQuant := 0

    //-- Customizações do Rdmake

    SB2->B2_QFIM := nNewQuant

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    87/582

    Return NIL

    A460TESN3LOCALIZAÇÃO: Funções ReportPrint(), R460Imp( ) - Funções utilizadas para imprimir o relatório doregistro de inventário modelo 7.

    EM QUE PONTO : O ponto de entrada somente é executado se a pergunta '“Saldo em Poder 3?” =Sim ecaso o ponto de entrada retorne verdadeiro (.T.), considerará saldo poder de terceiros também nasmovimentações c/ TES que NÃO atualizam estoque).

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATR460.PRX

    Sintaxe

    A460TESN3 ( < PARAMIXB> ) --> lRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Vetor Através do array ParamIxb, define-se os parâmetros: ParamIxb[1] = Cód.do Produto X

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    88/582

    que está sendo lido ; ParamIxb[2] = Data do fechamento utilizada no relatório.

    Retorno

    lRet(logico)

    .T. = Considera TES que não atualizam estoque, nas movimentações de/em Terceiros,

    .F. = não considera TES que não atualizam estoque, nas movimentações de/em Terceiros.

    Observações

    Exemplos

    User Function A460TESN3()

    Local cCod := ParamIXB[1] //-- Código do Produto

    Local dDataFech := ParamIXB[2] //-- Data de Fechamento

    Local lRet := .T.

    //-- Considerações realizadas pelo cliente para computar ou não saldo poder de

    terceiros nas movimentações com TES que NÃO atualizam estoque.

    Return lRet

    A460TUNILOCALIZAÇÃO : Funções ReportPrint(), R460Imp( ), R460Terceiros - Funções utilizadas para imprimir orelatório do registro de inventário modelo 7.

    DESCRIÇÃO : O ponto de entrada permite a gravação do arquivo de trabalho utilizado na impressão dorelatório. O usuário pode regravar os valores de acordo com suas necessidades. Os principais campos doarquivo de trabalho que devem ser utilizados são: TOTAL, VALOR_UNIT e QUANTIDADE.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    89/582

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA460.PRX

    Sintaxe

    A460TUNI ( ) --> Nil

    Retorno

    Nil(nulo)

    Nil

    Observações

    Exemplos

    User Function A460TUNI()

    Local cCod := ParamIXB[1] //-- Codigo do Produto

    Local cLocOrig := ParamIXB[2] //-- Conteúdo do parâmetro MV_ALMTERC

    Local dDataFech := ParamIXB[3] //-- Data de Fechamento

    Local cArqTemp := ParamIXB[4] //-- Nome do Arquivo de Trabalho utilizado no Relatorio

    Local nTotal := 0

    Local nVlrUnit := 0

    Local nQuant := 0

    //-- Ajustes realizados pelo cliente para os campos TOTAL, VALOR_UNIT e QUANTIDADE,que serão utilizado na composição do relatorio.

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    90/582

    TOTAL := nTotal

    VALOR_UNIT := nVlrUnit

    QUANTIDADE := nQuant

    Return Nil

    A460UNITLOCALIZAÇÃO : Funções ReportPrint(), R460Imp( ), R460EmProcesso( ) - Funções utilizadas para imprimiro relatório do registro de inventário modelo 7.

    DESCRIÇÃO : O ponto de entrada permite a gravação do arquivo de trabalho utilizado na impressão dorelatório. O usuário pode regravar os valores de acordo com suas necessidades. Os principais campos doarquivo de trabalho que devem ser utilizados são: TOTAL, VALOR_UNIT e QUANTIDADE.

    Eventos

    Versões

    Advanced Protheus 5.08 , Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATR460.PRX

    Sintaxe

    A460UNIT ( [ PARAMIXB[1] ], [ PARAMIXB[2] ], [ PARAMIXB[3] ], [ PARAMIXB[4] ] ) --> Nil

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    91/582

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB[1] Caracter Codigo do produto que esta sendo gravado

    PARAMIXB[2] Caracter Armazem do saldo/movimento

    PARAMIXB[3] Data Data do fechamento utilizada no relatorio

    PARAMIXB[4] Caracter Nome do arquivo de trabalho

    Retorno

    Nil(nulo)

    Nenhum

    Observações

    Exemplos

    User Function A460UNIT()

    Local cCod := ParamIXB[1] //-- Codigo do Produto

    Local cLocOrig := ParamIXB[2] //-- Armazem do Saldo / Movimento

    Local dDataFech := ParamIXB[3] //-- Data de Fechamento

    Local cArqTemp := ParamIXB[4] //-- Nome do Arquivo de Trabalho utilizado no Relatorio

    Local nTotal := 0

    Local nVlrUnit := 0

    Local nQuant := 0

    //-- Ajustes realizados pelo cliente para os campos TOTAL, VALOR_UNIT e QUANTIDADE,

    que serão utilizado na composição do relatorio.

    TOTAL := nTotal

    VALOR_UNIT := nVlrUnitQUANTIDADE := nQuant

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    92/582

    Return Nil

    A650AVALEM QUE PONTO : Permite validar a avaliacao de credito cliente quando utiliza esta opcao na geracao deOP por vendas.Após a validação pelo sistema o ponto de entrada é acionado.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA650.PRX

    Sintaxe

    A650AVAL ( < PARAMIXB[1]> ) --> lRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB[1] LógicoRecebe um valor logico com o resultado da avaliacao de credito feita pelo

    sistema: e receber .T. , CREDITO OK. Se receber .F., CREDITO COM PROBLEMA.X

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    93/582

    Retorno

    lRet(logico)

    Deve retornar se o credito esta OK (.T.) ou nao (.F.)

    A650CCFLOCALIZAÇÃO : Function MontEstru() - Responsável por montar array com estrutura do produto.

    EM QUE PONTO : Ponto de entrada para verificar se o produto sera fabricado ou comprado.ALTERA TIPO DO COMPONENTE NA INCL DE OP

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA650.PRX

    Sintaxe

    A650CCF ( < PARAMIXB> ) --> URET

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    94/582

    PARAMIXB VetorPossui como parametro um vetor com os parametros do acols: componente, tipo, •

    data prevista de inicio (C2_DATPRI) e linha do aCols.X

    Retorno

    URET(qualquer)

    Caracter representando o tipo do componente.

    Sera desprezado se nao for "F", "C" ou "I".

    F - fabricado

    C - comprado

    I - ignorado (nao gera SC nem OP)

    A650OKSCLOCALIZAÇÃO : Function A650GeraC1() - Responsável por gerar Solic. para produto na quantidadeinformada via parametro.

    EM QUE PONTO : Utilizado antes da geracao da solicitacao de compra para validar se a mesma seragerada ou nao. INDICA SE DEVE GERAR SOLICITACAO DE COMP

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

    Programa Fonte

    MATA650.PRX

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    95/582

    Sintaxe

    A650OKSC ( < PARAMIXB> ) --> lRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB Vetor

    Recebe como parametro um array contendo as seguintes informacoes:

    PARAMIXB[1]->Codigo do Produto ; PARAMIXB[2]->Quantidade da Solicitacao ;

    PARAMIXB[3]->Ordem de Producao

    X

    Retorno

    lRet(logico)

    Deve ter um retorno logico que indicara se deve ser gerada a SC (.T.) ou nao • (.F.)

    A650OPILOCALIZAÇÃO : Function MontEstru() - Responsável por monta array com estrutura do produto.

    EM QUE PONTO : O ponto de entrada é chamado na verificacao de necessidade de geracao de OPsintermediarias ou nao. Pode ser utilizado para um determinado produto que deve ser empenhado poremnao deve ter OP gerada.INDICA SE GERA OP INTERMEDIARIA OU NAO

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    96/582

    Programa Fonte

    MATA650.PRX

    Sintaxe

    A650OPI ( < UPAR> ) --> URET

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    UPAR Qualquer

    Recebe como parametro a linha da GetDados em que o processamento se encontra.

    Atraves deste numero podemos utilizar as informacoes referentes ao produto, •

    almoxarifado, lote, sub-lote, qtd, etc.

    X

    Retorno

    URET(qualquer)

    Logico.

    Caso seja .T. (verdadeiro) o sistema ira gerar a Op intermediaria •

    A650PRCPVLOCALIZAÇÃO : Function AvalMarca() - Se o pedido estiver marcado ele gerará a OP

    EM QUE PONTO : Ponto de entrada que permite validar a marcação de um item na tela de seleção deitens de pedido de venda para geração de Ordem de Produção.

    Eventos

    Versões

    Advanced Protheus 5.08 , Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    97/582

    Base de Dados

    Todos

    Programa Fonte

    MATA650.PRX

    Sintaxe

    A650PRCPV ( ) --> lRet

    Retorno

    lRet(logico)

    Parametro logico que indica se item poderá ser marcado (retorno .T.) ou nao (retorno .F.)

    A650PROCLOCALIZAÇÃO : Function MATA650() - Responsável pelo cadastramento de Ordens de Produção.

    EM QUE PONTO : O ponto de entrada 'A650PROC' é executado após o processamento da inclusão da(s)Op(s) e/ou solicitação de compra(s). Dependendo do número de Op´s ou solicitações de compras queforam processadas não é possível estar posicionado em tais registros, ou seja, se o cliente necessitarposicionar em um Op ou solicitação de compras específica, o mesmo deverá se encarregar disso.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

    Todos

    Base de Dados

    Todos

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    98/582

    Programa Fonte

    MATA650.PRX

    Sintaxe

    A650PROC ( ) --> Nil

    Retorno

    Nil(nulo)

    Nil

    Observações

    Exemplos

    User Function A650PROC()

    //Implementação do cliente

    Return Nil

    A650SALDOLOCALIZAÇÃO : Funcão AvalMarca (Se o Pedido estiver marcado sera gerada a OP).

    DESCRIÇÃO : Este P.E. tem como objetivo tratar Saldo Disponivel.

    Eventos

    Versões

    Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10

    Países

    Todos

    Sistemas Operacionais

  • 8/15/2019 91199875 Ponto de Entrada Estoque e Custos

    99/582

    Todos

    Programa Fonte

    MATA650.PRX

    Sintaxe

    A650SALDO ( < PARAMIXB[1]> ) --> nRet

    Parâmetros

    Nome Tipo Descrição Default Obrigatório Referência

    PARAMIXB[1] Numérico (Vide Observações) X

    Retorno

    nRet(qualquer)

    O Retorno devera ser o Saldo Disponivel do Estoque (Tipo "N" ->Numerico)

    Observações

    Parâmetro:

    Passa como parametro uma variavel que controla se existe saldo em estoque.

    O conteudo desta variavel sera igual a: •