Output File

aka_USAPA

I'm creating a report that would output a tab delimited file. Does someone know how I can setup a textbox so that it will browse to the right folder so I can specify the right name?

ara3n

Here is an example

OBJECT Report 50010 example file import
{
  OBJECT-PROPERTIES
  {
    Date=11/14/06;
    Time=[ 5:32:22 PM];
    Modified=Yes;
    Version List=TEC01.00;
  }
  PROPERTIES
  {
    ProcessingOnly=Yes;
    OnInitReport=BEGIN
                   FileName := 'C:\Temp\orders.txt';
                 END;

    OnPostReport=BEGIN
                   IF NOT EXISTS(FileName) THEN
                    ERROR('could not find the file');
                 END;

  }
  DATAITEMS
  {
  }
  REQUESTFORM
  {
    PROPERTIES
    {
      Width=13090;
      Height=3520;
      SaveValues=Yes;
    }
    CONTROLS
    {
      { 1   ;TextBox      ;3520 ;330  ;9350 ;440  ;AssistEdit=Yes;
                                                   SourceExpr=FileName;
                                                   OnAssistEdit=VAR
                                                                  FileDialog@1000000000 : Codeunit 412;
                                                                BEGIN
                                                                  FileName := FileDialog.OpenFile('Hello ' + USERID + ' Please Select the XML File.','',4,'xml',0);
                                                                END;
                                                                 }
      { 1000000003;Label  ;220  ;330  ;3300 ;440  ;CaptionML=ENU=File Name }
    }
  }
  CODE
  {
    VAR
      FileName@1000000005 : Text[100];


    BEGIN
    END.
  }
}

aka_USAPA

Thank you very much!

ara3n

you are welcome.