PE: MP_CATPGRV

📌 Documentação do Ponto de Entrada MP_CATPGRV

🧩 Identificação

  • Nome do Ponto de Entrada: MP_CATPGRV
  • Objetivo: Registrar a marcação de integração para um pedido, definindo o campo ZCU_XMPTRA como 'X' e desbloqueando o registro.
  • Programa: NOVO4 (sincronização de Entidades de Entrada)
  • Localização: Manipulação de registros na tabela ZCU após a confirmação de integração

📥 Parâmetros Recebidos (PARAMIXB)

  • PARAMIXB[1]: Array de contas de "Meus Pedidos" (aCtaMps).
  • PARAMIXB[2]: Filial da conta de "Meus Pedidos" (cFilMp).
  • PARAMIXB[3]: Código da conta de "Meus Pedidos" (cCtaMp).
  • PARAMIXB[4]: Posição do array de contas (nz).
  • PARAMIXB[5]: Recno da confirmação de integração (nRecno).

🏗️ Estrutura Interna

O ponto de entrada executa as seguintes operações:

Campo Valor Atribuído Nil
aCtaMps PARAMIXB[1] Nil
cFilMp PARAMIXB[2] Nil
cCtaMp PARAMIXB[3] Nil
nz PARAMIXB[4] Nil
nRecno PARAMIXB[5] Nil

🔁 Retorno

  • A função retorna vazio (Return()), após marcar o registro na tabela ZCU com ZCU_XMPTRA := 'X' e liberar o bloqueio.

Exemplo de execução:

User Function MP_CATPGRV
    local aCtaMps := PARAMIXB[1]
    local cFilMp := PARAMIXB[2]
    local cCtaMp := PARAMIXB[3]
    local nz := PARAMIXB[4]
    local nRecno := PARAMIXB[5]
    local aSegs := {}
 
    DBSELECTAREA("ZCU")
    SET DELETED OFF
    DBGOTO(nRecno)
    reclock("ZCU", .F.)
         ZCU->ZCU_XMPTRA := 'X'
    msunlock()
Return()

Você achou esse artigo útil?

  • PE: MP_CABECPV

    📌 Documentação do Ponto de Entrada MP_CABECPV 🧩 Identificação ...
  • PE: MP_ITEMPV

    📌 Documentação do Ponto de Entrada MP_ITEMPV 🧩 Identificação N...
  • PE: MP_AITEMS

    📌 Documentação do Ponto de Entrada MP_AITEMS 🧩 Identificação N...
  • PE: MP_CATPSQL

    📌 Documentação do Ponto de Entrada MP_CATPSQL 🧩 Identificação ...
  • MP_CNFMAIL

    📌 Documentação do Ponto de Entrada MP_CNFMAIL 🧩 Identificação ...