× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



DUH! I didn't think of that. That's exactly what I needed. It runs PERFECT now.
Thanks a billion to everyone that put up with me on this one!







Bob Ostrowski | Senior Programmer/Analyst
TRAINOR GLASS COMPANY | National - IT
11901 S. Austin Ave. | Alsip, IL 60803
T 708.293.4218 | F 708.293.6218 | C 708.560.5813
bob.ostrowski@xxxxxxxxxxxxxxxx | www.trainorglass.com






-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Charles Wilt
Sent: Wednesday, July 13, 2011 8:24 AM
To: Midrange Systems Technical Discussion
Subject: Re: Opening File with STRPCCMD

cmd /c

is what tells windows to execute the command and then terminate.

you probably want PAUSE(*NO) on the very last line to prevent the 5250
session from waiting till the document is closed.

Charles

On Wed, Jul 13, 2011 at 9:13 AM, Robert Ostrowski
<Bob.Ostrowski@xxxxxxxxxxxxxxxx> wrote:
I have it working except for one little thing that's bothering me.
The last two commands of my CL program are:

  STRPCCMD PCCMD('ECHO start %MYDOC%>> C:\MYFILE.BAT')
  STRPCCMD PCCMD('C:\MYFILE.BAT')


When it gets to this line:

  STRPCCMD PCCMD('ECHO start %MYDOC%>> C:\MYFILE.BAT')

I have to hit ENTER in the dos box.

Then it gets to this line:

  STRPCCMD PCCMD('C:\MYFILE.BAT')

And I have to hit enter again in the dos box.

If I remove the STRPCCMD PCCMD('ECHO start %MYDOC%>> C:\MYFILE.BAT')
line, the file won't open.  I can't seem to figure out a work around.





Bob Ostrowski | Senior Programmer/Analyst
TRAINOR GLASS COMPANY | National - IT
11901 S. Austin Ave. | Alsip, IL 60803
T 708.293.4218 | F 708.293.6218 | C 708.560.5813
bob.ostrowski@xxxxxxxxxxxxxxxx | www.trainorglass.com





-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Pete Helgren
Sent: Tuesday, July 12, 2011 2:29 PM
To: Midrange Systems Technical Discussion
Subject: Re: Opening File with STRPCCMD

I have only been sitting on the sidelines on this.

What does the MYDOC variable look like when is it complete?   Based on
what I see it should be:

(unfortunately it will wrap....)

rundll32.exe url.dll,FileProtocolHandler W:\Southeast
Region\Dallas\System Design and Mockup Review\Constitution Square Bldg
One\Mockup Drawings\1st Submission\080711 Constitution Square Mock-up
Progress Drawings 2of2.pdf

Are the embedded blanks causing the heartburn?  Maybe double quotes
around the path an file name?

You should be able to open a command window and copy and paste the MYDOC

string into the command window and run it (preappended with the "start"
command...)

Pete Helgren
Value Added Software, Inc
www.asaap.com
www.opensource4i.com


On 7/12/2011 12:34 PM, Robert Ostrowski wrote:
I also tested with an RPGIV program.  The batch file is below.
The path is the entire path I have saved in a physical file
And still the PDF won't open.  Is there a little detail I'm
missing here?

SET MYDOC=rundll32.exe url.dll,FileProtocolHandler
SET MYDOC=%MYDOC%W:\Southeast Region\Dallas\System Design and Mockup
Review\C
SET MYDOC=%MYDOC%onstitution Square Bldg One\Mockup Drawings\1st
Submission\0
SET MYDOC=%MYDOC%80711 Constitution Square Mock-up Progress Drawings
2of2.pdf
start %MYDOC%







Bob Ostrowski | Senior Programmer/Analyst
TRAINOR GLASS COMPANY | National - IT
11901 S. Austin Ave. | Alsip, IL 60803
T 708.293.4218 | F 708.293.6218 | C 708.560.5813
bob.ostrowski@xxxxxxxxxxxxxxxx | www.trainorglass.com






