IBM System i

IBM i, formerly known as AS/400, is a proprietary, midrange, object-based operating and application system. It includes a relational database, a menu-driven interface, support for multiple users, block-oriented terminal support and printers, and supports security, communications, and web-based application servers including Websphere, Apache and Tomcat.

Share tech news, updates, or what's on your mind.

Sign up to Post

Greetings

   When we see values on greenscreen from a AS400 programs, there are needs to download massive data.

   Sometimes we see a number in screen but to avoid going from screen to screen to check multiple values, we know all those values are in a table

   Do you know how to extract the "table name" to download massive data in a SQL query from a number you see in the screen?

   Picture attached to explain better.

Thank in advance
0
Cloud Class® Course: Microsoft Windows 7 Basic
LVL 12
Cloud Class® Course: Microsoft Windows 7 Basic

This introductory course to Windows 7 environment will teach you about working with the Windows operating system. You will learn about basic functions including start menu; the desktop; managing files, folders, and libraries.

Needing recommendations for hand held scanners that I can do 5250 emulation.  I am doing a scanning project for a warehouse and we have an AS400/iSeries.  The scanner needs to be able to run 5250 emulation.  I have used the Motorola MC9190 scanners in the past.  They work very well, but are very expensive.  There are other options for those like refurbed ones.  Also there is the MC9090 scanner.   Any suggestion would be appreciated.
0
I have been tasked with creating a list of possible combinations for standard parts.  

I have a list of standard parts that look something like this:

10.200.12??.000
15.234.1324.0??
81.43234.??00

I also have a list of color codes that are all two digits:
11
QQ
AH

I am wondering if it is possible in SQL and ultimately in a CL program on our i series to generate a list of all possible final part combinations and put them in a table?

In this example:
10.200.1211.000
15.234.1324.011
81.43234.1100
10.200.12QQ.000
15.234.1324.0QQ
81.43234.QQ00
10.200.12AH.000
15.234.1324.0AH
81.43234.AH00

I don't have any experience with loops in SQL and am having trouble making sense of the examples I have found.

I can do this in Visual Basic or other languages but the goal is to have it on a schedule and automated on our job scheduler.  

Any guidance is appreciated.
0
We have an odd issue on one of our IBM i servers. It appears that every Thursday at 5:00 PM - our hand held devices lose connectivity to our IBM i server.  It looks like our services go up and down for about 20 minutes and then stabilize.  If I look at QHST - I see that there are a lot of devices disconnecting - but i don't see the IBM i actually being unresponsive - but I don't know that for sure.  

I was wondering if there was any detailed logs somewhere related to TCP/IP that I could look to verify if the server actually lost connectivity during that timeframe or if OTHER devices connected to it lost the connectivity.  I have included a couple of snapshots of the logs...to show what I am seeing around that 17:00 PM timeframe.

LIT_Log_1.gifLIT_Log_2.gifLIT_Log_3.gif
0
Hi All,

I'm assisting a friend in changing the field length in an existing physical file on an AS/400,iSeries.  We are trying to understand two things:

1. What is the best way of going about this.

2. What is the best way of updating all supporting programs which use the PF or LF.  

Attached is a document we received from a guy who responded to our post on an IBM website.  This has been helpful; however, there are hundreds of programs that reference that PF that we are changing.  

If anyone can shed some light on a more effective way of making these changes, it would be greatly appreciated.

Thank you.

-Anthony
0
We would like to set up FTPS (SSL FTP) between our mainframe and IBM i (V7R1 currently). Our mainframe system programmer sent me a certificate (MAINFRAME.CER).  I went into the digital certificate manager on our IBM i and imported the certificate and then added it to the "access" list for FTP.

Does anyone know what else is needed to be able to do FTPS between the IBM i and Mainframe?

I appreciate any help
0
JPG in AFPRSC with 23 works fine. But PNG with 65 is not printing.

AFPRSC('QRC.PNG' 65 - 
0.0 0.0 (*PATH '/JP/STAT'))

Open in new window


Need help on how to get it work? or is 65 the correct component ID for PNG?
0
Hi Experts.
I have a customer that wants to be able to access an AS400/iSeries database file from their website.   The Website is hosted offsite and the AS400/iSeries is onsite.  I have googled quite a bit and having trouble finding a lot on how to do this.  I have done iSeries stuff for years, but this out of the ordinary for this.  Any help appreciated.
0
Hi All,

