WinApi::deleteFile

[vikuss2006]

Создан класс RunBaseBatch, который удаляет файлы из папки
if (WinAPI::folderExists(#ExportPath))
{
[handle, fileNameOpen] = WinAPI::findFirstFile(#ExportPath + "\\*.xlsx");
while (fileNameOpen)
{
createdDate = WinAPI::getFileCreatedDate(#ExportPath + "\\"+fileNameOpen);
delta = systemDateGet() - createdDate;
if(invoiceStorePeriod && delta >= invoiceStorePeriod)
{
if (WinApi::fileExists(#ExportPath + "\\"+fileNameOpen))
{
WinApi::deleteFile(#ExportPath + "\\"+fileNameOpen);
}
}
fileNameOpen = WinAPI::findNextFile(handle);
}
}
Из job это все отлично работает и удаляет файлы из папки, а вот из класса не удаляет, в чем может быть проблема, подскажите пожалуйста.

[Logger]

Джоб работает на клиенте, а класс наверняка на сервере. Если в пакетном режиме то клиентский метод WinApi::deleteFile может вообще по ошибке падать так как для пакета клиент отсутствует. В общем смотрите где работает код, какие он пути выгрузки получают, доступны ли они оттуда.
Если код серверный то используйте WinApiServer::deleteFile
Также может потребоваться выставить Permission на удаление файла.

[AlexeyS]

попробуйте не WinApi, а NET

    boolean         ret = true;
    FolderPath   pathFrom, pathTo;
    FileName        fullFileName;
    System.Exception clrException;
    ;

    pathFrom = this.getImportPath();

    fullFileName = pathFrom + "\\" + _fileName;

    if (!System.IO.File::Exists(fullFileName))
    {
        warning("Не найден файл " + fullFileName);
        return false;
    }

    pathTo = this.getImportPathLocal();

    if (System.IO.File::Exists(pathTo + _fileName))
    {
        System.IO.File::Delete(pathTo + _fileName);
    }

    try
    {
        System.IO.File::Move(fullFileName, pathTo + _fileName);
    }
    catch (Exception::CLRError)
    {
        ret = false;

        clrException = CLRInterop::getLastException();

        if (clrException)
        {
            clrException = clrException.get_InnerException();
            if (clrException)
            {
               error(clrException.get_Message());
            }
        }
    }

[Товарищ ♂uatr]

Цитата:

Сообщение от AlexeyS

попробуйте не WinApi, а NET

В чём разница? Некоторые методы WinApi, тот же fileExist, лишь .Net обёртки.

Цитата:

Сообщение от vikuss2006

Из job это все отлично работает и удаляет файлы из папки, а вот из класса не удаляет, в чем может быть проблема, подскажите пожалуйста.

Logger ключевые причины проблемы озвучил. При отладке Аксапта файлы находит и какой из методов не срабатывает?
Если работаете с DAX 2012, взгяните на реализацию метода fileNameNext в Global.

[DSPIC]

Держите корректную обработку, универсальную для клиентского и серверного исполнения + Batch. На этом постоянно приходилось спотыкаться.

static boolean fileExists(FilePath _filePath)
{
    boolean     ret;
    ;

    if(isRunningOnServer())
    {
        new FileIOPermission(_filePath, #io_read).assert();

        //BP Deviation Documented
        ret = WinAPIServer::fileExists(_filePath);

        CodeAccessPermission::revertAssert();
    }
    else
    {
        ret = WinAPI::fileExists(_filePath);
    }

    return ret;
}

public static boolean moveFile(FilePath _filePathFrom, FilePath _filePathTo)
{
    boolean             ret;
    System.Exception    ex;
    ;

    if (AXUtils::fileExists(_filePathFrom))
    {
        if(isRunningOnServer())
        {
            new InteropPermission(InteropKind::ClrInterop).assert();

            try
            {
                System.IO.File::Move(_filePathFrom, _filePathTo);

                ret = true;
            }
            catch (Exception::CLRError)
            {
                ex = CLRInterop::getLastException();
                error(ex.ToString());
            }

            CodeAccessPermission::revertAssert();
        }
        else
        {
            WinAPI::moveFile(_filePathFrom, _filePathTo);

            ret = true;
        }
    }
    else
    {
        info(StrFmt("File '%1' does not exist.", _filePathFrom));
    }

    return ret;
}

public static boolean deleteFile(FilePath _filePath)
{
    boolean             ret;
    ;

    if (AXUtils::fileExists(_filePath))
    {
        if(isRunningOnServer())
        {
            new FileIOPermission(_filePath, #io_write).assert();

            //BP Deviation Documented
            ret = WinAPIServer::deleteFile(_filePath);

            CodeAccessPermission::revertAssert();
        }
        else
        {
            ret = WinAPI::deleteFile(_filePath);
        }
    }
    else
    {
        ret = true;
    }

    return ret;
}

[AlexeyS]

Цитата:

Сообщение от Товарищ ♂uatr

В чём разница? Некоторые методы WinApi, тот же fileExist, лишь .Net обёртки.

можно получить осмысленное сообщение об ошибке при exception