Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/6062824/tecnologia.css |
Pagetitle | ||||
---|---|---|---|---|
|
Realiza a definição de alguns parâmetros do sistema, permite também retornar o valor previamente definido.
Sintaxe
Bloco de código | ||
---|---|---|
| ||
Set( < nParam >, <[ xValue> ] )-> xValue
|
Parâmetros
Nome | Tipo | Descrição | Obrigatório | Referência |
---|---|---|---|---|
nParam |
...
numérico | Parâmetro a ser definido ou consultado | X |
|
xValue |
...
qualquer | Valor a ser definido para o parâmetro |
|
|
Retorno
Nome | Tipo | Descrição |
---|
...
xRet |
...
qualquer | Retorna o valor previamente definido para o parâmetro. |
Exemplos
...
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#include "TOTVS.CH" user function tstSet() // Define formato da data do sistema // Exemplo mm(mes)/dd(dia)/yyyy(ano) dDate1 := CtoD("04/05/78") dDate2 := CtoD("04/05/92") Set(_SET_DATEFORMAT, 'mm/dd/yyyy yy')) // Data comExibe DOISou digitosomite os registros marcados para deleção no banco de dados // Se definido: // .T. ou "ON" - Omite os registros deletados // .F. ou "OFF" - Exibe os registros deletados Set(_SET_DELETED, .T.) para Ano conout("","Teste do _SET_DATEFORMAT: Usando DOIS digitos para o ano") conout(dDate1) conout(dDate2) Set(_SET_DATEFORMAT, 'mm/dd/yyyy') // Data com QUATRO digitos para Ano conout("Teste do _SET_DATEFORMAT: Usando QUATRO digitos para o ano") conout(dDate1) conout(dDate2) // Permite um maior controle das datas com apenas dois digitos, exemplo: // Se definido 1980, a data "04/05/78" será igual a 04/05/2078 // e a data "04/05/92" será igual a 04/05/1992 Set(_SET_EPOCH, 1980) dDate1 := CtoD("04/05/78") dDate2 := CtoD("04/05/Determina se as comparações entre expressões // caracteres devem ser totalmente iguais ou parciais 92") conout("","Teste do _SET_EPOCH: Usando valor 1980") conout(dDate1) conout(dDate2) // Exibe ou omite os registros marcados para deleção no bando de dados // Se definido: // .T. ou "ON" -As Omitecomparações osserão registrosexatas deletados // .F. ou "OFF" -As Exibecomparações osserão registrosparciais deletados Set(_SET_EXACT DELETED, .T.) conout("","Teste do _SET_DELETED: Usando valor TRUE")// Determina se a abertura de arquivos para utilização // será de modo exclusivo ou compartilhado. // Se definido: // .T. - A abertura dos arquivos será no modo exclusivo // .F. - A abertura dos arquivos será no modo compartilhado Set(_SET_EXCLUSIVE, .T.) DBSelectArea("SA1") DbGoTop() i := 0 While !Eof() i++ DBSkip() endDo conout( "Quantidade de registros: " + cValToChar( i ) ) Set(_SET_DELETED, .F.) conout("Teste do _SET_DELETED: Usando valor FALSE") DbGoTop() i := 0 While !Eof() i++ DBSkip() endDo conout( "Quantidade de registros: " + cValToChar( i ) ) // Liga ou desliga a pesquisa relativa da função DBSEEK
// Se definido:
// .T. - Efetuara a busca parcial do registro, exemplo:
// Buscando pelo texto "TN", não encontrando um registro,
// será apontado para o registro aproximado, exemplo "TOTVS"
// .F. - Efetuara apenas a busca exata de um registro, exemplo:
// Buscando pelo texto "TO" será apontado para o registro que contenha // o texto, exemplo "TOTVS", neste caso a busca por "TN" retorná FALSO DBSelectArea("SA1") DbSetOrder(2) // FILIAL+NOME Set(_SET_SOFTSEEK, .T.) conout("","Teste do _SET_SOFTSEEK: Usando valor TRUE") DbSeek(xFilial("SA1") + "VA") // Busca registroLiga parcialou "VA"desliga naoa constainclusão de chaves duplicadas em um índice no banco de dados. // Se definido: // .T. - Impedirá chaves duplicadas // .F. - Permitirá chaves duplicadas Set(_SET_UNIQUE, .T.) no banco conout( "Registro" + iif(Eof(), " nao", "") + " localizado" ) Set(_SET_SOFTSEEK, .F.) conout("Teste do _SET_SOFTSEEK: Usando valor FALSE") DbSeek(xFilial("SA1") + "VA") conout( "Registro" + iif(Eof(), " nao", "") + " localizado" ) // Caso a função SET seja chamada apenas com o parâmetro, sem a definição de valores // sera retornado o valor previamente definido para este parâmetro // // Observação: // O tipo do retorno irá variar dependendo do parâmetro selecionado // os tipos retornados poderão ser Texto, Numérico ou Lógico Set(_SET_DATEFORMAT) Set(_SET_DELETED )
Set(_SET_EPOCH)
Set(_SET_ EXACTDELETED) Set(_SET_EXCLUSIVE) Set(_SET_ SOFTSEEK)
Set(_SET_UNIQUE)
Return |
Resultado do Exemplo
Abrangência
Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas