Improve company productivity with a Business Account.Sign Up


Can I have AS400 Program/Scripts Created to Copy LIBs for Data Refresh?

Posted on 2010-09-14
Medium Priority
Last Modified: 2013-12-06
We are on AS400 V5R4.

We are planning to do a data refresh. We use the JD Edwards EnterpriseOne software. I coudl try to do the refresh by running built in tools to kick off and run and perform the refresh for me. However, this process takes forever to run.

What I would like to do is have some AS400 scripts created to run and do the COPYLIB to refresh my LIBs and update a couple of tables for me.

The refresh will be copying our 3 Production LIBs (COPD7333,  PD7333DNT and PD7333) to our 3 development LIBs (CODV7333,  DV7333DNT and DV7333) and our 3 test LIBs (COPY7333,  PY7333DNT and PY7333)

I would like to break up the program script into two. So one script to copy the production libs to development libs. And another script to copy production libs to test libs.

After the copy has been completed, I need to have two different tables up dated. Two sets of tables for both development lib and test lib.

The first table AFTER the copy that needs to be updated is: F983051 which is in the PY7333DNT lib for test and in the DV7333DNT lib for development. After the script copies the production lib (PD7333DNT) to PY7333DNT (test lib) that F983051  has a field that will show “PD7333” for production. Well, after the copy that field will need to be updated to reflect the test environment (PY7333). And after the copy from production to development lib (DV7333DNT) that table will need to be updated for development.

So two tables will need to be updated: F983051/PY7333DNT & F983051/DV7333DNT

The other table is the F9861 table. Similar to the F983051 table, after each refresh, this table will need to be updated. ALL the records in this table that refrence: PD7333 in the SIPATHCD field I want those records created for: DV7333 (for development) and PY7333 (for test).

So, in the testing refresh script, there should FIRST be steps to SAVE the existing LIBs: COPY7333,  PY7333DNT and PY7333

Then the refresh tasks to copy production LIBs to create or update the test LIBs above. Or however you recommend doing so on the AS400.

Then in that same testing script have commands to update the two tables mentioned.

And any other commands steps that should be included. Any data included to ensure data integrity?

Then I need to have another script setup the same way but for the “development” LIBs.

Does all that make sense?

Let me know if you need me to provide you with any other information.


Question by:matrix0511
  • 4
  • 3
  • 2
  • +2
LVL 17

Expert Comment

ID: 33679279
Please can you tell me why you need a data refresh?
I'm working already with the as/400 since the begining, but I can't remember that I did any data refresh ever.

In the past I did some refresh actions on a unix server, but for the as/400, I can't imagine why you like to do that.

Please explain.

LVL 36

Assisted Solution

by:Gary Patterson
Gary Patterson earned 800 total points
ID: 33680795
Use the cl commands savlib/rstlib to save and restore the libs. You can save to tape or if you have enough space, you can create a save file (crtsavf) and save to disk.

Once that is complete you can use a series of SQL UPDATE statements to update the files.

You can script this by putting the SQL statements into a source member and using the runsqlstm command to execute the SQL script.

- Gary Patterson

Author Comment

ID: 33682218
@murphey2, we user JD Edwards software. We have 3 different environments that users access. But right now Development and Test environments are not in synch with Production. we want the development & test environmnets (which have there own LIBs mentioned above) to look like production. so we have to do data refresh.

I know plenty of 400 clients who do refreshes all the time. It is nessary to do this often depending on your needs.

@Gary, can you give me the steps to put the backup commands in a script? I've never done that before. Thanks.
Get expert help—faster!

Need expert help—fast? Use the Help Bell for personalized assistance getting answers to your important questions.

LVL 36

Assisted Solution

by:Gary Patterson
Gary Patterson earned 800 total points
ID: 33682752
Here's a basic tutorial on using PDM to create a CL program:

Follow the same basic process (without compiling) to create a source member containing the SQL statements that you want to run using RUNSQLSTM.

If you aren't familiar with CL programming, it is too big a topic to cover here.  I suggest you take a class (Manta Technologies has good online classes), or buy a good CL programming book, like one of these:

I've used this one as a textbook for a CL Programming class that I used to teach:

- Gary Patterson

LVL 17

Expert Comment

ID: 33682802
Hi matrix0511,

Oke, replacing the test-data :-)
refresh a DB in other DB's (like progress etc.) is
  - a dump of all data in ascii files
  - rebuild all files
  - reload all data
  - build indexes
(only because they don't know a RGZPFM :-)

I was affraid you liked to do something like that

Good Luck,

Author Comment

ID: 33684557
oK. I was hoping someone would already have a script that I could just modify for our refresh. This refresh is due to start in just a week or so. Not enough time to read up on all the steps. so I was just hoping someone could provide a template, something I could build on.

since the steps are prettys striaghtforward I thought this would not take that long to prepare.
LVL 36

Expert Comment

by:Gary Patterson
ID: 33684729
Hardest part of the task is figuring out how to use PDM and SEU to edit and compile the CL.  If it is time-critical, and you don't have time for the learning curve, then it is probably time to hire a consultant.

The basic CL is:

DLTF (your save file)

the RUNSQLSTM scrips is just a series of SQL UPDATE statements.

Just prompt each CL command and fill in the correct parameters.  If you have trouble, post your CL and the SQL script and any error message and we can help.

- Gary Patterson
LVL 27

Expert Comment

ID: 33685605
...I thought this would not take that long to prepare.

It shouldn't take long to prepare at all... unless there are referential constraints or triggers or stored procedures or files with specific multiple members or any number of other details about which we might have no clue.

A "data refresh" into a different schema (library) on the same system is full of pitfalls.

If all is well, you might get by with a trivial list of CPYF commands, simply copying data from tables in one library to the corresponding tables in a second and third library.

But without knowing schema requirements, a "script" can be tricky.

Gary's "save/restore" where you save the source library and restore into a different library name might be as good as it's likely to get; but even that can be tricky if there are thing in DEV or TEST that you don't want disturbed.


Accepted Solution

ScottParker earned 1200 total points
ID: 33793184
We use JDE also.   We just take one of our Monthly system saves, and restore certian libs back.

Our production libs are   GRTDTA, and GRTCOM
after the system save, we restore GRTDTA to GRTDTAC1  and GRTCOM to GRTCOMC1

Author Comment

ID: 33806746
Ok. Thanks Scott.

Author Closing Comment

ID: 33806759

Featured Post

Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

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.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Introduction How to create multiboot configuration with XP\Vista and Windows 7 on it? And most important question - how to do this correctly so not to have any kind of nightmares we get when system gets screwed? First of all one should realize t…
In this article we will discuss all things related to StageFright bug, the most vulnerable bug of android devices.
This is used to tweak the memory usage for your computer, it is used for servers more so than workstations but just be careful editing registry settings as it may cause irreversible results. I hold no responsibility for anything you do to the regist…
Hi friends,  in this video  I'll show you how new windows 10 user can learn the using of windows 10. Thank you.

608 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question