Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: GP110QRY - Inclusão de Campo - Query
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todas TotvsDbAccess
Idiomas: Espanhol , Inglês
Descrição: 
Inclusão de campos que serão selecionados na query da tabela SRZ para utilização, por exemplo, nos lançamentos padrões.
Programa Fonte 
GPEM110.PRX
Sintaxe

GP110QRY - Inclusão de Campo - Query ( ) --> aCpos

Retorno
    aCpos(array_of_record)
  • Array contendo os campos por "alias" que serão incluídos na query da tabela SRZ
Observações

• Somente campos das tabelas SRV e SI3/CTT podem ser incluídos através deste ponto de entrada.

• Se todos os campos das tabelas SRV e CTT/SI3 utilizados nos lançamentos padrões forem incluídos através deste ponto de entrada, é possível utilizar os parâmetros MV_CPOSSRV com conteúdo "N" e MV_CPOSCC com conteúdo "2", de modo que não haverá posicionamento dessas tabelas a cada lançamento processado, onde há ganho de performance na rotina. Deve-se alterar, desse modo, os lançamentos padrões para que ao invés de buscar as informações das tabelas SRV ou CTT/SI3, buscar diretamente do alias SRZ (vide exemplo abaixo).

Exemplos 
1) Exemplo de utilização do ponto de entrada:User Function aGP110QRY()Local aCpos := {}aAdd( aCpos, { "SRV", { "RV_COD", "RV_DESC", "RV_INSS", "RV_IR", "RV_FGTS", "RV_INCORP" } } )aAdd( aCpos, { "CTT", { "CTT_CUSTO", "CTT_DESC01", "CTT_DTEXIS" } } )Return(aCpos)2) Exemplo de redefinição do histórico do lançamento padrão quando utilizado o ponto de entrada e os parâmetros MV_CPOSSRV com "N" e MV_CPOSCC com "2":Conteúdo anterior: Alltrim(CTT->CTT_CUSTO) + " - " + Alltrim(SRV->RV_DESC) + " - " + StrZero( MONTH( DDATABASE ), 2 ) + "/" + StrZero( YEAR( DDATABASE ), 4 )Conteúdo ajustado: If( Type("aIncLog") # "U", Alltrim(SRZ->CTT_CUSTO) + " - " + Alltrim(SRZ->RV_DESC) + " - " + StrZero( MONTH( DDATABASE ), 2 ) + "/" + StrZero( YEAR( DDATABASE ), 4 ), "" )