Selecionar Arquivo abrindo caixa de dialogo

Boa tarde meus amigos,

Estou importando extratos bancarios para o banco de dados e gostaria de saber, como faço para abrir, via programação, uma caixa de dialogo para selecionar o arquivo desejado para importação? Seria estilo o explorer.

Obrigado.

Andre

Boa tarde.
Segue exemplo de código. Vai retornar na variável vArquivo o caminho completo do arquivo:

Código:

DEFINE VARIABLE vArquivo AS CHARACTER   NO-UNDO.

SYSTEM-DIALOG GET-FILE vArquivo
    TITLE   "Selecione arquivo para importar"
    FILTERS "Arquivos texto (*.txt)"   "*.txt",            "Documento Word (*.docx)"   "*.docx"
    MUST-EXIST    USE-FILENAME.

Obrigado amigo... deu certo.

Exemplo mais completo (e correto... rs):

Código:

DEFINE VARIABLE vConfirma      AS LOGICAL    NO-UNDO.
    DEFINE VARIABLE vArquivo AS CHARACTER  NO-UNDO.

    SYSTEM-DIALOG GET-FILE vArquivo
        TITLE      "Selecionar arquivo"
        FILTERS "Arquivos texto (*.txt)" "*.txt", "Documento Word (*.docx)" "*.docx"
        DEFAULT-EXTENSION "*.txt"
        MUST-EXIST
        USE-FILENAME
        UPDATE vConfirma.

    IF NOT vConfirma THEN
        RETURN NO-APPLY.

nesse último exemplo, a vConfirma indica se:

YES = o usuário saiu da caixa de diálogo pelo botão "OK".
NO = o usuário saiu da caixa de diálogo pelo botão "Cancelar".

valeu irmao.. deu certo