22.09.2013 Views

NetCOBOL for SPARC Architecture SAF Subroutines User's Guide

NetCOBOL for SPARC Architecture SAF Subroutines User's Guide

NetCOBOL for SPARC Architecture SAF Subroutines User's Guide

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

•<br />

•<br />

•<br />

•<br />

Chapter 3. How to Use <strong>SAF</strong> <strong>Subroutines</strong> 57<br />

COBW3-UPLD-CL-FILE-NAME<br />

Sets the file name of the upload file in the client which corresponds to the<br />

retrieved name (NAME).<br />

COBW3-UPLD-CL-FILE-NAME-LENGTH<br />

Sets the character string length (byte length) of the file name of the upload file<br />

in the client which corresponds to the retrieved name (NAME).<br />

COBW3-UPLD-CONTENT-TYPE<br />

Sets the character string that indicates the Content-type of the upload file that<br />

corresponds to the retrieved name (NAME).<br />

COBW3-UPLD-CONTENT-TYPE-LENGTH<br />

Sets the character string length (byte length) of the character string that<br />

indicates the content type of the upload file that corresponds to the retrieved<br />

name (NAME).<br />

• COBW3-UPLD-FILE-SIZE<br />

Sets the uploaded file size (byte length) .<br />

Note: When “\” is included in the uploaded file name when the client is UNIX, the<br />

file name and the path name cannot be correctly received.<br />

Example:<br />

[c.htm (Web page <strong>for</strong> invoking application)]<br />

:<br />

<br />

<br />

Your Name:<br />

Send file 1:<br />

<br />

<br />

<br />

:<br />

[COBOL source program]<br />

:<br />

* Name setup<br />

MOVE "FILE1" TO COBW3-SEARCH-DATA.<br />

* Acquisition of upload file in<strong>for</strong>mation<br />

CALL "COBW3_GET_UPLOADFILE_INFO_X" USING COBW3.<br />

:<br />

IF COBW3-SEARCH-FLAG-EXIST THEN<br />

* Setup of name of file to be generated<br />

MOVE "d.tmp" TO COBW3-UPLOADED-FILENAME<br />

* File generation<br />

CALL "COBW3_GEN_UPLOADFILE_X" USING COBW3<br />

:<br />

* File data processing<br />

:<br />

* Deletion of generated file<br />

CALL "COBW3_DEL_UPLOADEDFILE" USING COBW3<br />

END-IF.<br />

:

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!