Re: bad sample code?
- From: mward@xxxxxxxxx (Ward, Mike S)
- Date: 27 Jun 2008 15:14:08 -0700
Thanks
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@xxxxxxxxxxx] On
Behalf Of Chuck Arney
Sent: Friday, June 27, 2008 5:13 PM
To: IBM-MAIN@xxxxxxxxxxx
Subject: Re: bad sample code?
Why? If RETCODE is negative there was an error on the call and there is
no socket returned.
Chuck Arney
illustro Systems International, LLC
http://www.illustro.com
Access 3270 data from anywhere with z/XML-Host
Access 3270 apps from the web with z/Web-Host
Access CMS minidisks from z/OS or z/VSE with CMSACCess
Voice: 214-800-8900 X#0562
Fax: 214-451-6394
* * * * * * * * * * * * * * * *
This e-mail is private and may be confidential and is for the intended
recipient only. If misdirected, please notify us by telephone and
confirm that it has been deleted from your system and any copies
destroyed. If you are not the intended recipient you are strictly
prohibited from using, printing, copying, distributing or disseminating
this e-mail or any information contained in it.
* * * * * * * * * * * * * * * * * * * * * * * * * *
We use reasonable measures to virus scan all E-mails leaving illustro
but no warranty is given that this E-mail and any attachments are virus
free. You should ensure you have adequate measures in place for your own
virus checking.
-----Original Message-----return
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@xxxxxxxxxxx] On
Behalf Of Ward, Mike S
Sent: Friday, June 27, 2008 4:43 PM
To: IBM-MAIN@xxxxxxxxxxx
Subject: bad sample code?
I was looking at the sample code(ezacicas) in sezainst listed
below for cics sockets programming. The takesocket is supposed to
the socket number in retcode+2 a halfword. If that's the case andsocket
number 1 was returned in retcode+2 wouldn't the error check after theX
call be incorrect?
CALL EZASOKET,(SOCTSOCK,SOCKET_TO_TAKE,CLIENTID_LSTN,
ERRNO,RETCODE),VL,MF=(E,PARMLIST)
*
L R5,ERRNO Check for successful call
L R6,RETCODE Check for successful call
MVC MSGCMD,SOCTSOCK Set the API name
C R6,ZERO Is it less than zero
BL SOCERR Yes, go display error and terminate
STH R6,SRV_SOCKID Save the taken socket descriptor
Errno ds f
Retcode ds f
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to listserv@xxxxxxxxxxx with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
==========================
This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity
to which they are addressed. If you have received this email in error please notify the system manager. This message
contains confidential information and is intended only for the individual named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please notify the sender immediately by e-mail if you
have received this e-mail by mistake and delete this e-mail from your system. If you are not the intended recipient
you are notified that disclosing, copying, distributing or taking any action in reliance on the contents of this
information is strictly prohibited.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to listserv@xxxxxxxxxxx with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
.
- References:
- bad sample code?
- From: Ward, Mike S
- Re: bad sample code?
- From: Chuck Arney
- bad sample code?
- Prev by Date: Re: bad sample code?
- Next by Date: Re: Strange Problem: System Code S106
- Previous by thread: Re: bad sample code?
- Next by thread: Re: bad sample code?
- Index(es):
Relevant Pages
|