Base de conhecimento
Encontre respostas para suas dúvidas em quatro fontes de conhecimento diferentes ao mesmo tempo, simplificando o processo de pesquisa.
  1. Central de Atendimento TOTVS
  2. TOTVS Agro
  3. TOTVS Agro - Comercialização (Linha Protheus)
  4. Originação de Grãos (OG)
Central do Cliente

Agro - Linha Protheus - AGR - Pontos de Entradas que manipulam pedido de venda

time.png Tempo aproximado para leitura: 00:04:00 min

Dúvida
Quais são os Pontos de Entradas que manipulam pedido de venda?

Ambiente
TOTVS Agro – TOTVS Agro – Comercialização (Linha Protheus) - Originação de Grãos (OG) – Versão 12

Solução
Para solucionar essa dúvida, realize os seguintes passos:

1. Analise o Ponto de Entrada para manipular dados do Pedido de Venda;
Características do Requisito.

Linha de Produto:

Microsiga Protheus

Segmento:

Agroindústria

Módulo:

SIGAAGR

Rotina:

Rotina

Nome Técnico

OGA300

Acordo de Troca

Ponto de Entrada:

AG300APVAC

País(es):

Todos

Versões/Release:

11.80.20

Ponto de Entrada.

Localização:

Ao confirmar Acordo de Troca.

Programa Fonte:

OGA300

Função:

Permitir manipular dados do Pedido de Venda do Acordo de Troca.

Retorno:

Nome

Tipo

Descrição

Obrigatório

 AG300APVAC

Nenhum

Envia como parâmetro array do cabeçalho e itens do Pedido de Venda

Não

 Exemplo:

#include 'protheus.ch' #include 'parmtype.ch' 

user function AG300APVAC ()

    Local oModel := aClone(PARAMIXB[1])
    Local aCab := aClone(PARAMIXB[2])
    Local aItens := aClone(PARAMIXB[3])
    Local aRet := {} //Customizações do usuário

aAdd( aCab, {"C5_MEUCAMPO"  , 'Valor'       , Nil } )

 aRet := {aCab,aItens}

2. Verifique o Ponto de Entrada para controlar dados específicos do Pedido de Venda Após Gravação;
Características do Requisito.
 

Linha de Produto:

Microsiga Protheus

Segmento:

Agroindústria

Módulo:

SIGAAGR

Rotina:

Rotina

Nome Técnico
OGX008

Geração do Documento de Saída
Ponto de Entrada: OG008DPSPV

País(es):

Todos

Versões/Release:

12.1.23

Ponto de Entrada.

Descrição: Permite controlar dados específicos do Pedido de Venda.

Localização:

MenuDef  

Programa Fonte:

OGX008

Função:

OG008DPSPV

Retorno:

Nome

Tipo

Descrição

Obrigatório

OG008DPSPV

Array

Parâmetros enviados: {aCab,aItens}

NÃO

Exemplo:

#Include 'Protheus.ch'
#include "fwmvcdef.ch"

User Function OG008DPSPV()
                Local aCab := aClone(PARAMIXB[1])
                Local aItens := aClone(PARAMIXB[2])
                Local aRet := {} //Customizações
                
                aAdd( aCab, {"C5_MEUCAMPO"  , 'Valor'       , Nil } )
                
                aRet := {aCab,aItens}
                
   

3. Acesse os dados do romaneio, logo após a atualização d0 Ponto de Entrada;

 

Linha de Produto:

Microsiga Protheus

Segmento:

Agroindústria

Módulo:

SIGAAGR

Rotina:

Rotina

Nome Técnico

OGA250C

Funções de atualização do romaneio.

País(es):

Todos

Ponto de Entrada.

Localização:

Ao confirmar romaneio de produção.

Programa Fonte:

OGA250C

Retorno:

Nome

Descrição

OG250ATLZ

Permite acessar os dados do romaneio que já está atualizado.

  • Tem como parâmetro a filial do romaneio e o número do romaneio.

Exemplo:

#include 'protheus.ch'
#include 'parmtype.ch'

