Hi. I need some help with net pgm. This is my stuff:
1- ADDPJE SBSD(LIBINO/INOSBS) PGM(LIBINO/TST44R)
2- TST44R read a InoDtaq
3- In WrkActJob I can view the INOSBS with TST44R 3 times (default)
4- I have a pgm TST43R that write a LIBINO/INODTAQ. I run it.
5- I run TST44R and in WorkActJob its appears only twice.
When I run TST44R twice, its disapper from INOSBS.
MY QUESTION: how I can do to not disappear (like NEP pgm)
This is TST44R source:
ddqname s 10A INZ('INODTAQ')
ddqlib s 10A INZ('LIBINO')
ddqsndlen s 5 0 INZ(14)
ddqlen s 5 0
ddqsnddata s 50a
dParm1 s Like(dqdata)
ddqdata s 50a
ddqwait s 5 0
C+ INSERT INTO QGPL/TSTPF (NAME) VALUES(:Parm1)
Free Guide: Managing storage for virtual environments
Complete a brief survey to get a complimentary 70-page whitepaper featuring the best methods and solutions for your virtual environment, as well as hypervisor-specific management advice from TechTarget experts. Don’t miss out on this exclusive content!