RPGIV @ Work

A unique site for RPG and System i Lovers

Welcome!

Hi, this site will provide all what you need in System i and RPG developments.

My Name is Chamara Withanachchi, System i Expert and RPG Developer. And in the field for last 11 years.

I hope you will find lot of valuable information from this site

Delete of IFS file/Directory Print E-mail
User Rating: / 1
PoorBest 
Written by Chamara Withanachchi   
Delete of IFS file/Directory
     H DFTACTGRP(*NO) ACTGRP(*NEW) BNDDIR('QC2LE')

     D unlink          PR            10I 0 ExtProc('unlink')
     D   path                          *   Value OPTIONS(*STRING)

     D rmdir           PR            10I 0 ExtProc('rmdir')
     D   path                          *   value OPTIONS(*STRING)

     D killme          S             50A

      * Delete the file
     C                   callp     unlink('/TMPtest/TMPfile.csv')

      * Delete the directory
     C                   callp     rmdir('/TMPtest')

     C                   eval      *inlr = *on

User Comments

Please login or register to add comments

<Previous   Next>