HP OpenVMS Systems

ask the wizard
Content starts here

COBOL and $QIO IO$_ACPCONTROL?

» close window

The Question is:

 
I am using IO$_ACPCONTROL function to get an IP address from a host name, and i
 must implement it in DEC/COBOL. I use the next sentence:
    CALL "sys$qiow" USING
    	BY VALUE 128
    	BY VALUE channel
    	BY VALUE IO$_ACPCONTROL
    	BY REFERENCE iosb
    	OMITTED
    	OMITTED
    	BY DESCRIPTOR INETACP_COMMAND
    	BY DESCRIPTOR "hostname"
    	BY REFERENCE buflen
    	BY DESCRIPTOR longword
    	OMITTED
    	OMITTED
    	GIVING status
 
where INETACP_COMMAND is a PIC 9(4) COMP composed by
 INETACP_FUNC$C_GETHOSTBYNAME subfunction (value: 1) and INETACP$C_TRANS call
 code (value: 512). When I execute this sentence a get a SYSTEM-F-ACCVIO
 failure. Can you tell me about what is wrong in the s
entence?
 
Thank you very much.

The Answer is :

 
  The problem here may be the use of a literal string within the
  BY DESCRIPTOR.  For details and a discussion, please use the
  Google newsgroup search for a discussion containing the search
  targets IO$_ACPCONTROL and chocolate.com.
 
  In COBOL, try recoding this as:
 
    01 QIOW_HOSTNAME PIC X(8) VALUE IS "hostname".
 
        	BY DESCRIPTOR QIOW_HOSTNAME
 


  

     
     
answer written or last revised on ( 6-FEB-2003 )

     
» close window