SUBROUTINE IFRAME
* Include the RealWeb definitions

     INCLUDE #RW.INCLUDE.DEFS FROM /SYSFILES/REALWEB,BP


     HTML = ""

     CRLF = CHAR(13) : CHAR(10)

* Start the HTML page.
CALL RW_START_HTML_PAGE("In-line frame example", "", "", "", RWD_BODY)

* Insert a heading.

     TEXT = "RealWeb"
CALL RWS_HEADING(TEXT, 1, "")

     HTML = HTML : TEXT : CRLF

* Insert a paragraph containing the required text.

     TEXT = "Welcome to the wonderful world of RealWeb!"
CALL RWS_PARA(TEXT, "", "")

     HTML = HTML : TEXT
CALL RW_PUT(HTML)

* Insert an in-line frame to contain more text.
CALL RW_IFRAME("HELLOWORLD", "inline", "")

* Insert another paragraph.

     HTML = ""

     TEXT = "And to the wonderful world of in-line frames!"
CALL RWS_PARA(TEXT, "", "")

     HTML = HTML : TEXT
CALL RW_PUT(HTML)

* Complete the page.
CALL RW_END_PAGE

RETURN

Subroutine result in browser 

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<HTML>
<HEAD>
<META NAME="Generator" CONTENT="Reality">
<TITLE>In-line frame example</TITLE>

</HEAD>
<BODY>
<H1>

RealWeb
</H1>

<P>

Welcome to the wonderful world of RealWeb!
</P>

<IFRAME SRC="/servlet/reality/test/HELLOWORLD" NAME="inline">

Your browser does not support inline frames<br>
</IFRAME>
<P>

And to the wonderful world of in-line frames!
</P>

</BODY>
</HTML>