Voltar para Página Principal
Essa instrução insere o caractere '.
FUNCTION $Quote: '''';
Inspeciona a altera o formato de exibição de valores Booleanos.
FUNCTION BooleanFormat [ ( VAL format: INTEGER ) ] : INTEGER;
Nome do Argumento | Descrição |
format | Quando fornecido, esse argumento substitui o formato padrão |
Essa função inspeciona e altera o formato padrão utilizado sempre que um valor desse tipo é convertido para o formato de texto.
Se for chamado sem argumentos, BooleanFormat retorna o formato de exibição Booleano padrão existente. Se for fornecido argumento, esse valor substitui o padrão atual e o formato antigo é retornado.
Consulte a seção Notas da instrução WinWrite para obter uma explicação dos formatos de exibição.
VARIABLES
oldFormat: INTEGER; ACTIONS oldFormat:= BooleanFormat(BitOr($FmtBoolYesNo, $FmtLeftJustify));
...
BooleanFormat(oldFormat); END;
Converte um código de caractere ASCII (valor de ponto de código) em uma cadeia de um caractere. A aparência real dessa cadeia pode variar, dependendo da página de códigos ativa atualmente. Para obter informações sobre páginas de códigos, consulte a documentação do sistema operacional.
FUNCTION Char (VAL code: INTEGER): STRING;
Nome do Argumento | Descrição |
code | Inteiro que representa um valor ASCII |
VARIABLES s : STRING; ACTIONS s:=Char(255);
CharCode
Retorna o código de caractere ASCII (valor do ponto de código) do primeiro caractere de uma cadeia. O valor numérico do ponto de código retornado para uma determinada representação de caractere pode variar, dependendo da página de código selecionada atualmente. Para obter informações sobre páginas de códigos, consulte a documentação do sistema operacional.
FUNCTION CharCode (VAL str: STRING): INTEGER;
Nome do Argumento | Descrição |
str | Corresponde a qualquer cadeia |
O argumento str é tratado como uma cadeia de um caractere. Se você inserir uma cadeia de vários caracteres, é retornado o código de caracteres ASCII do primeiro caractere da cadeia.
i := CharCode('A'); (* i = 65 *)
Char
Inspeciona e altera o formato de texto de valores inteiros.
FUNCTION IntegerFormat [ ( VAL format: INTEGER ) ] : INTEGER;
Nome do Argumento | Descrição |
format | Quando fornecido, esse argumento substitui o formato padrão |
Essa função inspeciona e altera o formato padrão utilizado sempre que um valor desse tipo é convertido para o formato de texto.
Se for chamado sem argumentos, IntegerFormat retorna o padrão. Se for fornecido um argumento, esse valor substitui o padrão atual e o padrão anterior é retornado.
VARIABLES oldFormat: INTEGER; ACTIONS oldFormat := IntegerFormat(BitOr(IntegerFormat, $FmtIntSigned)); -- Prepend the sign to all integers.
...
IntegerFormat(oldFormat); END;
IntegerFormat não retorna códigos. Como o valor retornado por StringFormat, o valor retornado por IntegerFormat é o valor anterior da matriz de bits do sinalizador de formato. O valor pode ser tratado como um inteiro, pois o TSD Script não contém um tipo de matriz de bits. O sinal do valor não é significativo.
Para obter uma explicação sobre formatos de exibição, consulte Sinalizadores de Formato de Tipo de Dados.
Inspeciona ou altera o formato do texto padrão para valores reais.
FUNCTION RealFormat [ ( VAL format: INTEGER ) ] : INTEGER;
Nome do Argumento | Descrição |
format | Quando fornecido, esse argumento substitui o formato padrão |
Essa função inspeciona ou altera o formato padrão utilizado sempre que um valor desse tipo está sendo convertido para o formato de texto. Se for chamado sem argumentos, retorna o padrão existente. Se for fornecido um argumento, esse valor torna-se o padrão. O padrão original é retornado.
CONSTANTS sigDigits IS 2; -- Two digits to the right of the decimal. VARIABLES oldFormat: INTEGER; ACTIONS oldFormat := RealFormat(BitOr($FmtRealGroupedWithComma, sigDigits));
...
RealFormat(oldFormat); END;
Código de Retorno | Descrição |
Qualquer | O formato real atual se não foram especificados argumentos; o formato real antigo se foi fornecido um argumento. |
Para obter mais informações, consulte Sinalizadores de Formato do Tipo de Dados.
Retorna uma subcadeia de uma expressão de cadeia.
FUNCTION StrCopy (VAL source: STRING, VAL start [, length]: INTEGER): STRING;
Nome do Argumento | Descrição |
source | A expressão da cadeia de onde uma subcadeia deve ser copiada. |
start | O índice baseado em 1 do primeiro caractere a ser copiado. Se o valor inicial for menor que 1, StrCopy falha e retorna um valor desconhecido. Se o valor inicial for maior que o comprimento da cadeia, StrCopy retorna uma cadeia vazia. |
length | O número de caracteres a serem copiados para a nova cadeia. Se length for menor que 0, StrCopy retorna $Unknown. Se length for maior que os caracteres disponíveis, todos os caracteres disponíveis são copiados. |
StrCopy copia caracteres do comprimento da cadeia de origem e os retorna. A cópia começa com o caractere na posição de início. Se a posição de início for maior que o número de caracteres da cadeia, é retornada uma cadeia vazia.
VARIABLES drive,path,fileName: STRING; ACTIONS drive:=StrCopy('F:\ADVISOR\DATA\LOCATION.FLD',1,2); (* drive = 'F:'); path:=StrCopy('F:\ADVISOR\DATA\LOCATION.FLD',3,13); (* path = '\ADVISOR\DATA'): fileName:=StrCopy('F:\ADVISOR\DATA\LOCATION.FLD',17,12); (* fileName = 'LOCATION.FLD' *)
Decripta uma cadeia criptografada por StrEncrypt com o valor chave fornecido.
FUNCTION StrDecrypt (VAL Source: STRING, VAL Key: INTEGER): STRING;
Cuidado: Cadeias incorretas retornam passagens chave inteiras incorretas para StrDecrypt.
Nome do Argumento | Descrição |
Source | A cadeia criptografada anteriormente com uma chamada para StrEncrypt |
Key | Um valor inteiro para ser utilizado como chave secreta ao decriptar a cadeia |
O algoritmo de criptografia de StrDecrypt e StrEncrypt não é particularmente seguro, mas é aceitável para criptografias não críticas.
(* Function FCryptReadIn: This funciton reads an encrypted string from a file and decrypts it.
*)
FUNCTION FCryptReadIn(VAL Key:Integer, VAL fhdl:FILE):STRING IS
VARIABLES TmpStr: STRING;
ACTIONS FReadLn(fhdl, TmpStr); $Result:=StrDecrypt(TmpStr,Key);
END;
Código de Retorno | Descrição |
Decrypted String | Conclusão bem-sucedida |
$Unknown | A chamada para StrDecrypt falhou |
StrEncrypt
Exclui uma subcadeia de uma cadeia.
FUNCTION StrDelete (VAL source:string, VAL start: Integer, VAL length: Integer):string
Nome do Argumento | Descrição |
source | A cadeia de onde a subcadeia é excluída. |
start | A localização de onde começar a excluir caracteres. Se o valor inicial for menor que 0, a exclusão falha e é retornado $Unknown. Se o valor inicial for maior que o comprimento, não são excluídos caracteres e a cadeia original é retornada. |
length | O número de caracteres a serem excluídos. Se length for menor que 0, StrDelete falha e $Unknown é retornado. |
StrDelete retorna uma cópia da cadeia de origem com um intervalo especificado de caracteres removidos. A cadeia de origem não é afetada.
VARIABLES s : STRING; ACTIONS s:=StrDelete('F:\ADVISOR\DATA.DAT',1,11); (* s = 'DATA.DAT' *)
StrDelete retorna uma cópia da cadeia de entrada com o intervalo especificado de caracteres removidos. Se houver algum tipo de erro nos argumentos de entrada, retorna $Unknown.
Criptografa uma cadeia para um formato ilegível utilizando uma chave de inteiros.
FUNCTION StrEncrypt (VAL Source: STRING, VAL Key: INTEGER): STRING;
Nome do Argumento | Descrição |
Source | A cadeia que precisa ser criptografada. |
Key | Um valor inteiro utilizado como chave secreta para criptografar uma cadeia |
O algoritmo de criptografia de StrDecrypt e StrEncrypt não é particularmente seguro, mas é aceitável para criptografias não críticas.
(* Function FCryptWriteIn: This funciton writes a string to a file in an encrypted form.*)
FUNCTION FCryptWriteIn(VAL Str:String, VAL Key:Integer, VAL fhdl:FILE):INTEGER IS
ACTIONS $Result:=FWriteLn(fhdl, StrEncrypt(Str,Key));
END;
Código de Retorno | Descrição |
$Unknown | A chamada para StrEncrypt falhou |
StrDecrypt
Inspeciona ou altera as opções padrão de formatação da cadeia.
FUNCTION StringFormat [ ( VAL format: INTEGER ) ] : INTEGER;
Nome do Argumento | Descrição |
format | Quando fornecido, esse argumento substitui o formato padrão |
Essa função é utilizada para inspecionar e alterar o formato padrão utilizado sempre que um valor desse tipo é convertido para o formato de texto.
Se for chamado sem argumentos, retorna o padrão existente. Se for fornecido um argumento, o valor torna-se o novo padrão. O padrão anterior é retornado.
VARIABLES oldFormat: INTEGER; ACTIONS oldFormat := StringFormat($FmtLeftJustify); ... StringFormat(oldFormat); END;
StringFormat retorna o valor anterior da matriz de bits de formato da cadeia. Esse valor de retorna pode ser passado de volta para StringFormat posteriormente. Por exemplo:
oldFormat :=StringFormat (newFormat); ... --output some strings ... StringFormat (oldFormat) ;
Para obter uma explicação sobre formatos de exibição, consulte o Tivoli Service Desk 6.0 Developer's Toolkit - Guia de Programação do Script.
Insere uma subcadeia em uma cadeia.
FUNCTION StrInsert (VAL source, substring: STRING, VAL start: INTEGER): STRING;
Nome do Argumento | Descrição |
source | A cadeia onde a subcadeia é inserida. |
substring | A cadeia a ser inserida na cadeia de origem. |
start | A localização onde a subcadeia é inserida no destino. Se a localização de início for menor que 1, StrInsert falha e $Unknown é retornado. Se a localização de início for maior que o comprimento da cadeia de destino, a subcadeia é anexada ao fim da cadeia de destino. |
StrInsert insere uma subcadeia em uma cadeia de origem em uma determinada posição. A inserção ocorre de forma que o primeiro caractere da subcadeia inserida termina no índice indicado pela posição.
Nota: A cadeia emendada é retornada como resultado de StrInsert com as cadeias de entrada inalteradas.
VARIABLES s : STRING; ACTIONS s:=StrInsert('F:\DATA.TXT','\ADVISOR',3); (* s = 'F:\ADVISOR\DATA.TXT' *)
StrInsert retorna uma cópia da cadeia de destino com a subcadeia inserida, a partir do índice indicado. Se for encontrado algum tipo de erro nos argumentos, a instrução retorna $Unknown.
Retorna o comprimento de uma cadeia.
FUNCTION StrLength (VAL str: STRING): INTEGER;
Nome do Argumento | Descrição |
string | Uma expressão de cadeia cujo comprimento deve ser calculado |
StrLength retorna um inteiro, indicando o número de caracteres na expressão de entrada. Retorna $Unknown se a cadeia for $Unknown.
VARIABLES i: INTEGER; path,fileName: STRING; ACTIONS path:='F:\EADVISOR'; fileName:='KMLRUN.EXE'; i:=StrLength(path & '\' & fileName); (* i = 22 *)
Código de Retorno | Descrição |
> = 0 | Um inteiro que indica o número de caracteres na expressão de entrada |
$Unknown | Se a cadeia for $Unknown, o valor de retorna também o é |
Carrega uma cadeia de uma tabela de cadeias em um arquivo .df criado pelo Criador de Interface.
FUNCTION StrLoad (VAL formspec: STRING): STRING;
Nome do Argumento | Descrição |
formspec | Uma especificação de forma do formato 'file[res_name]' onde file é o nome de um arquivo .dfc e res_name é o nome do recurso da cadeia na tabela de cadeias. |
Se a cadeia não puder ser encontrada, o resultado da chamada de função é $Unknown.
KNOWLEDGEBASE test;
ROUTINES PROCEDURE Main;
PRIVATE
ROUTINES
PROCEDURE Main IS VARIABLES x: STRING; ACTIONS x := StrLoad('test[test_string]'); WinMessageBox($Desktop, 'Information', $MBOK, 'The string is ' & x); END;
Converte uma cadeia para letras minúsculas.
FUNCTION StrLower (VAL str: STRING): STRING;
Nome do Argumento | Descrição |
str | Uma expressão de cadeia |
VARIABLES s : STRING; ACTIONS s:=StrLower('F:\MYFILE.TXT'); (* s = 'f:\myfile.txt' *)
StrLower retorna uma cópia da cadeia de entrada onde todos os caracteres maiúsculos foram convertidos em minúsculos. A cadeia de entrada fica inalterada.
StrUpper
Corta espaços iniciais, tabulações e caracteres de avanço de linha de uma cadeia.
FUNCTION StrLTrim (VAL str: STRING): STRING;
Nome do Argumento | Descrição |
str | Uma expressão de cadeia |
VARIABLES s : STRING; ACTIONS s:=StrLTrim('F:\DATA.TXT'); (* s = 'F:\DATA.TXT' *)
Retorna uma cópia da cadeia de entrada com todos os espaços iniciais, tabulações e caracteres de avanço de linha removidos. A cadeia de entrada não é alterada.
StrTrim
Pesquisa um padrão de subcadeia em uma cadeia.
FUNCTION StrMatch (VAL source, VAL pattern: STRING): BOOLEAN;
Cuidado: A pesquisa não faz distinção entre maiúsculas e minúsculas.
Nome do Argumento | Descrição |
source | Uma expressão da cadeia a ser pesquisada. |
pattern | Uma expressão de cadeia que contém opcionalmente caracteres curinga como ? e *. |
StrMatch compara a cadeia de origem com o padrão. O padrão pode conter caracteres curinga:
A correspondência não faz distinção entre maiúsculas e minúsculas.
VARIABLES f: FILE; l: LIST OF STRING; match: LIST OF STRING; ACTIONS FOpen(f,'MYFILE.TXT',$Read); FReadText(f,l); FClose(f); FOR l DO IF StrMatch(l[$Current],'*printer*') THEN ListInsert(match,l[$Current]); END;
StrMatch retorna TRUE se as cadeias origem e padrão correspondem e FALSE caso contrário.
Encontra a posição de uma subcadeia em uma cadeia.
FUNCTION StrPos (VAL source, VAL substring: STRING): INTEGER;
Nome do Argumento | Descrição |
source | Uma cadeia que provavelmente contém a subcadeia |
Substring | Uma cadeia de caracteres na cadeia de origem |
StrPos faz uma varredura sem distinção entre maiúsculas e minúsculas do início da cadeia de entrada até encontrar a cadeia de destino. Se o destino for encontrado, StrPos retorna o índice na cadeia de entrada onde a correspondência ocorreu. Caso contrário, retorna zero.
VARIABLES i: INTEGER; ACTIONS i:=StrPos(F:\DATA\MYFILE.DAT','\'); (* i = 3 *)
Código de Retorno | Descrição |
0 | A subcadeia não foi encontrada |
-1 | A cadeia de origem é desconhecida |
-2 | A subcadeia é desconhecida |
StrToken
Substitui as designações de termos dentro de uma cadeia de origem pelos valores de terminologia apropriados.
FUNCTION StrReplaceTerms (VAL source: STRING): STRING;
Cuidado: Se a variável indicada não existir, ou seu valor não puder ser convertido em uma cadeia, aparece um quadro de aviso e a designação do termo não é substituída na cadeia resultante.
Nome do Argumento | Descrição |
source | Uma cadeia com zero ou mais designações de termo incorporadas. |
Uma designação de termo é uma subcadeia incorporada na forma:
{{KNOWLEDGEBASE:VARIABLE}}
onde KNOWLEDGEBASE é o nome de uma base de informações e VARIABLE é o nome de uma variável declarada no escopo mais externo dessa base de informações. A variável indicada não precisa ser declarada na seção pública da base de informações.
Todas essas formas incorporadas na cadeia de origem são substituídas pelo valor da variável indicada. A cadeia de origem não é modificada por essa função.
msg := StrReplaceTerms( 'The {{GLOBALS:T_CALLER}} has no open {{GLOBALS:T_PROBLEMS}}.'); -- T_CALLER and T_PROBLEMS from GLOBALS.KB contain 'caller' -- and 'problems' respectively, or synonyms such as 'customer' -- and 'inquires'.
StrReplaceTerms retorna a cadeia modificada. Se a cadeia de origem for desconhecida, StrReplaceTerms retorna $Unknown.
Transforma uma cadeia em símbolos, de forma destrutiva.
FUNCTION StrToken (REF source: STRING, VAL delimiters: STRING): STRING;
Nome do Argumento | Descrição |
source | Uma variável de cadeia a ser transformada em símbolos |
delimiters | Uma cadeia que contém um ou mais caracteres delimitadores |
A função StrToken divide o conjunto de caracteres inteiro em dois subconjuntos desconectados: caracteres membros de símbolos (o conjunto de símbolos) e aqueles que não são membros de símbolos (o conjunto delimitador). Quando você chama StrToken em uma cadeia de origem conhecida, essa instrução faz o seguinte:
Como resultado desse processo, a cadeia de origem torna-se mais curta sempre que essa função é chamada, tornando-se eventualmente uma cadeia vazia. Quando não existirem mais símbolos na cadeia de origem, StrToken retorna a cadeia vazia.
WHILE NOT FEnd (inputFile) DO FReadLn (inputFile, inputLine); column := 0; WHILE (token := StrToken (inputLine,'')) <> ''DO ProcessEntry (token, column :=column +1); END; END;
Essa função retorna $Unknown se a cadeia de origem ou a cadeia delimitada forem desconhecidas.
StrPos
Remove espaço em branco inicial de uma cadeia.
FUNCTION StrTrim (VAL str: STRING): STRING;
Nome do Argumento | Descrição |
str | Uma expressão de cadeia |
StrTrim assume uma cadeia como entrada e retorna uma cópia dessa cadeia com todos os espaços em branco iniciais (espaços, tabulações, novas linhas) removidos. A cadeia de entrada não é afetada.
VARIABLES f: FILE; l: LIST OF STRING; ACTIONS FOpen(f,'DATA.TXT',$Read); FReadText(f,l); FClose(f); FOR l DO l[$Current]:=StrTrim(l[$Current]);
StrTrim retorna uma cópia de uma cadeia de entrada com todos os espaços em branco iniciais (espaços, tabulações, novas linhas) removidos.
StrLTrim
Retorna uma cópia em maiúsculas de uma cadeia.
FUNCTION StrUpper (VAL str: STRING): STRING;
Nome do Argumento | Descrição |
str | Uma expressão de cadeia |
StrUpper retorna uma cópia da cadeia de entrada com todos os caracteres de letras minúsculas convertidos em maiúsculas. A cadeia de entrada fica inalterada.
VARIABLES s : STRING; ACTIONS s:=StrUpper('f:\data\myfile.txt'); (* s = 'F:\DATA\MYFILE.TXT' *)
StrUpper retorna uma cópia da cadeia de entrada com todos os caracteres de letras minúsculas convertidos em maiúsculas.
StrLower
Tivoli Service Desk 6.0 Developer's Toolkit - Referência da Linguagem de Script