Single Threaded routine used in TSA service

Hi,

Can't we execute the AIX commands like mv (to move the files) and rm (remove) in the single threaded routine used for a TSA service? When I execute the program/routine from jshell, the AIX command used within the program/routine does work fine. However, when I execute the program as a TSA service, it doesn't work at all. I've attached a snippet of code used in my program as below:

PROGRAM XYZ
..........
..........

OPENPATH V.OUT.DIRPATH TO F.OUT.DIR THEN
V.OUT.FILENAME = V.IN.FILENAME:'.ofs'
IF ARR.MICR.OFS NE '' THEN
WRITE ARR.MICR.OFS TO F.OUT.DIR, V.OUT.FILENAME
* Move the processed files to another folder i.e, PROCESSED folder
V.MV.CMD = 'mv ':V.IN.DIRPATH:'/':V.IN.FILENAME:' ':V.PROCESSED.DIRPATH
EXECUTE V.MV.CMD
END
END ELSE
ABORT 201,'F.DIR'
END

Could you please help me in figuring out the issue?

Thanks in advance!
Sailendra

Try to change the Single to Double Quotes.

Or else, put those commands in a Script and call the script (This works in Solaris and we use as below)

*

---

SEND.SMS.ALERT:
*

---

* DEBUG
SCR = "notify.sh ":TXN.REF
EXECUTE SCR

RETURN

It's not working even after changing single quote to double quotes. However, I have also used another AIX command (ls) in the same program which is working fine.

---

V.LIST.CMD = "ls ":V.IN.DIRPATH
EXECUTE V.LIST.CMD CAPTURING V.TMP.LIST.FILES

---

The above statement does work well.

I have a doubt if I need to do any changes in PGM.FILE, BATCH, TSA.SERVICE or TSA.WORKLOAD.PROFILE after re-compiling the routine/program used in PGM.FILE.

Do you have any solution on this?

Thanks,
Sailendra

Thanks for your reply.

It seems that the TSA service is using the old program/routine while running. I made some other changes in the same program and try to check if that change gets reflected while running as the service. But to my surprise, no any changes are being reflected while running as a service.

Can anyone suggest me how to clear the old program/routine from the cache (if any) so that the TSA service picks up the modified program/routine while running as a service?

For your reference, I already tried using CLEAR.FILE F.TSA.STATUS, and F.LOCKING.

Thanks in advance,
Sailendra Shrestha

jshow -c RTN output? is it pointing to ONE or MORE? If its just one, try to restart the TSM in a fresh window. If jshow o/p is more than one, then you need to DECATALOG the unwanted one . . .

jsh test1 ~ -->jshow -c E.GENERATE.MICR.OFS
Subroutine: /drt24test/test1/bnk/bnk.run/lib/lib35.so.118
jBC E.GENERATE.MICR.OFS version 10.0 Mon May 13 17:10:04 2013
jBC E.GENERATE.MICR.OFS source file NMB.BP
Executable: /drt24test/test1/bnk/bnk.run/bin/E.GENERATE.MICR.OFS.so
jBC main() version 10.0 Tue May 14 17:25:53 2013
jBC main() source file NMB.BP
Executable (DUP!!): /drt24test/test1/bnk/bnk.run/bin/E.GENERATE.MICR.OFS
jBC main() version 10.0 Tue May 14 17:25:53 2013
jBC main() source file NMB.BP

When I decataloged E.GENERATE.MICR.OFS using
DECATALOG NMB.BP E.GENERATE.MICR.OFS
and again cataloging the same program, it is again showing the same duplicate executable.
Do I need to remove one duplicate and if so how can i do that?

Thanks,
Sailendra

DECATALOG twice and make sure jshow -c doesnt return any o/p.

Then as jpb suggested, change the PROGRAM to ROUTINE and then COMPILE it again. After this make sure, jshow returns only one o/p pointing to a SUBROUTINE. then u can restart the TSM in a new window and test

Thanks a lot. It works now.

Thanks Again !!!

Sailendra