How to determine what USER is using a IP address
I'm working on an issue with Telnet on z/os 1.13. I have a user somewhere connecting to the mainframe TCPIP IP using a bypass IP address. We are supposed to be using a SAG sever to connect to the desktop server, however the mainframe is reachable by DNS ip which is for backup emergency purpose only. Does anyone know of a way I can trap when a Telnet session has been created on port 23 with a specific IP address? Domenic Cifani Technology Consultant III Network Software Canada HP Enterprise Services Telephone (905) 383-7864 HP Cell (905) 869-3279 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: STP Setup question for IBM 2818 processsor
Thank You We will give it a try today. Domenic Domenic Cifani Technology Consultant III Network Software Canada HP Enterprise Services Telephone (905) 383-7864 HP Cell (905) 869-3279 -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Salah Balboul Sent: Wednesday, November 06, 2013 6:21 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: STP Setup question for IBM 2818 processsor HI ; Wondering if anyone can tell me when I try to setup STP on the HMC and I am doing the Network Configuration Setup. I enter Preferred time server and check of the only allow the server specificied above to be in the CTN. Would I have to select the initialize time and if so what will this task do. Any insight is appreciated. Also what would the force configuration da as well. Thanks Ben Going under the assumption you are setting an STP only CTN the answer is Yes. You will need to Initialize Time. This will allow you to set the Leap seconds, Time Zone offset, Date and time. Most likely your Leap seconds will be 0 For Time Zone Offset you should select Automatically Adjust For Set Date/Time select Use the configured External Time Source to ... I assume you already have an ETS setup. The last thing you do is assign CTN roles. You will use Force Configuration if this is a new STP setup. Thanks -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
STP Setup question for IBM 2818 processsor
HI ; Wondering if anyone can tell me when I try to setup STP on the HMC and I am doing the Network Configuration Setup. I enter Preferred time server and check of the only allow the server specificied above to be in the CTN. Would I have to select the initialize time and if so what will this task do. Any insight is appreciated. Also what would the force configuration da as well. Thanks Ben -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
SFTP to send a file to OMVS
User is using SFTP to send a file to OMVS, then sends a trigger file to MVS using FTP, since SFTP is not supported on MVS datasets. User is trying to eliminate the FTP to MVS but still trigger ESP scheduler to run a job against the original file. ESP cannot detect the file arriving in OMVS. Is there any software available that would make it possible to do SFTP to MVS side on z/OS system that would be practical to install, or is this simply the way it is? I have seen a couple of vendors that provide solutions, such as Dovetail and Tectia but I'm not sure how to answer this question which is how to trigger the Job in ESP when the file arrives in OMVS? Right now it is not possible. Does anyone know of a solution. Regards, Domenic Cifani Technology Consultant III Network Software Canada HP Enterprise Services Telephone (905) 383-7864 HP Cell (905) 869-3279 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Setting the OSA Speed and Mode on IBM 2818
Hi Can anyone assist me is setting determining how to set up the OSA Speed and Mode for the OSA card on the IBM 2818 processor. We are trying to define the speed and duplex for the OSA Express4S Gbe LX (card 0404) using the HMC and the SE Advanced Facilities tool. Nowhere is there the ability to make a change. The OSA Implementation manual didn’t help either, maybe because this OSA is 1 step up from what was writte.n Domenic Cifani Technology Consultant III Network Software Canada HP Enterprise Services Telephone (905) 383-7864 HP Cell (905) 869-3279 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
NETSOL CBT 1981 edition question
Hi First of all, I know why are we still using Ed's 1991 version? The client transitioned to us and I have to try and figure out how to use this old version. I'm trying to add a new VTAM APPL to the CMDTAB for Insight DB2. When I try to run the Assembly for CMDSUB it fails looking for a Macro called RPLUSFLD, or at least I believe it's a macro. Does anyone have any experience with this version of NETSOL? Here is the cut/paste of the assembly error. Domenic 278 *$$$ 279 *$$$ 280 * 281 * 282 *SEARCH COMMAND TABLE FOR MATCHI 0001CA 284 SRCHTAB DS0H R:1 0 285 USING CMDDSECT,R1 O 0001CA 5810 B66C0166C 286 L R1,=AL4(CMDTAB) 0001CE 4170 52F2002F2 287 LAR7,DATASEQ P 0001D2 91FF 1000 0 288 CMDLOOP TMCMDGAPPL,X'FF' E 0001D6 47E0 C1F4001F4 289 BNO CMDCHECKN 0001DA 4100 00022 290 CMDERROR LAR0,MSG02Y 0001DE 0 291 L R3,RPLUSFLD E ** ASMA044E Undefined symbol - RPLUSFLD ** ASMA435I Record 271 in NET9.NETSOL.SOURCE(CMDSUB) on volume: X1SMS4 292 $CALL SEND 0001E2 58F0 B67001670 293+ L R15,=V(SEND) LOAD EP 0001E6 05EF 294+ BALR R14,R15 BRANCH 0001E8 59F0 B67401674 295 C R15,=F'08' R 0001EC 4780 C58C0058C 296 BERELOPEN T 0001F0 47F0 B62401624 297 B EXITE 298 * Domenic Cifani Technology Consultant III Network Software Canada HP Enterprise Services Telephone (905) 383-7864 HP Cell (905) 869-3279 Email domenic.cif...@hp.commailto:bernie.macis...@eds.com 242 Upper Mount Albion RD Unit 12 Stoney Creek On L8J 0B1 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: PL/I Compile error unresolved symbols
Some additional questions 1) Did you recently upgrade the compiler? yes If yes, are the options same as before the upgrade? yes 2) When was the last time this program was compiled correctly? From what im told from the user several years 3) What source changes were made that required this compile? No source changes were made. Thanks Lizette -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Cifani, Domenic Sent: Friday, September 28, 2012 1:13 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: PL/I Compile error unresolved symbols Hi I have a user running PL/I implementation in Endevor, and the PL/1 compile step has a return code=008. I don't have much experience with this, does anyone who what libraries need to be added to the SYSLIB concatenation for the unresolved symbols? Domenic 5655-W67 IBM(R) Enterprise PL/I for z/OS /* 2012.09.28 13:13:12 Page 4 Compiler Messages Message Line.File Message Description IBM1389I E 13.0The identifier STR is not the name of a built-in function. The BUILTIN attribute will be ignored. IBM1482I E 13.0The variable STR is declared without any data attributes. IBM1300I E 222.0P is contextually declared as POINTER. IBM1208I W 25.0INITIAL list for the array LLIB contains only one item. IBM1208I W 38.0INITIAL list for the array DISP contains only one item. IBM1058I I 239.0Conversion from BIT to FIXED BIN(31) will be done by library call. IBM2812I I 242.0Argument number 2 to VERIFY built-in would lead to much better code if declared with the VALUE attribute. IBM1058I I 252.0Conversion from BIT to FIXED BIN(31) will be done by library call. File Reference Table FileIncluded From Name 0 ASMS.DEV1TEST.STAGE1.PLI($PK2A) ComponentReturn CodeMessages (Total/Suppressed)Time Compiler 88 / 0 1 secs End of compilation of $PK2A z/OS V1 R13 BINDER 13:13:14 FRIDAY SEPTEMBER 28, 2012 BATCH EMULATOR JOB(VAN7032@) STEP(NDVRBAT ) PGM= IEWL IEW2278I B352 INVOCATION PARAMETERS - XREF IEW2456E 9207 SYMBOL CEEBETBL UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL CEEROOTA UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL CEEOPIPI UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQEFSH UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQOFWR UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQOFOP UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQOFRD UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQCPBX UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQOFSH UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQOFNT UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQOFPT UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMPOFCX UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMPINPL UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL CEESG011 UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY.CALL LIBRARY. Domenic Cifani -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: PL/I Compile error unresolved symbols
Steve Thank You, I will review your comments and give it a try. Domenic Domenic Cifani Technology Consultant III Network Software Canada HP Enterprise Services Telephone (905) 383-7864 HP Cell (905) 869-3279 Email domenic.cif...@hp.com 242 Upper Mount Albion RD Unit 12 Stoney Creek On L8J 0B1 -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Steve Comstock Sent: Friday, September 28, 2012 4:37 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: PL/I Compile error unresolved symbols On 9/28/2012 2:13 PM, Cifani, Domenic wrote: Hi I have a user running PL/I implementation in Endevor, and the PL/1 compile step has a return code=008. I don't have much experience with this, does anyone who what libraries need to be added to the SYSLIB concatenation for the unresolved symbols? Domenic 5655-W67 IBM(R) Enterprise PL/I for z/OS /* 2012.09.28 13:13:12 Page 4 Compiler Messages Message Line.File Message Description IBM1389I E 13.0The identifier STR is not the name of a built-in function. The BUILTIN attribute will be ignored. IBM1482I E 13.0The variable STR is declared without any data attributes. IBM1300I E 222.0P is contextually declared as POINTER. IBM1208I W 25.0INITIAL list for the array LLIB contains only one item. IBM1208I W 38.0INITIAL list for the array DISP contains only one item. IBM1058I I 239.0Conversion from BIT to FIXED BIN(31) will be done by library call. IBM2812I I 242.0Argument number 2 to VERIFY built-in would lead to much better code if declared with the VALUE attribute. IBM1058I I 252.0Conversion from BIT to FIXED BIN(31) will be done by library call. File Reference Table FileIncluded From Name 0 ASMS.DEV1TEST.STAGE1.PLI($PK2A) ComponentReturn CodeMessages (Total/Suppressed)Time Compiler 88 / 0 1 secs End of compilation of $PK2A z/OS V1 R13 BINDER 13:13:14 FRIDAY SEPTEMBER 28, 2012 BATCH EMULATOR JOB(VAN7032@) STEP(NDVRBAT ) PGM= IEWL IEW2278I B352 INVOCATION PARAMETERS - XREF IEW2456E 9207 SYMBOL CEEBETBL UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL CEEROOTA UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL CEEOPIPI UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQEFSH UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQOFWR UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQOFOP UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQOFRD UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQCPBX UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQOFSH UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQOFNT UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMQOFPT UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMPOFCX UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL IBMPINPL UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY. IEW2456E 9207 SYMBOL CEESG011 UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY.CALL LIBRARY. Domenic Cifani Technology Consultant III Network Software Canada HP Enterprise Services Telephone (905) 383-7864 HP Cell (905) 869-3279 Email domenic.cif...@hp.com 242 Upper Mount Albion RD Unit 12 Stoney Creek On L8J 0B1 Well first, the first five messages have to do with PL/I coding errors. Show us the related statements and the declares of the functions or data items referenced: you don't need any new include library for that. Second the CEE unresolved references are for the LE bind-time library, usually hlq.SCEELKED (so you need to add this library into your bind (linkedit) step Finally, the IBM unresolved symbols are for PL/I modules but these should also be found in the LE bind-time library. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * Check out our sale of training materials at http://www.trainersfriend.com/SpecialSale/ (sale
ADDRESS LINKMVS - +IRX0250E System abend code 047, reason code 00000000
Hello
I'm hoping someone can help me with an issue we are experiencing following an
upgrade from z/OS 1.11 to 1.13. We are running an REXX EXEC in batch which
does not run TSO and fails on a s047 abend during an ADDRESS LINKMVS IEHPROGM.
I have noticed other people have had similar issues, but I cannot determine the
cause. I have attached the DELMEM REXXx exec and the SYSOUT with trace from my
batch job. We have our own IRXFLOC in LINKLIB that has our customer routines,
we do not use IBM's IRXFLOC.
Any assistance would be greatly appreciated.
Domenic
OB01442 +IRX0250E System abend code 047, reason code .
11.37.22 JOB01442 +IRX0255E Abend in host command IEHPROGM or address
environment routine LINKMVS.
11.37.22 JOB01442 IEA995I SYMPTOM DUMP OUTPUT 875
875 SYSTEM COMPLETION CODE=047
875 TIME=11.37.22 SEQ=01452 CPU= ASID=0094
875 PSW AT TIME OF ERROR 078D2000 8001CE4E ILC 2 INTC 6B
875ACTIVE LOAD MODULE ADDRESS=000191F8
OFFSET=3C56
875NAME=IEHPROGM
875DATA AT PSW 0001CE48 - 58101000 0A6B5023 002C0700
875AR/GR 0: /0038 1: /0030
875 2: / 3: /009D1D28
875 4: /0001FBC1 5: /0001BCEC
875 6: /0001C894 7: /6001CCB8
875 8: /8001AD22 9: /0001C890
875 A: /0001BE88 B: /0001CE88
875 C: /0001FAF0 D: /00020904
875 E: /0001142C F: 0102/
875 END OF SYMPTOM DUMP
11.37.22 JOB01442 +IRX0040I Error running DELMEM, line 126: Incorrect call to
routine
11.37.22 JOB01442 +IRX0040I Error running DOMO1, line 2: Incorrect call to
routine
11.37.22 JOB01442 IEC999I IFG0202J,PST01DTA,REXX
11.37.22 JOB01442 IEC999I IFG0TC0A,IFG0TC0B,PST01DTA,REXX,DEB ADDR=9C0238
,DSN = PST01DT.PST01DTA.JOB01442.D102.?
Domenic Cifani
Technology Consultant III
Network Software Canada
HP Enterprise Services
Telephone (905) 383-7864
HP Cell (905) 869-3279
Email domenic.cif...@hp.commailto:bernie.macis...@eds.com
242 Upper Mount Albion RD Unit 12 Stoney Creek On L8J 0B1
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
/* REXX Delete a list of members without TSO/ISPF services*/
/* Alias RENMEM is also supported to rename members but be
aware that with rename, if the new name already exists, it is
deleted without warning or prompting before the rename is done.*/
/* Alias DELDSNis also supported to delete a dataset */
/* Operands/arguments are basically positional. The most efficient
method of invocation is as a REXX subroutine/function. Herein the
2nd through nth operands are specified as one argument
e.g. call DELMEM ddname, mem1 mem2 mem3 (only 1 comma)
The first operand specifies the library/dataset but the
datasetname excludes the member specification. The value of the
first operand is either a ddname for a dataset that has been
allocated external to this routine is used
or
it is a dataset name which this routine will allocate. */
/* DELMEM is intrenched into the skeleton PDI07D for the
implementation of CICS/DB2/Cobol programs */
trace r
parse upper arg ddname, mem_name
parse upper source . invoke_method alias .
if invoke_method = 'COMMAND' then
do
parse value(space(translate(ddname mem_name,' ',','),1)) with
ddname mem_name
select
when alias = 'DELDSN' then
do
if ddname = ' ' then
call putzmsg 'Correct format is DELDSN ddname'
else call DELDSN ddname
end
when alias = 'DELMEM' then
do
if ddname = ' ' | mem_name = ' ' then
call putzmsg 'Correct format is DELMEM ddname mem'
else call DELMEM ddname, mem_name
end
when left(alias,3) = 'REN' then
do
if ddname = ' ' | words(mem_name) 2 then
call putzmsg 'Correct format is RENMEM ddname mem newmember'
else call RENMEM ddname, mem_name
end
otherwise call putzmsg alias ddname 'is not supported.'
end
exit
end
for_free = 'SYSIN'
if pos('.',ddname) 0 then
do
dsn = ddname
exist = scc@dsn(dsn,,'VOL_SER')
if vol_ser = 'MIGRAT' then
do
call putzmsg dsn 'is migrated.'
exit 8
end
if \exist then
do
call putzmsg dsn 'does not exist.'
exit 8
end
