File Members and the Library List - IT Jungle

File Members and the Library List

May 25, 2005 Dominic Lefevre

What happens when an RPG or COBOL program opens a file? For one thing, the system has to find the file. And where does it look for the file? Everyone knows the answer to that question. The system searches the libraries in the library list, beginning with the system library list, proceeding through the product libraries, the current library, and finally the user libraries. The system selects the first file it finds of the desired name, right? Not necessarily.

The exception comes when the system is searching for a certain file member. If the system does not find the desired file member in a file of the desired name, the system will continue to search the libraries in the library list.

Here’s a little test you can run for yourself. Create two files of the same name in different libraries. I suggest you use work libraries. You can use QTEMP for one of them. Give the members different names.
```
crtpf qtemp/x rcdlen(48) mbr(one) 
crtpf mylib/x rcdlen(48) mbr(two)
```
Use a database utility, such as DFU, to load one record into each of the files. I suggest you key ONE in member ONE and TWO in member TWO.

Use the Display Physical File Member (DSPPFM) command to display the files.
```
dsppfm x one
dsppfm x two
```
You will see that the system will find the right member, no matter the order of the libraries in the library list.

Source physical files also work well for this test. Give it a try with files of the same name, such as QRPGSRC, in different libraries.

This same behavior holds true with RPG (and, I assume, COBOL) programs. RPG normally opens the first member of a file, but if you override a file to a certain member, or you add the EXTFILE and EXTMBR keywords in RPG F specs, the system will continue to scan through the libraries in the library list until it finds a file member of the proper name.

The system is not consistent, however. The Run Query command chokes if it does not find the desired member in the first instance of the desired file.
```
runqry qry(*none) qryfile((x two))  
runqry qry(*none) qryfile((x one))  
```
One of the two commands generates message QRY1612 (Member ONE not in file X in MYLIB).
Share this:
Reddit
Facebook
LinkedIn
Twitter
Email
Tags:
Sponsored by
UCG Technologies
CYBER-ATTACKS ON THE RISE. PROTECT WITH THE TRIPLE PLAY.

COVID-19 has not only caused a global pandemic, but has sparked a “cyber pandemic” as well.

“Cybersecurity experts predict that in 2021, there will be a cyber-attack incident every 11 seconds. This is nearly twice what it was in 2019 (every 19 seconds), and four times the rate five years ago (every 40 seconds in 2016). It is expected that cybercrime will cost the global economy $6.1 trillion annually, making it the third-largest economy in the world, right behind those of the United States and China.”¹

Protecting an organization’s data is not a single-faceted approach, and companies need to do everything they can to both proactively prevent an attempted attack and reactively respond to a successful attack.

UCG Technologies’ VAULT400 subscription defends IBM i and Intel systems against cyber-attacks through comprehensive protection with the Triple Play Protection – Cloud Backup, DRaaS, & Enterprise Cybersecurity Training.

Cyber-attacks become more sophisticated every day. The dramatic rise of the remote workforce has accelerated this trend as cyber criminals aggressively target company employees with online social engineering attacks. It is crucial that employees have proper training on what NOT to click on. Cyber threats and social engineering are constantly evolving and UCG’s Enterprise Cybersecurity Training (powered by KnowBe4) is designed to educate employees on the current cutting-edge cyber-attacks and how to reduce and eliminate them.

A company is only as strong as its weakest link and prevention is just part of the story. Organizations need to have a quick response and actionable plan to implement should their data become compromised. This is the role of cloud backup and disaster-recovery-as-a-service (DRaaS).

Data is a company’s most valuable asset. UCG’s VAULT400 Cloud Backup provides 256-bit encrypted backups to two (2) remote locations for safe retrieval should a cyber-attack occur. This is a necessary component of any protection strategy. Whether a single click on a malicious link brings down the Windows environment or an infected SQL server feeds the IBM i, once the data is compromised, there is no going back unless you have your data readily available.

Recovery is not a trivial task, especially when you factor in the time sensitive nature of restoring from an active attack. This leads to the third play of the Triple Play Protection – DRaaS. Companies have myriad concerns once an attack is realized and a managed service disaster recovery allows employees to keep focus on running the business in a crisis state.

The combination of training employees with secure backup and disaster recovery offers companies the best chance at avoiding financial disruption in an age of stronger, more frequent cyber-attacks.

Reach out to UCG Technologies to discuss your company’s security needs and develop a data protection plan that fits you best.

ucgtechnologies.com/triple-play

800.211.8798 | info@ucgtechnologies.com
Share this:
Reddit
Facebook
LinkedIn
Twitter
Email
WRQ Improves Security of Terminal Emulation Suite Intel Partnership Doesn’t Hurt iSeries Strategy, JDA Software Says

Leave a Reply Cancel reply

THIS ISSUE SPONSORED BY:
ProData Computer Svcs iTera WorksRight Software