Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • PMSQRCRTE - Altera variável

Ponto-de-Entrada: PMSQRCRTE - Altera variável
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: 
O ponto de entrada PMSFSSCR é utilizado para alterar a variável cQry, possibilitando que a query, que vai considerar as informações que compõe o custo CRTE do projeto, seja alterada pelo usuário.
Programa Fonte 
PMSQRCRTE.PRW
Sintaxe

PMSQRCRTE - Altera variável ( < cQry> , < aCrteProc> , < N> ) --> cQry

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
cQry Caracter Variável contendo a query para os valores do custo CRTE. X
aCrteProc Array of Record Array contendo quais as opções de custo serão consideradas. Cada posição contém um valor lógico que sinaliza qual operação deve, ou não, ser considerada. X
N Numérico Valor numérico que simboliza a posição do array que está sendo manipulado no momento em que o ponto de entrada é chamado. X
Retorno
    cQry(caracter)
  • Variável contendo a cQry que foi manipulada pelo usuário.
Exemplos 
#INCLUDE "RWMAKE.CH"User Function PMSQRCRTE()                 Local cQry	:= ParamIxb[1] // cQryLocal aCrteTipo 	:= ParamIxb[2] // aCrteProcLocal nIndice	:= ParamIxb[3] // 1,...,7Do Case	Case nIndice == 1		Alert("Conteúdo do array na posição " + AllTrim(STR(nIndice)) + ": " + ValType(aCrteTipo[nIndice]) + " - Documento de Entrada")		//Ao inves do Alert(), colocar aqui o trecho de codigo que vai alterar a cQry quando houver Doc. de Entrada			Case nIndice == 2		Alert("Conteúdo do array na posição " + AllTrim(STR(nIndice)) + ": " + ValType(aCrteTipo[nIndice]) + " - Tit. a Pagar")		//Ao inves do Alert(), colocar aqui o trecho de codigo que vai alterar a cQry quando houver Tit. a Pagar			Case nIndice == 3		Alert("Conteúdo do array na posição " + AllTrim(STR(nIndice)) + ": " + ValType(aCrteTipo[nIndice]) + " - Mov. Bancário")		//Ao inves do Alert(), colocar aqui o trecho de codigo que vai alterar a cQry quando houver Mov. Bancario			Case nIndice == 4				Alert("Conteúdo do array na posição " + AllTrim(STR(nIndice)) + ": " + ValType(aCrteTipo[nIndice]) + " - Recursos")		//Ao inves do Alert(), colocar aqui o trecho de codigo que vai alterar a cQry quando houver Recursos			Case nIndice == 5		Alert("Conteúdo do array na posição " + AllTrim(STR(nIndice)) + ": " + ValType(aCrteTipo[nIndice]) + " - Diretos")		//Ao inves do Alert(), colocar aqui o trecho de codigo que vai alterar a cQry quando houver Diretos			Case nIndice == 6		Alert("Conteúdo do array na posição " + AllTrim(STR(nIndice)) + ": " + ValType(aCrteTipo[nIndice]) + " - Requisições")		//Ao inves do Alert(), colocar aqui o trecho de codigo que vai alterar a cQry quando houver Requisicoes			Case nIndice == 7		Alert("Conteúdo do array na posição " + AllTrim(STR(nIndice)) + ": " + ValType(aCrteTipo[nIndice]) + " - Remessas")		//Ao inves do Alert(), colocar aqui o trecho de codigo que vai alterar a cQry quando houver Remessas		EndCase			Return cQry