-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Charles Wilt
Sent: Monday, July 11, 2011 2:54 PM
To: Midrange Systems Technical Discussion
Subject: Re: Opening File with STRPCCMD

Looks like you're missing the redirection symbols, or '>''>>'

take another look at the example I pointed you too


STRPCCMD PCCMD('cmd /c ECHO SET MYDOC=c:\documents and settings>
C:\DATA\MYFILE.BAT')
STRPCCMD PCCMD('cmd /c ECHO SET MYDOC=%MYDOC%\alexander.acctdom\my
documents>>
C:\DATA\MYFILE.BAT')
STRPCCMD PCCMD('cmd /c ECHO SET MYDOC=%MYDOC%\weekly\credit memos\acme
inc>>
C:\DATA\MYFILE.BAT')
STRPCCMD PCCMD('cmd /c ECHO SET MYDOC=%MYDOC%\memo84612.doc>>
C:\DATA\MYFILE.BAT')
STRPCCMD PCCMD('cmd /c ECHO start %MYDOC%>>  C:\DATA\MYFILE.BAT')
STRPCCMD PCCMD('C:\DATA\MYFILE.BAT')


ECHO start %MYDOC%

simply echo's the contents of the %MYDOC% environment variable to the
screen

C:\DATA\MYFILE.BAT
redirects the echo to a file, in append mode.  Note: '>' is replace.

HTH,
Charles


On Mon, Jul 11, 2011 at 2:26 PM, Robert Ostrowski
<Bob.Ostrowski@xxxxxxxxxxxxxxxx>  wrote:
I get the error message in a DOS box "The system cannot find the path
specified"
When trying to open a file with STRPCCMD.  Using the example from the
archives,
My code looks like the following below.  Did I remove something I
shouldn't have?

   PGM
*/


   DCL  VAR(&CMD)   TYPE(*CHAR) LEN(300)

   DCL  VAR(&PATH1)  TYPE(*CHAR) LEN(100)
   DCL  VAR(&PATH2)  TYPE(*CHAR) LEN(100)


/*
*/
   CHGVAR     VAR(&CMD) VALUE('rundll32.exe +
             url.dll,FileProtocolHandler ' *TCAT ' ')

   CHGVAR     VAR(&PATH1) VALUE('C:\AR_REGISTER.XLS')
   CHGVAR     VAR(&PATH2) VALUE('    ')

   STRPCO     PCTA(*NO)
   MONMSG     MSGID(IWS4010)


   STRPCCMD PCCMD('cmd /c ECHO SET MYDOC=' *TCAT&CMD +
                *BCAT 'C:\DATA\MYFILE.BAT')

  STRPCCMD PCCMD('cmd /c ECHO SET MYDOC=%MYDOC%' *TCAT&PATH1 *BCAT +
                'C:\DATA\MYFILE.BAT')


/*&PATH2 */
   IF COND(&PATH2 *NE '    ') THEN(DO)
   STRPCCMD PCCMD('cmd /c ECHO SET MYDOC=%MYDOC%' *TCAT&PATH2 *BCAT +
                'C:\DATA\MYFILE.BAT')
   ENDDO


STRPCCMD PCCMD('cmd /c ECHO start %MYDOC% C:\DATA\MYFILE.BAT')
STRPCCMD PCCMD('C:\DATA\MYFILE.BAT')






ENDPGM







Bob Ostrowski | Senior Programmer/Analyst
TRAINOR GLASS COMPANY | National - IT
11901 S. Austin Ave. | Alsip, IL 60803
T 708.293.4218 | F 708.293.6218 | C 708.560.5813
bob.ostrowski@xxxxxxxxxxxxxxxx<mailto:bob.ostrowski@xxxxxxxxxxxxxxxx>
| www.trainorglass.com<http://www.trainorglass.com>





--
This is the Midrange Systems Technical Discussion (MIDRANGE-L)
mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.


--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.