HP3000-L Archives

August 2018, Week 1

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Tony Summers <[log in to unmask]>
Reply To:
Tony Summers <[log in to unmask]>
Date:
Mon, 6 Aug 2018 15:09:41 +0000
Content-Type:
text/plain
Parts/Attachments:
text/plain (165 lines)
Even though we've migrated to an MPE emulator, we use job queues all the time so that jobs that need to run 24/7 don't bed-block the system job queue.

The alternative we've also used to create a UDC or command file that limits the number of instances of any job - example below (which partly uses a link to posix / unix using the SH command)

However,  looking at the sFTP failures,   have you checked that the FTP server is configured to allow multiple connections ?

USER DEFINED COMMAND FILE: HOWMANY.CMD
parm OK_NUMBER_of_JOBS=""

# HOWMANY
#
# HOWMANY is a command file to determine how many Jobs or Sessions are
# running with the same logon attributes as the calling Job or Session.
#
# An optional parameter can be passed to set the allowed number of running
# Jobs or Sessions with the same logon attributes.
#
# Example 1: Passing the number of 'allowed' Jobs / Sessions.
#
#    :HOWMANY 1
#
# If a job logs on and issues the HOWMANY command above, HOWMANY will check
# how many Jobs are running with the same logon attributes. The '1' tells
# HOWMANY that only '1' job should be running. Therefore, if HOWMANY
# determines that more than '1' is running, it will cause the calling Job
# to log off.
#
# Example 2:
#
#    :HOWMANY
#
# On it's own, HOWMANY will return a variable to the calling Job or Session
# called HOWMANY_THIS_USER that will be set to the number of EXECuting
# Jobs or Sessions with the same logon attributes.
#
# Example 3:
#
# If you want to see how many Jobs or Sessions are running for another
# User Id (not the calling Job or Session), then you can pass this as a
# parameter...
#
#    :HOWMANY T990
# Or
#    :HOWMANY "T990,ALL.SWIMS"    <--Quotes required
#
# You cannot log another Job or Session off with this command

setvar HOWMANY_USER  "!HPJOBNAME,!HPUSER.!HPACCOUNT"
setvar HOWMANY_USER2 "!HPJOBNAME,!HPUSER.!HPACCOUNT"

setvar HOWMANY_INPUT "!OK_NUMBER_of_JOBS"

if HOWMANY_INPUT <> "" then
   if HOWMANY_INPUT > "A" then
      setvar HOWMANY_USER ups("!HOWMANY_INPUT")
      if pos(",","!HOWMANY_USER") = 0 then
         setvar HOWMANY_USER2 "!HOWMANY_USER,@.@"
      else
         setvar HOWMANY_USER2 "!HOWMANY_USER"
      endif
      setvar HOWMANY_ALLOWED 9999
   else
      setvar HOWMANY_ALLOWED !HOWMANY_INPUT
   endif
else
   # Set to unlimited
   setvar HOWMANY_ALLOWED 9999
endif

continue
purge HWMNF@,temp;noconfirm >$null
build HWMNFILE;REC=-1,,B,ASCII;temp
file  HWMNFILE,oldtemp;dev=disc

showjob job=!HOWMANY_USER2;EXEC >HWMNFILE
#  next line links to the unix / posix shell
SH grep '!HOWMANY_USER' $MPE/_$MPE_JOBNUM/tmp/HWMNFILE.!HPGROUP.!HPACCOUNT >HWMN
FLE2

setvar HOWMANY_THIS_USER ![finfo("HWMNFLE2","EOF")]

if HPJOBTYPE = "S" then
   if HOWMANY_THIS_USER = 1 then
      setvar HM_IS_ARE "is"
      setvar HM_TYPE "SESSION"
   else
      setvar HM_IS_ARE "are"
      setvar HM_TYPE "SESSIONS"
   endif
else
   if HOWMANY_THIS_USER = 1 then
      setvar HM_IS_ARE "is"
      setvar HM_TYPE "JOB"
   else
      setvar HM_IS_ARE "are"
      setvar HM_TYPE "JOBS"
   endif
endif

echo There !HM_IS_ARE !HOWMANY_THIS_USER !HM_TYPE running for UserId: !HOWMANY_U
SER2

if OK_NUMBER_of_JOBS <> "" then
   if HOWMANY_THIS_USER > HOWMANY_ALLOWED then
      echo *****************************************************************
      echo Too many !HM_TYPE with this User Id running. Will now log you off
      echo *****************************************************************
      tellop HOWMANY is logging !HOWMANY_THIS_USER off
      if HPJOBTYPE = "S" then
         echo Will now log your Session off
         EOJ
      else
         echo This Job will now log off
         UDCEOJ
         EOJ
      endif
   endif
endif

purge HWMNF@,temp;noconfirm > $null
deletevar HM_TYPE, HM_IS_ARE, HOWMANY_ALLOWED


From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On Behalf Of Legault (US), Raymond D
Sent: 06 August 2018 14:39
To: [log in to unmask]
Subject: [HP3000-L] Sharing: SFTP failure and our workaround

Morning,

I wanted to share our experience with SFTP client and SFTP "Connection refused" errors.
We send about 40 files each day most of these in the early morning.
Sometimes we would have zero to fives connection failures each morning.
I noticed that these failures seem to occur when two SFTP jobs ran at the same minute.
I then added a "JOBQ=FINLOG" to the job card of every SFTP job I had and set the job limit to 1.
This was two weeks ago and we have not had a failure yet. We are running on a Stromasys CHARON
A500-200 and a A500-100 virtual machine which executes on a HP ProLiant DL 380 GEN 8 3.59 GHZ cpu 6 cores and 64 gig of memory.
We really need a 4.0GHZ cpu or higher to get better performance but the hardware did not support a higher cpu board.
Keep cool out there.

Ray


:run sh.hpbin.sys;info="-L";stdlist=*x;stdin=*Z3

Connecting to ftp-nw-6001.ca.boeing.com...
OpenSSH_3.7.1p2, SSH protocols 1.5/2.0, OpenSSL 0.9.6b 9 Jul 2001
Couldn't connect to PRNGD socket "/tmp/egd-pool": Connection refused
Entropy collection failed
ssh-rand-helper child produced insufficient data
Connection closed


* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html<http://raven.utc.edu/archives/hp3000-l.html> *

The contents of this email are confidential to the intended recipient and may not be disclosed. Although it is believed that this email and any attachments are virus free, it is the responsibility of the recipient to confirm this.

Details of Smith & Williamson group companies and Nexia Smith & Williamson Audit Limited and their regulators (where applicable), can be found at this URL

http://www.smith.williamson.co.uk/disclosure

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2