I am very new in PCOMM VB script and facing the below issue  which is creating obstacle to promote my code in  production...

I am invoking the below program(logcapture.mac) in a AS400 system after logging in to the main screen. It is running properly approx 36 Hrs and after that suddenly
getting stopped. Getting below error if trying to re-initiate from the same screen/session.

"PCSWS041 - The system has insufficient resources or the Script Engine is not properly installed"

But able  to re-initiate if I run with a fresh session by closing the previous.

	[PCOMM SCRIPT HEADER]
LANGUAGE=VBSCRIPT
DESCRIPTION=  ** TLPV - Log Capture v1.0 **
[PCOMM SCRIPT SOURCE]
OPTION EXPLICIT



Dim Logger, Domain_Id, atm_LoginID, atm_LoginPassword
Logger="ON"

'Domaid_ID =============>

Domain_Id = "xxxxxxx.xxxx_xxx"
atm_LoginID = "xxxxxxx"
atm_LoginPassword = "xxxxxxxxx"

'========================================================================================================================:


autECLSession.SetConnectionByName(ThisSessionName)

Dim Record_Low, Previous_Record_High, Record_High, Nw_Record_Low, Sub_System, Library, Current_ZNL, Pre_Library, Product, path, Node_Name, Nw_Node_Name, Iteration, s,nw_entry, filename,workpath, objFSO, RecordsFile, outFile, objFile,rAwdaTaU, rAwdaTaL,mystring,string_loop_count, k, Remaining_len, count, Logout_indicator
Logout_indicator="N"
Set objFSO=CreateObject("Scripting.FileSystemObject")
Main

Private sub Main()
	

Open in new window

0
How a calculate  log base2 (X) (any value to log base 2 )  in rpgle ?
0
Cloud Class® Course: Python 3 Fundamentals
LVL 12
Cloud Class® Course: Python 3 Fundamentals

This course will teach participants about installing and configuring Python, syntax, importing, statements, types, strings, booleans, files, lists, tuples, comprehensions, functions, and classes.

Hi Experts,

I prefer to use a Webservice for this kind of requirements, but that is not in scope in this question

So I have to write a trigger (or trigger-like program) on the IFS, that will be fired when a File is added to a specified path (or even a specific file extention)
Writing a NEP is no option because of the immediate action I have to take.
I found the next options:
  1. Use an ExitProgram on QIBM_QP0L_SCAN_CLOSE
  2. set Journaling to the specific IFS-path
  3. .... any other sugestion is more then welkome

Defining the Exit program keep telling me :
CPF3CE5 ; Exit point QIBM_QP0L_SCAN_CLOSE with format SCCL0100 will not allow exit program MyEXIT library MyLIB to be added.                    
I also not convinced that this is the right way, because every close action in the IFS will trigger this program (not only one specific path I assume)

Journaling is maybe better but:
RCVJRNE seems to loop through all entries and give unreadable data to my program (lots of questionmarks).

I'm out of ideas... don't know what I have to specify to solve this.
0
We have recently upgraded from V7R1 to V7R3 on a number of our IBM i servers.  Since upgrading, our user's job logs are being sent to their assigned printer when they log out of the system.  Does anyone know what system setting would have changed that is causing this to happen? I would like to set things back to normal ASAP.

I appreciate any insight into the issue!
0
In our as400 hardening doc, we currently allow 3 concurrent sessions per userid but our HQ new generic security policy recommends 1 session per Id

Was told that a user will require to run different types of jobs concurrently and often the jobs can take a while to complete even in our upgraded faster system I os400 v7 r2

What’s the practices out there?

CIS does not publish any hardening guide for os400
0
When I try to SSH into our iSeries (V7R1) - I get the following error:

-bash: cannot set terminal process group (-1): No such device or address
-bash: no job control in this shell
-bash-4.2$ logout


I am using Putty to try to connect.

Anyone have any ideas what might be going on? I attempted to recycle the SSHD server (ENDTCPSVR *SSHD) but that didn't resolve the issue.

Thanks,

Matt
0
RPGLE programmer using IBMi v7r1, need to insert/update data on a MS SQL database easily. I'm familiar reading and processing ifs file using bnddir('QC2LE') in my RPGLE programs.
Surely there's a way to push records to an MS SQL server?
0
Hello Experts,

