Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 5

changes.mady.by.user Wilsimar Fabricio Silva

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Mauricio Frison

Gravado em

Chave

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

CONTEÚDO

  1. Visão Geral
  2. Exemplo de utilização
  3. Parâmetros
  4. Variáveis
  5. Tabelas utilizadas


01. VISÃO GERAL

Este Ponto de Entrada pertence à rotina de Manutenção de Produtos (EECAC120). Ele deve ser utilizado para customizar a rotina de manutenção de Produtos no módulo Easy Export Control e Easy Drawback Control.

Programa Fonte: EECAC120.PRW

Retorno: Verdadeiro (.T.) ou Falso (.F.).


02. EXEMPLO DE UTILIZAÇÃO

User Function EECAC120()
Local cParam:= ""

Local nOperacao:= 0


 
    If ValType(PARAMIXB) == "C"
        cParam := PARAMIXB
    ElseIf ValType(PARAMIXB) == "A"
        cParam := PARAMIXB[1]
    EndIf
 
    If cParam == "ENCHOICE"
        AAdd(aDrwBck, "B1_GRUPO") //Inclusão de campos adicionais para a manutenção no módulo de Drawback
        AAdd(aDrwBck, "B1_CONTA")
    EndIf

        iF cParam == "VALID_GRAVACAO"  

          nOperacao :=  ParamIxb[2]   //4 atera 3 inclui      

          IF M->B1_PRV1 > 1000 .AND. nOperacao == 4
              lRetPE:=.F.    

          ENDIF

      Endif
 
Return .T.

03. PARÂMETROS


NomeTipoDescrição
ENCHOICECaracter

EECAC120 - Manutenção de Produtos

CarácterRetorno

Descrição

EECAC120 - Manutenção de produtos

Observações

Utilizado para a manutenção do cadastro de produtos dentro do modulo Easy Export Control e EasyDrawback Control

Exemplos

Bloco de código
languagedelphi
linenumberstrue
User Function EECAC120()
Local cParam:= ""

    If ValType(PARAMIXB) == "C"
        cParam := PARAMIXB
    ElseIf ValType(PARAMIXB) == "A"
        cParam := PARAMIXB[1]
    EndIf

    If cParam == "ENCHOICE"
        AAdd(aDrwBck, "B1_GRUPO") //Inclusão de campos adicionais para a manutenção no módulo de Drawback
        AAdd(aDrwBck, "B1_CONTA")
    EndIf

Return .T.

Preview

Veja também

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

NomeTipoDescriçãoDefaultObrigatórioReferência
ENCHOICE
Parâmetro para validação de adição de campos da SB1 no cadastro de produtos no modulo Easy Drawback Control
VALID_GRAVACAOTrue

Eventos de chamada do Ponto de Entrada

CaracterParâmetro para validação da gravação do produto, seja na alteração ou na inclusão.

04. VARIÁVEIS


EscopoPode AlterarEECAC120.PRW
ParâmetroVariáveisNomeTipoPermite alterarDescrição
DescriçãoENCHOICEaDrwBckArrayPrivateSimArray responsável para adicionar campos da SB1 dentro do cadastro de produto no modulo Easy Drawback Control

Programa Fonte

VALID_GRAVACAOPARAMIXB[1]NuméricoNãoIndica a operação, sendo 3 = inclusão e 4 = alteração.
VALID_GRAVACAOlRetPELógicoSimlRetPE = .T. segue com a operação acima, = .F. cancela a operação acima.


05. TABELAS UTILIZADAS

  • Não há.



HTML
<!-- esconder o menu --> 


<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>