Pontos de Entrada para as rotinas do Gestão Agrícola

Características do Requisito

Ponto de Entrada

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA010G()

    Local nOpcA := PARAMIXB[1]

    If nOpcA == 1

        Alert("Opções escolhidas, Incluir, Alterar, Excluir")

    Else

        Alert("Exemplo de Alert após gravação da tabela NN4")

    EndIf

   // Customizações abaixo // 

    Return

Descrição:

Localização:

GetDados para cadastro de Historicos Padrão.

Programa Fonte:

Função:

Ponto de Entrada

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA040IT()

    Local aCampos := PARAMIXB[1]

    aAdd(aCampos, 'NNL_SEQ')

    aAdd(aCampos, 'NNL_MENS')

   // Customizações abaixo // 

    Return (aCampos) 

Descrição:

Localização:

Rotina para atualização/criação do titulo tipo provisório.

Programa Fonte:

Função:

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA100DP()

    Alert("Exemplo de Alerta após gerar titulo no financeiro")

   // Customizações abaixo // 

    Return

Ponto de Entrada

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA100PR()

    Alert("Exemplo de Alerta após gerar titulo provisório no financeiro")

   // Customizações abaixo // 

    Return

Descrição:

Localização:

Rotina auxiliar para montagem da tela de cadastro.

Programa Fonte:

Função:

Ponto de Entrada

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA100RA()

    Alert("Exemplo de Alerta após rotina para inclusão de recebimentos antecipados.")

   // Customizações abaixo // 

    Return

Ponto de Entrada

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA105E2()

    Alert("Exemplo de Alerta após rotina para gravação de dados. Geração de títulos a Pagar.")

   // Customizações abaixo // 

    Return

Descrição:

Localização:

Atualização da aplicação e itens da aplicação

Programa Fonte:

Função:

Ponto de Entrada

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA105IC()

    Alert("Exemplo de Alerta após inclusão do contrato financeiro.")

   // Customizações abaixo // 

    Return

Descrição:

Localização:

Atualização da aplicação e itens da aplicação.

Programa Fonte:

Função:

Ponto de Entrada

Ponto de Entrada

Ponto de Entrada

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA105RP()

    Local lRetorno := .T.

    Local nExemp1 := 5

    Local nExemp2 := 5

    If aExemp1 == aExemp2
        Alert("Irá prosseguir com a seleção de parcelas a serem alteradas")    
    Else
        lRetorno := .F. // Não irá prosseguir com a seleção de parcelas a serem alteradas
    EndIf

   // Customizações abaixo // 

    Return lRetorno

Descrição:

Localização:

Rotina auxiliar para inclusão de romaneio de entrada.

Programa Fonte:

Função:

Ponto de Entrada

 Pontos de Entrada

Características do Requisito

Exemplo:

#Include 'Protheus

Segmento:

Agroindústria

Módulo:

SIGAAGR

Rotina:

Ponto de Entrada:

AGRA010G, AGRA040IT, AGRA100DP, AGRA100PR, AGRA100RA, AGRA105E2,

AGRA105IC, AGRA105RP, AGRA200MO, AGRA200PD, AGRA205EQ, AGRA205GE,

AGRA205MO, AGRA205PD, AGRA205RA, AGRA280EX, AGRA280IN, CMA150AMNU

País(es):

Todos

.ch'

User Function AGRA200MO()

    Local aCposMO := PARAMIXB[1]

    If aCposMO[1] == 'NP2_ITEM'

       aAdd(aCposMO , 'NP2_MARCA')

    EndIf

   // Customizações abaixo // 

    Return (aCposMO) 

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA200PD()

    Local aCposPD:= PARAMIXB[1]

    If aCposPD[1] == 'NP2_ITEM'

       aAdd(aCposPD, 'NP2_MARCA')

    EndIf

   // Customizações abaixo // 

    Return (aCposPD)

Ponto de Entrada

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA200PD()

    Local aCposEQ:= PARAMIXB[1]

    If aCposEQ[1] == 'NP2_ITEM'

       aAdd(aCposEQ, 'NP2_MARCA')

    EndIf

   // Customizações abaixo // 

    Return (aCposEQ) 

Ponto de Entrada

Ponto de Entrada

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA205GE()

    Local lAGRA205GE:= .T.

    Local nExemp1 := 5

    Local nExemp2 := 5

    If aExemp1 == aExemp2
        Alert("Ira prosseguir com  o estorno do fechamento na aplicação.")    
    Else
        lAGRA205GE:= .F. // Não irá prosseguir com o estorno do fechamento na aplicação.
    EndIf

   // Customizações abaixo // 

    Return lAGRA205GE

Descrição:

Localização:

Rotina auxiliar para montagem da tela de cadastro.

Programa Fonte:

Função:

Ponto de Entrada

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA205MO()

    Local aCposMO := PARAMIXB[1]

    If aCposMO[1] == 'NP6_ITEM'

       aAdd(aCposMO , 'NP6_VAZAO')

    EndIf

   // Customizações abaixo // 

    Return (aCposMO) 

Descrição:

Localização:

Atualização da aplicação e itens da aplicação

Programa Fonte:

AGRA200

Função:

Ponto de Entrada

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA205PD()

    Local aCposPD:= PARAMIXB[1]

    If aCposPD[1] == 'NP6_ITEM'

       aAdd(aCposPD, 'NP6_VAZAO')

    EndIf

   // Customizações abaixo // 

    Return (aCposPD) 

Descrição:

Localização:

Atualização da aplicação e itens da aplicação.

Programa Fonte:

Função:

Ponto de Entrada

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA205RA()

    Alert("Exemplo de Alerta anterior a atualização dos itens do estorno.")

   // Customizações abaixo // 

    Return

Descrição:

Localização:

Programa Fonte:

Função:

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA280EX()

    Alert("Exemplo de Alerta para o tratamento da exclusão do frete.")

   // Customizações abaixo // 

    Return

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function AGRA280IN()

    Alert("Exemplo de Alerta para o tratamento da inclusão do frete.")

   // Customizações abaixo // 

    Return

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function CMA150AMNU()

Local aRotAdic:=  PARAMIXB[1]

aAdd( aRotAdic, { "TESTE PNT ENT.", "AGR750EXEMP ", 0, 4, 0, Nil } )  
Return (aRotAdic)