Rob,
Thanks for the SQL.
I just added a simple vary off/vary on from IBM's doc.
https://www.ibm.com/support/pages/node/644039
VRYCFG CFGOBJ(TAPMLB01) CFGTYPE(*DEV) STATUS(*OFF)
MONMSG MSGID(CPF0000) /* t */
VRYCFG CFGOBJ(TAPMLB01) CFGTYPE(*DEV) STATUS(*ON)
MONMSG MSGID(CPF0000) /* t */
The problem only started when I migrated from our 3573-LTO7 to our Laservault/Exagrid VTL.
And then it is intermittent.
Paul
-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Rob Berendt
Sent: Tuesday, August 17, 2021 6:54 AM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxxxxxxxx>
Subject: RE: Tape Drives Do Not Vary On at IPL
Got back from vacation yesterday...
You just now noticing this?
Shoot, we've had this for a while. We have a SQLRPGLE program all in free form, using sql services, which runs with some programs we run at IPL time which beats it into submission.
Had me confused with the title though. It's media libraries. Drives appearing in WRKCFGSTS CFGTYPE(*DEV) CFGD(*TAP) We do NOT want varied on as they tie up the resources assigned to the media library. The only time we use the *TAP is for IPL from tape. Something best not experienced on a regular basis.
Want that program? RDYMEDLIB.
Code snippet:
dow sqlstate='00000';
exec sql
Fetch ResourceCursor into :Media_Library_Info.Resource_Name,
:Media_Library_Info.Resource_Status,
:Media_Library_Info.Resource_Allocation_Status;
select;
When sqlstate='02000'; // All rows have been fetched
iter;
When sqlstate<>'00000'; //
sqlstate=sqlstate; // debugging
When Media_Library_Info.Resource_Allocation_Status='DEALLOCATED';
cmd='VRYCFG CFGOBJ(' + %trim(Media_Library_Info.Device_Name) +
') CFGTYPE(*MLBRSC) STATUS(*UNPROTECTED) RSRCNAME(' +
%trim(Media_Library_Info.Resource_Name) +
')';
callp QCMDEXC(Cmd:%len(Cmd));
ENDSL;
enddo;
Rob Berendt
--
IBM Certified System Administrator - IBM i 6.1 Group Dekko Dept 1600 Mail to: 7310 Innovation Blvd, Suite 104
Ft. Wayne, IN 46818
Ship to: 7310 Innovation Blvd, Dock 9C
Ft. Wayne, IN 46818
https://smex-ctp.trendmicro.com:443/wis/clicktime/v1/query?url=http%3a%2f%2fwww.dekko.com&umid=0ad70a43-2567-4728-9154-4f16be411dff&auth=438b0784514c1757bd202125ca4db8b0abdb021e-48bb0e8fbdb13d620187f209a61916b5c566e358
-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Steinmetz, Paul via MIDRANGE-L
Sent: Thursday, August 12, 2021 3:32 PM
To: 'Midrange Systems Technical Discussion' <midrange-l@xxxxxxxxxxxxxxxxxx>
Cc: Steinmetz, Paul <PSteinmetz@xxxxxxxxxx>
Subject: Tape Drives Do Not Vary On at IPL
CAUTION: This email originated from outside of the organization. Do not click links or open attachments unless you recognize the sender and know the content is safe.
Last several IPLs, I've been noticing that not all tape drives are reporting in properly.
This is turn caused a following dedicated system save to fail - Minimum number of resources not available.
IBM support is suggesting I set the library device, TAPMLB01, Online at IPL to *NO, and vary on manually in my QSTRUP pgm.
https://www.ibm.com/support/pages/node/644039
Resolving The Problem
With the advent of faster processors in the IBM System i products, IPL times are becoming shorter and shorter. As a result, some tape drive resources have not reported into the Hardware Service Manager (HSM) in Service Tools by the time the system is ready to VARY ON the tape or tape library device description. This can occur even though the device description has ONLINE AT IPL (ONLINE) set to *YES. This may result in CPD26D6 and CPD27EF messages being issued during the IPL. Tape drive resources under the tape library description may have a status of DEALLOCATED.
Anyone in the group experiencing similar issues.
Thank You
_____
Paul Steinmetz
IBM I Power9 Administrator
Pencor Services, Inc.
462 Delaware Ave
Palmerton Pa 18071
610-826-9117 Work
610-826-9188 Fax
610-349-0913 Cell
610-377-6012 Home
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at
https://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
https://amazon.midrange.com
midrange.com
