View previous topic :: View next topic |
Author |
Message |
Dibakar Advanced
![](images/avatars/gallery/cartoons/WB70.gif)
Joined: 02 Dec 2002 Posts: 699 Topics: 63 Location: USA
|
Posted: Tue Jul 04, 2006 7:14 am Post subject: Connect Direct - Copy Problem |
|
|
The following script is generated from mainframe and passed to CD. My process hangs somewhere. I can see that data from STEP3 has come to required destination. STEP5 and 7 are also executed. But apparently STEP9 is not executed, as I don't see corresponding file. In Process Monitor it shows Step3 still running.
I am getting confused why it shows STEP3 and if STEP3 is not complete then how can STEP5 execute? How can I make out if STEP9 was at all executed or not?
Thanks,
Diba.
Script:
Code: | STEP3 COPY FROM (DSN=DIBA.ABCD(BISWAS) -
DISP=SHR -
PNODE) -
TO (DSN=\'C:\\DIBA\\BISWAS.abc'\ -
DISP=RPL -
SYSOPTS="STRIP.BLANKS(NO)" -
SNODE) -
CKPT=1M -
COMPRESS EXTENDED
STEP4 IF (STEP3 NE 0) THEN
GOTO EXIT
EIF
STEP5 RUN TASK (PGM="NT") SNODE -
SYSOPTS=\"'CMD(cd /D C:\\DIBA\\\ || -
\& perl diba.pl dib)desktop(yes)'"\
STEP6 IF (STEP5 NE 0) THEN
GOTO EXIT
EIF
STEP7 RUN TASK SNODE (PGM="NT") -
SYSOPTS=\"'CMD(cd /D C:\\diba\\\ || -
\& perl diba.pl S diba biswas)desktop(yes)'"\
STEP8 IF (STEP7 NE 0) THEN
GOTO EXIT
EIF
STEP9 COPY FROM (DSN=DIBA.EFGH(BISWAS) -
DISP=SHR -
PNODE) -
TO (DSN=\'C:\\DIBA\\biswas.efg'\ -
DISP=RPL -
SNODE) -
CKPT=1M -
COMPRESS EXTENDED |
|
|
Back to top |
|
![](templates/subSilver/images/spacer.gif) |
Dibakar Advanced
![](images/avatars/gallery/cartoons/WB70.gif)
Joined: 02 Dec 2002 Posts: 699 Topics: 63 Location: USA
|
Posted: Wed Jul 05, 2006 2:07 am Post subject: |
|
|
I figured out the problem.
Problem was with "RUN TASK" command which runs it in synchronous mode. Since STEP7 uses data from STEP9 so changing "RUN TASK" to "RUN JOB" solved the problem.
Thanks,
Diba. |
|
Back to top |
|
![](templates/subSilver/images/spacer.gif) |
|
|