Linha Microsiga Protheus

Árvore de páginas

01. VISÃO GERAL

O ponto de entrada OGA430C1 esta disponível na função que realiza o ajuste de pendencia dos romaneios que requer nf de complemento na fixação do contrato no rotina do gestor de entidade. O ponto de entrada permite ajustar o código e loja do cliente/fornecedor para buscar as Nfs dos romaneios com pendencia que tiveram a entidade trocada.

Localização:

OGA430CREG()

Programa Fonte:

OGA430C

Função:

OGA430C1()

Parametro:

Nome

Tipo

Descrição

Obrigatório

PARAMIXB[1]

Array

Variável caractere contendo o código cliente/fornecedor

NÃO

PARAMIXB[2]ArrayVariável caractere contendo a Loja cliente/fornecedorNÃO
PARAMIXB[3]ArrayVariável caractere contendo  o código do contratoNÃO
PARAMIXB[4]ArrayVariável caractere contendo o código do RomaneioNÃO
Retorno:

Nome

Tipo

Descrição

Obrigatório

aRtPE430C[1]

Array

Variável caractere contendo o código cliente/fornecedor

NÃO

aRtPE430C[2]ArrayVariável caractere contendo a loja cliente/fornecedorNÃO

02. EXEMPLO DE UTILIZAÇÃO


User Function OGA430C1() 
    Local aRetOGA  := {}
    Local cTmpClFo := PARAMIXB[1]   //cCliFor
    Local cTmpLoja := PARAMIXB[2]   //cLoja
    Local cTmpCtr  := PARAMIXB[3]   //cCtrato
    Local cTmpRom  := PARAMIXB[4]   //cRomaneio
                   
    //validações necessárias

    aadd(aRetOGA,cTmpClFo )    //Retorno para o campo de Cliente/Fornecedor da Nota Fiscal
    aadd(aRetOGA,cTmpLoja )    //Retorno para o campo de Loja Cliente/Fornecedor da Nota Fiscal
    
Return aRetOGA