Creating a comma-separated value file in ax 2012

class CreateCommaFile

{

}

public static client void main(Args _args)

{

CommaTextIo file;

container line;

MainAccount mainAccount;

#define.filename(@'C:\Temp\accounts.csv')

#File

file = new CommaTextIo(#filename, #io_write);

if (!file || file.status() != IO_Status::Ok)

{

throw error("File cannot be opened.");

}

while select MainAccountId, Name from mainAccount

{

line = [

mainAccount.MainAccountId,

mainAccount.Name];

file.writeExp(line);

}

info(strFmt("File %1 created.", #filename));

}

class CreateCommaFileServer

{

}

public static server void main(Args _args)

{

CommaTextIo file;

container line;

MainAccount mainAccount;

FileIoPermission perm;

#define.filename('C:\\Temp\\accounts.csv')

#File

perm = new FileIoPermission(#filename, #io_write);

perm.assert();

file = new CommaTextIo(#filename, #io_write);

if (!file || file.status() != IO_Status::Ok)

{

throw error("File cannot be opened.");

}

while select mainAccount

{

line = [

mainAccount.MainAccountId,

mainAccount.Name];

file.writeExp(line);

}

CodeAccessPermission::revertAssert();

info(strFmt("File %1 created.", #filename));

}

File manipulation on the server is protected by Dynamics AX code access security and we

must use the FileIoPermission class to make sure we match the requirements.

Finally, we call CodeAccessPermission::revertAssert() to revert the previous assertion.