void accept( params )   | 
<form action="servlet/isCobol(PROG1)" enctype="multipart/form-data" method="post"> Type some text:<br> <input type="text" name="textline" size="30"><br> Choose a file to upload:<br> <input type="file" name="datafile" size="40"><br> Send to server<br> <input type="submit" value="Send"> </form>  | 
       CONFIGURATION SECTION.        REPOSITORY.            CLASS WEB-AREA AS "com.iscobol.rts.HTTPHandler"            .        ...        WORKING-STORAGE SECTION.        01 http-data identified by "http_data".           03  identified by "textline".               05 w-textline pic x any length.           03  identified by "datafile".               05 w-datafile pic x any length.        ...        LINKAGE SECTION.        01 LNK-AREA OBJECT REFERENCE WEB-AREA.        PROCEDURE DIVISION USING LNK-AREA.        MAIN.            LNK-AREA:>accept(http-data).  |