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

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Application example:<br />

[COBOL program]<br />

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

:<br />

00036 * Setting the character string to be output<br />

00037 MOVE “ Thank you <strong>for</strong> your cooperation.”<br />

00038 TO COBW3-PUT-STRING.<br />

00039 * Outputting the character string data<br />

00040 CALL “COBW3_PUT_TEXT” USING COBW3.<br />

:<br />

[Output result on the WWW browser]<br />

:<br />

Thank you <strong>for</strong> your cooperation.<br />

:<br />

Execute System Commands<br />

COBW3_SYSTEM<br />

This subroutine executes a system command from the Web application.<br />

Format:<br />

CALL "COBW3_SYSTEM" USING COBW3.<br />

COBW3 Data <strong>for</strong> Calls:<br />

• COBW3-SYSTEMINFO<br />

Set a system command to be executed and its parameters.<br />

Processing Result Data:<br />

None<br />

Note: Due to the extreme risk to the integrity of the operating system, we<br />

recommend that you never create a web application that permits execution of a<br />

command string input to the browser.<br />

Free <strong>SAF</strong> Execution Environment Resources<br />

COBW3_ FREE<br />

This subroutine frees resources obtained by a <strong>SAF</strong> subroutine. To prevent<br />

exhaustion of system resources, call this subroutine at the end of every connection<br />

of the Web application.<br />

Format:<br />

CALL "COBW3_FREE" USING COBW3.<br />

COBW3 Data <strong>for</strong> Calls:<br />

None

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

Saved successfully!

Ooh no, something went wrong!