Árvore de páginas

Ponto-de-Entrada: MTMEMOCQ - Gravação de baixas do Controle de Qualidade
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição:
LOCALIZAÇÃO: Na função fGravaCq(), que faz a gravação das baixas do CQ (Controle de Qualidade).EM QUE PONTO: Será executado no inicio da função, antes de iniciar a gravação da tabela SD7 (antes da liberação/rejeição ou estorno de movimentos).Este ponto de entrada permite que o usuário monte um vetor contendo a relação dos campos virtuais do tipo MEMO que ele criou. Isso permitirá que a rotina de "Baixas do CQ" possa atualizar e exibir corretamente as informações dos campos criados por usuários na tabela SD7. Os campos MEMO podem ser atualizados tanto na liberação/rejeição quanto no estorno de movimentos.Não é enviado nenhum parâmetro ao ponto de entrada.O retorno deverá ser um vetor com o seguinte formato:aRet{ {cChave1, cMemo1},..{cChaveN, cMemoN} } onde:aRet[cChave] = Nome do campo chave para identificar o conteúdo do campo memo.aRet[cMemo]  = Nome do campo memo criado pelo usuário.No módulo configurador, o usuário deverá criar os campos seguindo as seguintes regras:O campo chave deverá:Ser do tipo CARACTER;Deverá possuir o mesmo tamanho do campo YP_CHAVE da tabela SYP (padrão: 6 caracteres);Ter o contexto REAL;Não necessita estar disponível para edição; Não necessita estar visível no browse;O campo memo deverá:Ser do tipo MEMO;Ter o contexto VIRTUAL;Deverá estar disponível para alteração;No campo "Inic. Padrão" (pasta Opções) deverá conter: IF(!INCLUI, MSMM(<campo_chave>), ""). Obs.: o parâmetro <campo_chave> que aparece na função MSMM deve conter o mesmo nome do campo chave criado pelo usuário.
Programa Fonte
SIGACUSB.PRW
Sintaxe

MTMEMOCQ - Gravação de baixas do Controle de Qualidade ( ) --> aRet

Retorno
    aRet(array_of_record)
  • Array contendo a lista de campos chave e seus respectivos campos memo que serão atualizados.
Exemplos
User Function MTMEMOCQLocal aRet := {}                aAdd(aRet, {'D7_CODMEMO','D7_MEMOV'})Return (aRet)