Solved

Change a nightly backup CL program

Posted on 2015-01-16
5
231 Views
Last Modified: 2015-01-16
OK it has been years since I've touched our AS400 (it is now decommissioned), but after the holidays I thought I'd try to finally change the nightly backup job.  It currently kicks out the tape at the end, and if I forget to put a new one in it fails the next night. So here was my steps taken.

First do a WRKJOBSCDE to find the job. Got it.

The job executes this CALL PGM(QGPL/NIGHTLY)

Fired up STRPDM. And looked at the object QGPL/NIGHTLY. Found it used QCLSRC\ARISRC as the source file, NIGHTLY as the member.

Looked at the member object and found the issue on line 21. ENDOPT was set to *UNMOUNT. So I changed it to *REWIND ENDOPT(*REWIND)

Put the tape back in and I'll be darned if the next day it was out again. I realized I forgot to compile it. So i went back to the member took option 14 to compile. Got a successful message. Then I came in this morning and it was out again.

Since this is all more than a little rusty, what could I be missing? The only lines after the rewind are some strsbs commands. and there are no other calls in the program. What is really weird is even after a compile and change when I look at the program again in QGPL\NIGHTLY it shows a source file last changed date in 2004.
0
Comment
Question by:bhieb
  • 3
  • 2
5 Comments
 
LVL 18

Accepted Solution

by:
daveslash earned 500 total points
ID: 40553925
Most likely, when you compiled it, the compiler deposited the program object in the incorrect library. First, determine where you WANT the program object to be. Then, recompile the program again, but prompt (F4) the compilation command, and manually fill in the destination library.

HTH,
DaveSlash
0
 

Author Comment

by:bhieb
ID: 40553941
Ok so it looks like it is putting it in the correct spot, but there is an option on F4 to replace program. I'm assuming that is what I missed. Is it safe to do that, logic says yes, but my green screen fear says ask first :)
0
 

Author Comment

by:bhieb
ID: 40553950
Wait maybe I'm missing something here.  This is the compile screen.

Program  . . . . . . . . . . . . > NIGHTLY       
  Library  . . . . . . . . . . . >   ARISRC      
Source file  . . . . . . . . . . > QCLSRC        
  Library  . . . . . . . . . . . >   ARISRC      
Source member  . . . . . . . . . > NIGHTLY       
Text 'description' . . . . . . .   *SRCMBRTXT    
                                                 
                                                 
                           Additional Parameters 
                                                 
Replace program  . . . . . . . . > *NO           

Open in new window


Should the Program library actually be QGPL since that is what it being called?
0
 
LVL 18

Expert Comment

by:daveslash
ID: 40553960
> option on F4 to replace program

That might be it. Specify *YES

> Should the Program library actually be QGPL since that is what it being called?

Yes

HTH,
DaveSlash
0
 

Author Comment

by:bhieb
ID: 40553962
Yep that was it, now the called object has the correct changed date.  Thanks for being the sounding board, been too long since I've done this stuff.
0

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
trying to Write to AS400 using SSIS Packs but getting error SQL 0189 6 422
End iSeries Job Programmtically 13 463
RPG to c# 3 378
Define binary variable in RPG free d specs 5 119
IT certifications are a concrete representation of continual learning on the part of the candidate.  Continual learning is necessary for the long term success of an IT professional, but are IT certifications the right path for you?
The business world is becoming increasingly integrated with tech. It’s not just for a select few anymore — but what about if you have a small business? It may be easier than you think to integrate technology into your small business, and it’s likely…
A short tutorial showing how to set up an email signature in Outlook on the Web (previously known as OWA). For free email signatures designs, visit https://www.mail-signatures.com/articles/signature-templates/?sts=6651 If you want to manage em…
In an interesting question (https://www.experts-exchange.com/questions/29008360/) here at Experts Exchange, a member asked how to split a single image into multiple images. The primary usage for this is to place many photographs on a flatbed scanner…

861 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