CLP

How can I determine if the SMTP server is active from a CL program?

In a CL program, I want to start the SMTP server using the command STRTCPSVR *SMTP if it is not already started (such as being auto-started at IPL time). I then intend to end the server at the bottom of the CL, but only if the CL program actually started it. I tried issuing the STRTCPSVR...

As400 files - a basic question from a newbie

I know this is going to sound silly - a file has a format/formats. What is a 'member'?

CL test for user in group

I need to test for a specific user in a group to allow them access to a menu option in a CL program. I have already created the new group and added users to it. I need help with the actual CL command to test &user in &group. Tks

TAB to skip field - SYNON

I have a synon screen pgm with 5 input fields - one below another. I am on first field, and on pressing TAB there, I want the cursor to go to third field skipping the second. How can I do that? Plz help.

CL AS400 iSeries ILE Retrieve Source

Is there any way to retrieve source for an ILE CL program? I'm looking for a function equivalent to the RTVCLSRC command we use for retrieving the source for a CLP ?

Journal

How can i retrieve a record from a journal so that i can update the said record to another physical file. Because i want to retrieve the record created or updated from the journal so that i can update the other file. Thank you.

clear physical file member question

is it possible for me to only clear certain records of a physical while leaving certain records available? I have a file with thousands of records, but I only need the records starting with a certain date. How can I delete everything prior to the date that i need with out totally wiping out the...

CL Program to vary off Network Servers (*NWS)

Hello Can someone please help me with the following. We have an iSeries with an xSeries attached. The issue is that when we perform a scheduled IPL using the GO POWER menu, the xSeries is not being ended correctly prior to all other subsystems ending and then performing the IPL. What I am...

Use SysReq to get WRKJOB

I use to create a library - MYQSYS and load it with CRTDUPOBJ OBJ(WRKJOB) FROMLIB(QSYS) OBJTYPE(*CMD) TOLIB(MYQSYS) NEWOBJ(DSPJOB). I was then able to use the cmd CHGSYSLIBL LIB(MYQSYS)To put this library ahead of QSYS and when I used SYSREQ option 3 I got a WRKJOB instead of DSPJOB (and a cmd...

OS Version

How can I determine what OS Version is installed on my system from a program? The OS version is not in the system values, RTVJOBA, or RTVNETA.

Limiting User Abilities

We have an administrator here that we are trying to limit access on and I wanted to know if anyone else has solved this issue. I spoke with IBM and we have restricted the access to ADDUSRPRF and DLTUSRPRF commands and we have also restricted access to certain user profiles like QSECOFR and QSYSOPR....

CPF5152

Hello, I am experiencing a strange problem that is driving me crazy. First what I am attempting to accomplish is to read a DSPF file looking for specific output records and then write to a source file lines of RPG III code to output to those fields. What is happening is that after the 44th line...

How can you send a Reverse Image message to users message que

I am attempting to send a Reverse Image message to a users message que with the SNDMSG command. I am attempting to put the 'X21' attribute (Green Reverse Image) on the message so that the message appears in Reverse Image and stands out for the user. I have seen this done before but...

DB2 Stored Procedure V4R4 without ILE C/400

We have an older iSeries running V4R4. We user Rumba/400 for AS400 access, and we've run into a problem using the Rumba ODBC driver for linked server access from our SQL server to our AS400 (The ODBC driver periodically fails when the linked server is used heavily). Because of this, we've been...

Job Schedule Entries Migration

Hi All, We are migrating from an 820 to a new 550 i5 this weekend. Does anyone know how we can migrate the current Job Schedule Entries on the 820 to the 550? Is there an API to the database that holds the Job Schedule Entry details that we can use to extract the info and then push it into the...

Is this possible

I am writing a cl that will run two seperate queries. the first builds a file. the second needs a parameter before it can be displayed. The parameter is a route range. We get the route from a production file. Is there away to do a read or a chain statement to a file that will allow me to get that...

SQLCOD = -7008 when doing an insert into file using SQLRPGLE-2

Hi, I'm trying to insert selective records from one file into the same file in another library. I have to do this for many file. Am building the query dynamically using SQLRPGLE. Am using a PREPARE statement and an EXECUTE statement to run the query. While the PREPARE statement ends fine, am...

SQLCOD = -7008 when doing an insert into file using SQLRPGLE

Hi, I'm trying to insert selective records from one file into the same file in another library. I have to do this for many file. Am building the query dynamically using SQLRPGLE. Am using a PREPARE statement and an EXECUTE statement to run the query. While the PREPARE statement ends fine, am...

Displaying Chinese on 5250 screens

Hello, I need to change some CL driven green-screen menus to display Chinese instead of English. We don't need to change the applications or data behind the menus ... just the menus themselves which are actually driven by message files with a display file and some CLP. Does anyone know of a...

Deleted Users

Hi Is there any way we can know about deleted userprofiles in AS400? We have an audit process wherein the auditor have asked for a list of all the users deleted. Can any one suggest where can I get such a list? pgsdeb