Hi This is post tells the how to upload the records into a Database Table using CSV file and Using TextIo.
static void ExampleInsertDataUsingFile(Args _args)
{
Dialog dlg;
DialogField dlf;
Filename fileName;
FilenameOpen fileNameLocation;
container con;
CommaIo commaIo;
FileIOPermission permission;
int iId;
str sName;
tblFileUpload TblFileUpload;
;
dlg=new Dialog();
dlf=dlg.addField(“FilenameOpen”,”fileNameLocation”);
if(dlg.run())
{
fileName =dlf.value();
permission=new FileIOPermission(fileName,’r');
permission.assert();
commaIo=new CommaIo(fileName,’r');
commaIo.inFieldDelimiter(‘,’);
if(commaIo)
{
while(commaIo.status()==IO_Status::Ok)
{
con=commaIo.read();
if(con !=conNull())
{
TblFileUpload.Id=conPeek(con,1);
TblFileUpload.Name=conPeek(con,2);
TblFileUpload.insert();
info(“Inserted Successfully…”);
while select TblFileUpload
{
print TblFileUpload.Id;
print TblFileUpload.Name;
}
// iId=conPeek(con,1);
// sName=conPeek(con,2);
//info(sName);
}
}
}
pause;
}
}
static void ExampleInsertDataUsingFile(Args _args)
{
Dialog dlg;
DialogField dlf;
Filename fileName;
FilenameOpen fileNameLocation;
container con;
CommaIo commaIo;
FileIOPermission permission;
int iId;
str sName;
tblFileUpload TblFileUpload;
;
dlg=new Dialog();
dlf=dlg.addField(“FilenameOpen”,”fileNameLocation”);
if(dlg.run())
{
fileName =dlf.value();
permission=new FileIOPermission(fileName,’r');
permission.assert();
commaIo=new CommaIo(fileName,’r');
commaIo.inFieldDelimiter(‘,’);
if(commaIo)
{
while(commaIo.status()==IO_Status::Ok)
{
con=commaIo.read();
if(con !=conNull())
{
TblFileUpload.Id=conPeek(con,1);
TblFileUpload.Name=conPeek(con,2);
TblFileUpload.insert();
info(“Inserted Successfully…”);
while select TblFileUpload
{
print TblFileUpload.Id;
print TblFileUpload.Name;
}
// iId=conPeek(con,1);
// sName=conPeek(con,2);
//info(sName);
}
}
}
pause;
}
}