//A execução deste PE não influencia na rotina independente do que este PE retorne.
user function OG250ATLZ()

     Local cFilRom := PARAMIXB[1]
     Local cNumRom := PARAMIXB[2]

     DbSelectArea( "NJJ" )
     DbSetOrder( 1 )
     If NJJ->( DbSeek( cFilRom + cNumRom ) )
          alert("Achou o romaneio atualizado: " + cNumRom )
     endIf

4. Acesse os dados do romaneio, logo após sua confirmação do Ponto de Entrada;

Linha de Produto:

Microsiga Protheus

Segmento:

Agroindústria

Módulo:

SIGAAGR

Rotina:

Rotina

Nome Técnico

OGA250G

Funções de confirmação do romaneio.

País(es):

Todos

Ponto de Entrada.

Localização:

Ao confirmar romaneio de produção.

Programa Fonte:

OGA250G

Retorno:

Nome

Descrição

OG250CFRM

Permite acessar os dados do romaneio que já está confirmado, independente do tipo do romaneio.

  • Tem como parâmetro a filial do romaneio e o número do romaneio.

Exemplo:

#include 'protheus.ch'
#include 'parmtype.ch'

//A execução deste PE não influencia na rotina independente do que este PE retorne.
user function OG250CFRM()

     Local cFilRom := PARAMIXB[1]
     Local cNumRom := PARAMIXB[2]

     DbSelectArea( "NJJ" )
     DbSetOrder( 1 )
     If NJJ->( DbSeek( cFilRom + cNumRom ) )
          alert("Achou o romaneio confirmado: " + cNumRom )
     endIf

5. Analise o Ponto de entrada para bloqueio de confirmação do Romaneio;
Características do Requisito.

 

Linha de Produto:

Protheus

Segmento:

Agroindústria

Módulo:

SIGAAGR

Ponto de Entrada.

Descrição:

Permitir intervir na confirmação do romaneio(com e sem pesagem).

Localização:

Antes de confirmação do romaneio.

Programa Fonte:

OGA250

Parâmetros:
Nome
Tipo
Descrição
Obrigatório
PARAMIXB[1] Caracter Filial do romaneio Sim
PARAMIXB[2] Caracter Código do romaneio Sim

Retorno:
Nome
Tipo
Descrição
Obrigatório
lRet Lógico

Valida a continuação do processo de confirmação. 

 Sim
Observação: Não se aplica.
Exemplo: XGFECALF
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#include 'protheus.ch'
#include 'parmtype.ch'
 
user function OG250NFVD()
    Local cFilPed   := PARAMIXB[1]
    Local cNumRom   := PARAMIXB[2]
    Local lRet      := .F.
 
    DbSelectArea( "NJJ" )
    DbSetOrder( 1 )
    If NJJ->( DbSeek( cFilPed + cNumRom ) )
        alert("Romaneio barrado pelo PE: " + cNumRom )
    endIf
     
Return lRet

6. Verifique o Ponto de Entrada para Gerar Pedido de Vendas Confirmação de Serviços;
Características do Requisito.
 

Localização:

Características do Requisito. gerar/gravar os romaneios sem pesagem de origem e destino da transferência simples.

Programa Fonte:

OGA261A

Função:

Permitir manipular dados do Pedido de Venda de Serviços.

Retorno:

Nome

Tipo

Descrição

Obrigatório

OG261APV

Nenhum

Envia como parâmetro array do cabeçalho e itens do Pedido de Venda

NÃO

Exemplo:

#include 'protheus.ch'
#include 'parmtype.ch'

user function OG261APV()

Local aCab := aClone(PARAMIXB[1])
Local aItens := aClone(PARAMIXB[2])
Local aRet := {} //Customizações do usuário
Local nP_MENNOTA := 0
Local cMensNF := 'TST OG261APV'

nP_MENNOTA := aSCAN(aCab, {|aCab | UPPER( AllTrim( aCab[1] ) ) == "C5_MENNOTA" })

IF nP_MENNOTA > 0
aCab[nP_MENNOTA,2] := cMensNF
Else
aAdd( aCab, {"C5_MENNOTA" , cMensNF , Nil } )
EndIF

