4D Doc Center : Mac to ISO

4D v14.3

Mac to ISO


Mac to ISO ( texto ) -> Resultado

Parâmetro	Tipo	Descrição
texto	cadeia	Texto expresso usando tabela Mac OS ASCII
Resultado	cadeia	Texto expresso usando conjunto de web caracteres padrão

Nota de compatibilidade

Este comando funciona unicamente quando o banco for executado em modo compatibilidade ASCII. Em modo Unicode, não faz nada (a cadeia texto é devolvida sem modificação). A partir da versão 11 de 4D, este comando é obsoleto e seu uso não é recomendável. É recomendável converter as cadeias de caracteres utilizando os comandos CONVERT FROM TEXT ou Convert to text

Descrição

O comando Mac to ISO devolve um texto equivalente al passado em texto, mas expresso utilizando a tabela de caracteres Web que se encontra no menu Conjunto padrão da página Web/Opções nas Preferências da aplicação.

Geralmente não necessitará utilizar este comando.

Este comando espera um parâmetro de tipo texto expresso com a ajuda da tabela ASCII Mac OS.

4D converte os caracteres recebidos e enviados pelos navegadores Web. Como resultado, os valores textos que você manipula al interior de um processo de conexão Web, se expressam sempre utilizando a tabela ASCII Mac OS.

Geralmente, em Windows, não necessita utilizar este comando para converter códigos ASCII. Em modo compatibilidade ASCII (não Unicode), quando copia ou cola texto entre 4D e Windows ou quando importa ou exporta dados, 4D realiza estas conversões automaticamente. Entretanto, quando utiliza comandos de leitura/escrita tais como SEND PACKET ou RECEIVE PACKET, deve explicitamente realizar conversões ASCII.

Em 4D, todos os valores, campos, ou variáveis de tipo texto que não tenha convertido a outra tabela ASCII são codificados em Mac OS tanto no Macintosh quanto no Windows. Para maior informação, consulte a seção Códigos ASCII.

Em Windows, é necessário neste caso, não filtrar os caracteres utilizando um filtro de saída ASCII.

Portanto, não importa a plataforma na qual trabalhe, se deseja escrever em o disco documentos HTML ISO Latin-1 ou utilizar outros conjuntos de caracteres Web, deve converter o texto utilizando Mac to ISO. Este é o principal propósito do comando Mac to ISO.

Exemplo 1

A linha abaixo de código converte o texto codificado Mac OS guardado em vtTexto em texto codificado ISO-Latin 1:

vtTexto:=Mac to ISO(vtTexto)

Exemplo 2

Durante o desenvolvimento de uma aplicação 4D Web Server, você cria por programação as páginas HTML que depois envia por Intranet ou Internet, utilizando o comando WEB SEND FILE. Alguns destes documentos têm referências ou links a outros documentos.

O seguinte método de projeto calcula a rota de acesso HTML a partir da rota de acesso Windows ou Macintosh recebida como parâmetro:

  // Método de objeto Rota de acesso HTML

  // Rota HTML ( Text ) -> Texto

  // Rota HTML ( Rota de Acesso do administrador de arquivos nativo) -> Rota de Acesso HTML

 

 C_TEXT($0;$1)

 C_LONGINT($vlChar;$vlAscii)

 C_STRING(31;$vsChar)

 

 $0:=""

 If(On Windows)

    $1:=Replace string($1;"\";"/")

 Else

    $1:=Replace string($1;":";"/")

 End if

 $1:=Mac to ISO($1)

 For($vlChar;1;Length($1))

    $vlAscii:=Character code($1≤$vlChar≥)

    Case of

       :($vlAscii>=127)

          $vsChar:="%"+Substring(String($vlAscii;"&$");2)

       :(Position(Char($vlAscii);":<>&%= "+Char(34))>0)

          $vsChar:="%"+Substring(String($vlAscii;"&$");2)

       Else

          $vsChar:=Char($vlAscii)

    End case

    $0:=$0+$vsChar

 End for

Nota: o método de projeto On Windows está listado na seção Documentos de Sistema.

Quando este método de projeto estiver presente em seu banco, se você desejar incluir uma lista de relações FTP aos documentos presentes em um diretório particular, pode escrever por exemplo:

  // Variáveis interprocesso definidas, por exemplo, no método banco On Startup

 ◊vsFTPURL:="ftp://123.4.56.78/Spiders/"

 ◊vsFTPDirectory:="APS500:Spiders:" // Aqui, uma rota de Mac OS File Manager

  // ...

 

  // ...

 ARRAY STRING(31;$asDocumentos;0)

 DOCUMENT LIST(...;$asDocumentos)

 $vlNbDocumentos:=Size of array($asDocumentos)

 jsHandler:=...

 For($vlDocument;1;$vlNbDocumentos)

    vtHTMLCode:=vtHTMLCode+"<P><A HREF="+Char(34)+◊vsFTPURL+HTML Pathname(Substring($1+$asDocumentos{$vlDocument};

    Length(◊vsFTPDirectory)+1))+Char(34)+jsHandler+">"+$asDocumentos{$vlDocument}+"</A></P>"+Char(13)

 End for

  // ...