D365 Finance and operation

WHSWorkLine             workLine;
     InventTransOrigin       origin;
     InventTrans             inventTrans;
     CommaIO                 commaIO;
     FileName                fileName;
FileName = strFmt("%1/WorkLineDetails_%2.csv",WinAPI::getTempPath(),timeNow()); 

commaIO = new CommaIO(fileName,'W');
commaIO.write("Sales order Number", "Work Id", "Itemid","Qty"); //Header of the CSV File

while select workid from workLine
    where workLine.WorkStatus == WHSWorkStatus::Cancelled
    join ReferenceId ,ReferenceCategory from  origin
    where origin.InventTransId == workLine.InventTransId
    join ItemId,Qty from inventTrans
    where origin.RecId == inventTrans.InventTransOrigin
    && inventTrans.StatusIssue == StatusIssue::ReservPhysical
{
commaIO.write(origin.ReferenceId,workLine.workid,inventTrans.ItemId,inventTrans.Qty);
}
WINAPI::shellExecute(fileName);