Q: I would like to write a program that a person on SYSTEMA can call to send a source member to SYSTEMB. When SYSTEMB receives the member, I want a program to automatically receive and compile the member, then send the compiled object back to the original sender on SYSTEMA.
A: Assuming you have a SNADS connection between the two systems, perform the following steps:
1. Create a user profile on the remote system (SYSTEMB).
2. Add the profile to the system directory on both systems.
3. Create a program on SYSTEMA that performs two tasks: sends the source member through the Send Network File (SNDNETF) command to SYSTEMB; and sends a network message to the user profile you created on SYSTEMB with the Send Network Message (SNDNETMSG) command. (You could even send the library, source file and member in the message text and retrieve that information to perform your compile.)
4. Set up a never-ending CL program on the SYSTEMB that executes a Receive Message (RCVMSG) command against the message queue of the user profile you created in step 1. Use the WAIT parameter value of *MAX to cause the RCVMSG command to wait continually. If a message is received, receive the network file (RCVNETF) and perform a compile. If the compile is successful, send the object back to SYSTEMA. (To send the object, you have to save it in a save file with the Save Object [SAVOBJ] command and then send the save file to SYSTEMA with the SNDNETF command.)
5. On SYSTEMA, receive the save file sent by SYSTEMB with the RCV-NETF command and then restore the object with the Restore Object (RSTOBJ) command. You could create a never-ending CL program to automatically perform this step, using the RCVMSG WAIT(*MAX) technique explained in step 4.
Business users want new applications now. Market and regulatory pressures require faster application updates and delivery into production. Your IBM i developers may be approaching retirement, and you see no sure way to fill their positions with experienced developers. In addition, you may be caught between maintaining your existing applications and the uncertainty of moving to something new.
IT managers hoping to find new IBM i talent are discovering that the pool of experienced RPG programmers and operators or administrators with intimate knowledge of the operating system and the applications that run on it is small. This begs the question: How will you manage the platform that supports such a big part of your business? This guide offers strategies and software suggestions to help you plan IT staffing and resources and smooth the transition after your AS/400 talent retires. Read on to learn:
LATEST COMMENTS
MC Press Online