mardi 3 avril 2012

Sample code to browse a file

DialogField dialogCustAcc;
DialogField dialogDescrip;
DialogField dialogFilename;
FileName filename;
TextIo file;
FileIoPermission permission;
;
public Object dialog(Object _dialog)
{
DialogRunbase dlg = super(_dialog);

//To Browse Excel File
dlg.addGroup("@LIQ1981");
dialogFilename = dlg.addFieldValue(typeid(FilenameOpen),filename);

dlg.addGroup("@SYS117450");
dialogCustAcc = dlg.addFieldValue(typeId(CustAccount),custAccount);
dialogDescrip = dlg.addFieldValue(typeId(Description),custDescription);

dlg.curFormGroup(dlg.mainFormGroup());

return dlg;
}
public boolean getFromDialog()
{
boolean ret;
ret = super();

filename = dialogFilename.value();
custAccount = dialogCustAcc.value();
custDescription = dialogDescrip.value();

return ret;
}

// Create the TextIo object
// Create the permission class
permission = new FileIoPermission(filename, #io_read);
// Ask for permission to write the file
permission.assert();
file = new TextIo(filename, 'R');
file.inRecordDelimiter('\r\n');
file.inFieldDelimiter(",");
// Loop as long as the file status is ok and read to container 'con'
while (file.status() == IO_Status::Ok)
{
con = file.read();
}
// Revert the access privileges
CodeAccessPermission::revertAssert();

Aucun commentaire:

Enregistrer un commentaire