aRet := {aCab,aItens}

Return ( aRet )

7. Apresente dados antes de iniciar a Emissão da NF do Ponto de Entrada;

Linha de Produto:

Microsiga Protheus

Segmento:

Agroindústria

Módulo:

SIGAAGR

Rotina:

Rotina

Nome Técnico
OGA430B

Responsável por gerar a Nota Fiscal de Complemento
Ponto de Entrada: OG430ANF

País(es):

Todos

Versões/Release:

11.80.19

Ponto de Entrada.

Descrição: Permite em um uso geral, apresentar uma tela com alguns dados ao usuário antes de iniciar a emissão da NF. DE CPL.

Localização:

OGA430B

Programa Fonte:

 OGA430B

Função:

OG430ANF

Exemplo:

#Include 'Protheus.ch'


User Function OG430ANF()
    
     Alert("Exemplo de Alerta para execução do ponto de entrada antes de iniciar a emissão da NF. DE CPL")
    
    Return
8. Analise o Ponto de Entrada para controlar dados específicos do Pedido de Venda.
Características do Requisito.

Linha de Produto:

Microsiga Protheus

Segmento:

Agroindústria

Módulo:

SIGAAGR

Rotina:

Rotina

Nome Técnico
OGX008

Geração do Documento de Saída
Ponto de Entrada: OGX008PV

País(es):

Todos

Versões/Release:

11.80.16

Ponto de Entrada.

Descrição: Permite controlar dados específicos do Pedido de Venda.

Localização:

MenuDef  

Programa Fonte:

OGX008

Função:

OGX008PV

Retorno:

Nome

Tipo

Descrição

Obrigatório

OGX008PV

Array

Parâmetros enviados: {aCab,aItens}

NÃO

Exemplo:

#Include 'Protheus.ch'
#include "fwmvcdef.ch"

User Function OGX008PV()
                Local aCab := aClone(PARAMIXB[1])
                Local aItens := aClone(PARAMIXB[2])
                Local aRet := {} //Customizações
                
                aAdd( aCab, {"C5_MEUCAMPO"  , 'Valor'       , Nil } )
                
                aRet := {aCab,aItens}
                
                Return aRet

 

 

Esse artigo foi útil?
Usuários que acharam isso útil: 0 de 0

0 Comentários

Por favor, entre para comentar.
Como podemos ajudar?
Entre em contato e fale conosco!
X Fechar

Olá ,

Há pendência referente a um de seus produtos contratados para a empresa ().

Entre em contato com o Centro de Serviços TOTVS para tratativa.

Ligue! 4003-0015 opção 4 e 9 ou registre uma solicitação para CST – Cobrança – Verificação de pendências financeiras . clique aqui.

TOTVS

X Fechar

Olá ,

Seu contato não está cadastrado no Portal do Cliente como um perfil autorizado a solicitar consultoria telefônica.

Por gentileza, acione o administrador do Portal de sua empresa para: (1)configurar o seu acesso ou (2)buscar um perfil autorizado para registro desse atendimento.

Em caso de dúvidas sobre a identificação do contato administrador do Portal, ligue (11) 4003-0015, opção 7 e, em seguida, opção 4 para buscar o suporte com o time de Assessoria ao Portal do Cliente. . clique aqui.

TOTVS

X Fechar

Olá ,

Para o atendimento de "Consultoria Telefônica" você deverá estar de acordo com o Faturamento.

TOTVS

X Fechar

Olá,

Algo inesperado ocorreu, e o usuario nao foi reconhecido ou você nao se encontra logado

Por favor realize um novo login

Em caso de dúvidas, entre em contato com o administrador do Portal de Clientes de sua empresa para verificação do seu usuário, ou Centro de Serviços TOTVS.

Ligue! 4003-0015 opção 4 e 9 ou registre uma solicitação para CST – Cadastros . clique aqui.

TOTVS

Chat _

Preencha os campos abaixo para iniciar o atendimento:

Chat _

NC#o encontrou o que procura?