Re: Create a directory from RPG

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

> Within CL it works fine using:
> QSH CMD('mkdir -p /one/two/three/four')

So why not do it that way in RPG as well?  (via QCMDEXC, system(), etc) 
You'll get rotten performance, but that's no different from CL.


> I've tried QzshSystem from Rpg but I always get error 7. I've checked 
> old postings but I did not understand the right way to code.

The way that QShell works is that it spawns a separate job for each 
command that you run. That job is connected to the original job via 3 
pipes.  One for standard input, one for standard output and one for 
standard error. (That's why QShell commands seem so slow -- for each one 
it has to create a new job and connect the pipes!)

The QzshSystem() API does NOT create the background job or the pipes for 
you. You have to do that yourself -- making this API almost completely 
useless! (In my opinion.)

You can use the spawn() or spawnp() APIs to run a QShell command. If you 
use the pipe() API to create the pipes, you can have a functioning QShell 
command this way.

A much better (more efficient) way to create these directories is to use 
the mkdir() API instead of trying to call QShell.  mkdir() doesn't have 
the option to automatically create the parent directories, but that's not 
very difficult to do with a simple %scan() loop in RPG.

Just wrap the routine up in a subprocedure and stick it into a service 
program, then you'll always have it!