RE: Executing Commands within an RPG program

Great.  Thank you and everyone who helped!

Brian.

-----Original Message-----
From: Simonse, Arco (CMK) [mailto:ArcoSimonse@xxxxxxxxxxxxxxxxx] 
Sent: Wednesday, September 07, 2005 10:08 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: Executing Commands within an RPG program

Brian,

Since it seems you're not familiar with using Activation Groups now, it
would be safer for you to specify ACTGRP(*NEW).
This ensures that nothing remains open after ending the program. 
If you use a named activation group, it will keep open resources like
ODP's after ending the program.
Using ACTGRP(*NEW) will cause the system to automaticly cleanup after
your program ends.

HTH, Arco Simonse

Peter Colpaert wrote:
> Brian,
> Specify DftActGrp(*NO), and ACTGRP(xxxx) where xxxx is a 
> named activation group of your choice.
>  
 


> Brian Piotrowski <bpiotrowski@xxxxxxxxxxxxxxx> wrote:
> Thanks Peter!
> 
> One issue I am having is that when I compile the code, it 
> fails on the H-Spec with the error "Parameter BNDDIR not 
> allowed with DFTACTGRP(*YES)". Can you enlighten me on what 
> it needs and how to correct it?
> 
> Thank you!
> 
> Brian.
> 
> -----Original Message-----
> From: Peter.Colpaert@xxxxxxxxxx [mailto:Peter.Colpaert@xxxxxxxxxx]
> Sent: Wednesday, September 07, 2005 8:39 AM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: Executing Commands within an RPG program
> 
> Brian,
> 
> For such things, I rely on the System() API in QC2LE. This is what you
> need:
> 
> h bnddir('QC2LE')
> 
> fbclbl132 o e printer UsrOpn
> 
> d System PR 10i 0 ExtProc('system') System
> 
> Command
> d * value options(*string) 
> 
> /free 
> 
> If %open(bclbl132);
> Close bclbl132;
> Endif;
> 
> System('OVRPRTF FILE(BCLBL132) CPI(10) OUTQ(PQ2BC) FORMTYPE(*STD)');
> 
> Open bclbl132;
> 
> // Do your thing here...
> 
> /end-free
> 
DISCLAIMER:
This message contains information that may be privileged or confidential
and is the property of the sender. 
It is intended only for the person to whom it is addressed. If you are
not the intended recipient, you are not 
authorized to read, print, retain, copy,disseminate, distribute, or use
this message or any part thereof. If you
receive this message in error, please notify the sender immediately and
delete all copies of this message. 

This footnote also confirms that this email message has been swept of
the presence of computer viruses