I have a RPGLE question concerning looping though field names instead of having multiple routines with each field name.

Exp.   I have field names FIELD1, FIELD2, FIELD3, etc.   I know in the past(I've been away from AS/400 for years) I would use a DOU loop something like this.

DOU I = 10
FIELD,I      CHAIN    FILE       99

How do I do that in RPGLE?

THanks!!
0
Hi,

Been looking for reference material for the SQL for this system.

Connecting using VB.net app to query. Went to IBM site but pages are no longer available. What’s the best app to query the DB? Used winsql in the past for other work,

Best,

Ross
0
Dear Gurus

   I hope you're all doing great, I have a question regarding iSeries AS400 for Windows Macro/Scripting (Workstatin Program 6.0)

   As you probably know, there is a size limit for macro files (Not VBScript) and I'm building a user-friendly applet in excel that creates macro files

   In some cases there are lists of 6000 operations that have to be done, and mi Excel macro generates for example 220 AS400 macro files  (same number, all numbered)

saving screen for iseries for Windows emulator for macros
   Do you know which instruction may I use to call the "next macro" file in the text format?  "[wait app], [wait app inh], etc."

  Thanks as always for your wisdom

Dan
0
Hi Experts,

After upgrading an as/400 (i5, iSeries, etc) from V7R1 to V7R3, is there a log available where I can find info about what is added, replaced and removed ?
0
Free Tool: SSL Checker
LVL 12
Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Hello:
We currently have our IBM ISeries configured to send email thru our on premises Exchange 2013 server. The internal IP of the Exchange Server is 10.0.0.195 and I have a corresponding Host Table Entry on the ISeries pointing to that (10.0.0.195-MAIL.ROUTER.NAME). On the Exchange Server I have also setup a FrontEnd Receive Connector with the scope set to the internal IP of the ISeries (10.0.0.254). Everything works well and has for years.
However, we will be moving from hosting our Exchange on premises to using Rackspace's hosted Exchange and I was unsure how to route the email from the ISeries to Rackspace?
Thanks!
0
How to read a flat file and get data in as400??
0
Please Explain Difference between Writer and Printer in AS400
0
I'm not trained in AS400.
We don't use tapes anymore but backup to a remote Data Domain.

AS400's audit journal receiver of our developmt AS400 is taking too much space in our current weekly backups with retention of 6 years.

a) Without compromising on the 6 years' retention, how can we reduce the space taken by the backups in the Data Domain?

b) I suppose weekly backup is taken because the receiver journal is rotated weekly: is there such thing as incremental or
    differential backup in AS400 for audit journals?

c) can we do it monthly with differential backups or what other strategy can we do it?  

d) can it be compressed?   the Data Domain solution we used is from EMC.  Anything on deduplication??

We are on OS400 V7 R2  running DB2
0
Hello Team,

I have following doubts on the below questions . Kindly please answer

-What is the difference between private authority and object authority?
- How do we delete temporary and permanent PTF ? Does it depend on the PTF type?
-PTF install has failed and what is the roll back plan?
-what is PSP and use of it?
-How do we connect HMC to server? I mean how HMC will talk to all the Hardware?
-Do you have document to configure HMC from scratch?
-Difference between capped and uncapped processor?
-what is processor pool and memory pool?
-what is CPW and how do we calculate the CPW of our LPAR/server?
-How to check how much memory is being used currently? using WRKSYSACT?
-In some point of time the ASP has been reached from 40 to 90, so how do we identify which object has been caused/saved?
- What is MIMIX Application Group and Data group?
0
I'm using QUSLJOB API to get the list of all jobs on the system. I'm then passing this job list to API QUSRJOBI format JOBI200 for getting various other information for each job. My problem is to have CPU% for each job. JOBI200 doesn't have any field that return CPU%. I know that the API JOB1000 gives the elapsed time CPU%, but couldn't find any example of it. If anyone can help me with the example of format JOB1000 then I will be grateful.

Thanks.
0

IBM System i

IBM i, formerly known as AS/400, is a proprietary, midrange, object-based operating and application system. It includes a relational database, a menu-driven interface, support for multiple users, block-oriented terminal support and printers, and supports security, communications, and web-based application servers including Websphere, Apache and Tomcat.

Top Experts In
IBM System i
<
Monthly
>