RUN COMMAND

[Abd Ghani Abdullah]

Dear all,

Thanks all, for the input and suggestions.

I have not solved the problem but I can get the commands to work if it is a 
small QUICK program.

But once I copy the same codes to the actual program (over 1,400 LOC), it does 
not function.

Any ideas.

Regards,
Ghani.


Quoting Vidyasagar Goparaju <Vidyasagar.Goparaju at kewill.com>:

> 
> Try this:
>  
> LET T_FILE = "A" + staff-id
> 
> IF NOT SETSYSTEMVAL("A",TRUN(T_FILE))
> THEN ERROR "Cannot set variable A"
> 
> LET T_FILE = "B" + staff-id
> 
> IF NOT SETSYSTEMVAL("B",TRUN(T_FILE))
> THEN ERROR "Cannot set variable B"
> 
> When you are done... after the COBOL run, run the following:
> 
> IF NOT DELETESYSTEMVAL("A")
> THEN ERROR "Cannot reset variable A"
> 
> IF NOT DELETESYSTEMVAL("B")
> THEN ERROR "Cannot reset variable B"
> 
> Sagar
> 
> -----Original Message-----
> From: powerh-l-bounces+vidyasagar.goparaju=kewill.com at lists.sowder.com
> [mailto:powerh-l-bounces+vidyasagar.goparaju=kewill.com at lists.sowder.com
> ] On Behalf Of Joe Boyle
> Sent: Thursday, September 28, 2006 9:40 AM
> To: 'Abd Ghani Abdullah'; powerh-l at lists.sowder.com
> Subject: RE: RUN COMMAND
> 
> Does it help if you try using exported env vars in place of soft links
> as
> below ?
> 
> Temp t_afile char* 50
> Let t_afile = "a=fullpath/A" + staff-id + ";export a"
> run command t_afile
> 
> Temp t_bfile char* 50
> Let t_bfile = "b=fullpath/B" + staff-id + ";export b"
> run command t_bfile
> 
> 
> -----Original Message-----
> From: powerh-l-bounces+atla38=dsl.pipex.com at lists.sowder.com
> [mailto:powerh-l-bounces+atla38=dsl.pipex.com at lists.sowder.com] On
> Behalf Of
> Abd Ghani Abdullah
> Sent: 28 September 2006 09:19
> To: powerh-l at lists.sowder.com
> Subject: RUN COMMAND
> 
> Hello all,
> 
> What is the best way to convert RUN COM in QDESIGN in MPE to UNIX?
> The scenario is in PROCEDURE DESIGNER
> run command "purge file A" + staff-id
> run command "purge file B" + staff-id
> run command "QTP" (to populate file A)
> run command "file a = A" + staff-id
> run command "file b = B" + staff-id
> run command "COBOLX"
> 
> COBOLX uses A as input and B as output. the staff-id is dynamic based on
> 
> 
> Currently we are using the following command
> run command "rm A" + staff-id
> run command "rm B" + staff-id
> run command "QTP" (to populate file A)
> run command "ln -sf A" + staff-id + " a"
> run command "ln -sf B" + staff-id + " b"
> run command "$NLRUNCBL COBOLX.acu"
> 
> Eventhough the data is created in file A+staff-id, COBOL seems not to
> read
> the 
> data from there and printing out blanks.
> 
> 
> Thanks & regards,
> Ghani.
> 
> -- 
> = = = = = = = = = = = = = = = = = = = = = = = = = = = =
> Mailing list: powerh-l at lists.sowder.com
> Subscribe: &quot;subscribe&quot; in message body to
> powerh-l-request at lists.sowder.com
> Unsubscribe: &quot;unsubscribe &lt;password&gt;&quot; in message body to
> powerh-l-request at lists.sowder.com
> http://lists.sowder.com/mailman/listinfo/powerh-l
> This list is closed, thus to post to the list you must be a subscriber.
> Add 'site:lists.sowder.com powerh-l' to your search terms to search the
> list
> archive at Google.
> 
> -- 
> = = = = = = = = = = = = = = = = = = = = = = = = = = = =
> Mailing list: powerh-l at lists.sowder.com
> Subscribe: &quot;subscribe&quot; in message body to
> powerh-l-request at lists.sowder.com
> Unsubscribe: &quot;unsubscribe &lt;password&gt;&quot; in message body to
> powerh-l-request at lists.sowder.com
> http://lists.sowder.com/mailman/listinfo/powerh-l
> This list is closed, thus to post to the list you must be a subscriber.
> Add 'site:lists.sowder.com powerh-l' to your search terms to search the
> list archive at Google.
>