Malaysia: Adding FileNameOpen Extended Data Type to a Form

[Blog bot]

Источник: http://axmas.blogspot.com/2014/03/ad...data-type.html
==============

After add EDT FileNameOpen to form using New -> stringEdit,

[IMG]https://images-blogger-opensocial.googleusercontent.com/gadgets/proxy?url=http%3A%2F%2F4.bp.blogspot.com%2F-ZRK7jrAmF4A%2FUzDqDveT6pI%2FAAAAAAAAAUM%2F6ZgBA-10oh8%2Fs1600%2Fattachment.png&container=blogger&gadget=a&rewriteMime=image%2F*[/IMG]

add some form methods:

str fileNameLookupFilename()
{
return '';
}

str fileNameLookupTitle()
{
return "@SYS53008";
}

str fileNameLookupInitialPath()
{
return '';
}

container fileNameLookupFilter()
{
return ['All files','*.*'];
}


After get the file path, call insert method:


public void AvInsertAttachment(filename file, int i)
{
DocuRef docuRef;
DocuActionArchive archive;
;

if(file)
{
ttsbegin;
docuRef.clear();
docuRef.RefRecId = DirPartyEntity.RecId;
docuRef.RefTableId = tableNum(CustTable);
docuRef.RefCompanyId = DirPartyEntity.dataAreaId;
docuRef.Name = strFmt("Consultant Attachment %1", i);
docuRef.TypeId = 'File';
docuRef.insert();
archive = new DocuActionArchive();
archive.add(docuRef, file);
ttsCommit;
}
}












Источник: http://axmas.blogspot.com/2014/03/ad...data-type.html