Histórico da Página

DEFINE VARIABLE upload AS WIDGET-HANDLE.

/* Formato da Temp Table retornado pela função de pegar a propriedade files */

DEFINE TEMP-TABLE ttFiles

FIELD name AS CHARACTER

FIELD type AS CHARACTER

FIELD appServerPath AS CHARACTER

FIELD jbossPath AS CHARACTER

FIELD size AS DECIMAL.

/* Pega as propriedades dos arquivos que foram realizados upload e selecionados pelo usuário */

ttFiles = GETPROPERTY(upload, "files").

Observações:

• Para o correto funcionamento, a Temp-Table deve ter a mesma estrutura (name,type e size) , como mencionado no exemplo acima.
• A propriedade size está em (Kb).

/* Referência para o componente de upload */

DEFINE VARIABLE upload AS WIDGET-HANDLE.

/*Estrutura de dados necessária para os filtros de arquivos*/

DEFINE TEMP-TABLE

 ttFiltersFileFIELD description AS CHARACTERFIELD extension AS CHARACTER.
/* Documentos */
CREATE ttFiltersFile.ttFiltersFile.description = "Documentos".

ttFiltersFile.extension = "*.txt;*.doc;*.pdf;".

/* Imagens */

CREATE ttFiltersFile.

ttFiltersFile.description = "Images".

ttFiltersFile.extension = "*.png;*.jpeg;*.bmp".

/* Atribui ao componente de upload os tipos de arquivos que podem ser feitos upload */

SETPROPERTY(upload,"filtersFile",ttFiltersFile).

Observações:

• Para o correto funcionamento, a Temp-Table deve ter a mesma estrutura (description e extension), como mencionado no exemplo acima.
• Caso não informado os filtros ao componente, o usuário poderá escolher qualquer tipo de arquivo para realizar o upload