Hi folks, sorry for the vague question…I was in a hurry (lol, still am). A better description of what I’m needing is how to supply QUERY a variable from within the JCL. That variable would simple be the value of today – 1 (yesterday). Here’s a description:
As physical paperwork for a file on the hp are copied to digital format, those files are marked as deleted on the hp (logically, not physically).
At present, the tracking of the destroyed paperwork is done manually (a tedious and error prone process), but we have hired summer help to increase the number of files we shred paperwork on, and thus, that manual tracking process has become a problem.
I was asked if I could write something on the hp to create a comma delimited file of the files shredded the day before. While it’s been years since I’ve done anything on the hp, I can do the JCL and the QUERY, I just can’t see where in the QUERY manual that I can use a variable supplied via the JCL?
example:
!Somejob.sys
set DateToReport = Current_date - 1
b=mybase
s=myset
m=5
find destroy_date = !DateToReport
r all
exit
!EOJ
[http://hosting.republictitle.com/signature/25thannivlogo.png] Ray Shahan | Programmer
Republic Title of Texas, Inc. | Corporate
2701 W. Plano Parkway, Suite 100 | Plano, Texas 75075
Tel: 972-578-8611 | Direct: 214-556-0202
[log in to unmask]<mailto:[log in to unmask]> | www.republictitle.com
Proud to be ALTA Best Practices Certified
WIRE FRAUD ALERT: Effective immediately, Republic Title must send Wire Instructions via secured email. If you receive any communication that appears to be from our office containing revised wire instructions, consider it suspect and call your closing team immediately. If you want us to wire funds to you, please bring your wiring instructions to closing.
From: Ray Shahan
Sent: Wednesday, June 07, 2017 3:40 PM
To: [log in to unmask]
Subject: Need a down and dirty QUERY
Hi all, it’s been years since I’ve done QUERY, so could use some help?
I need a query that runs in a JCL to pull some archived data off the hp each day (as files are marked as removed).
No frills, runs every day, and just reports the files that were marked as removed the day before.
Thanks for any help you can provide!
[http://hosting.republictitle.com/signature/25thannivlogo.png]
Ray Shahan | Programmer
Republic Title of Texas, Inc. | Corporate
2701 W. Plano Parkway, Suite 100 | Plano, Texas 75075
Tel: 972-578-8611 | Direct: 214-556-0202
[log in to unmask]<mailto:[log in to unmask]> | www.republictitle.com
Proud to be ALTA Best Practices Certified
WIRE FRAUD ALERT: Effective immediately, Republic Title must send Wire Instructions via secured email. If you receive any communication that appears to be from our office containing revised wire instructions, consider it suspect and call your closing team immediately. If you want us to wire funds to you, please bring your wiring instructions to closing.
CONFIDENTIALITY NOTICE: This email transmission (including attachments) is covered by the Electronic Communications Privacy Act, 18 U.S.C. 2510 et seq., and any information contained in this message is legally privileged, confidential and intended only for the individual or entity named herein. If the reader of this message is not the intended recipient, you are hereby notified that any dissemination, distribution or copy of this message is strictly prohibited. If you have received this message in error, please immediately notify us by telephone and purge all copies of this message from your system. Thank you. This communication does not constitute an intention by the sender to conduct a transaction or make any agreement or contract by electronic means.
Although this e-mail and all attachments are believed to be free of any virus or other defect that might affect any computer system into which it is received and opened, it is the responsibility of the recipient to ensure that it is virus-free and Republic Title of Texas, Inc. bears no responsibility for any loss or damage arising in any way from its use.
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
