CDW999 - Dynaweb Exit Routine

CDW999

Dynaweb Exit Routine/Launch Browser

All Dynaweb applications should exit by running or calling this program. You should also run or call CDW999 from an application run from a workstation running FacetWin or PowerTerm when you want to display a web page, a text file, or a PDF file.

Applications should either:

set the HTML$, and optionally the Y5$ string variable, or
print a report to a text file (by calling CDS084 with printer name PFIL), or
print a report to a PDF file (by calling CDS084 with printer name APDF).

and then in each case, RUN or CALL "CDW999",HTML$,Y6$,TITLE$ when completed. In most cases you RUN "CDW999" which will display the document in a browser, then run the menu or release the session. If you need to display multiple documents, then you can CALL "CDW999" which will return control back to the calling program, which can then create the next report and either CALL or RUN "CDW999" again.

If CDS084 was used to create a text or PDF file, then CDW999 will launch the browser displaying the file, otherwise CDW999:

Replaces any field names referenced from Y$ such as Y.COMPNAME$ and Y.DATE$ stored in square brackets in HTML$, i.e. [COMPNAME] and [DATE] with the value from the task control variable Y$.
Processes any expression contained within braces {} using the bbweb uthtmout.wbb program.
If HTML$ includes a form with an input, and focus has not been set, either specifically, or using $bodyopt, then CDW999 will name the form, if necessary, and assign focus to the first input on the page.
If run from a browser:
CDW999 sets the $title global variable to Y5$ if non-blank,
calls utsend.wbb sending HTML$ to the browser,
then calls utexit.wbb using CGI$,
then runs CDS001 which will terminate the session.
If called or run from a nonbrowser,
Adds <html> and <body> tags to HTML$ if not already present,
Adds a style sheet link if specified in Dynaweb Control Maintenance,
saves HTML$ in a temporary string file based in the tmp folder below 'Document Root',
then launches a web browser pointing to the file, (Requires FacetWin or PowerTerm)
then if run and not called, runs the Dynamo menu program CDS001 or the external menu program.
This option requires that the Dynaweb Control Maintenance include the Http Name or IP address and Web Server Document Root Folder.

Example: Called from a FacetWin session

HTML$="Hello World"
		CALL "CDW999",HTML$

Browser will display:

Example run from a FacetWin session

1300 WEB:
		1310 BEGIN
		1320 CALL "CDW038",Y$,"Terms Code Listing","",HTML$,W038$,"XXCW13
		1330 RUN "CDW999"

Browser opens and displays

Example of displaying a PDF file from a workstation application

1400 PDFEXAMPLE:
		1410 BEGIN
		1420 CALL "CDS041","CDS084",S084$
		1430 LET S084.MODE$="E",S084.NAME$="APDF"
		1440 CALL "CDS084",Y$,Y5$,U0,S084$,Y6,Y6$
		1450 PRINT (Y6.CH)"PDF Test"
		1460 FOR COL=0 TO 100 STEP 10
		1470 PRINT (Y6.CH)@(COL),"Column "+STR(COL)
		1480 NEXT COL
		1490 PRINT (Y6.CH)'BU',"Underlined Text",'EU'
		1500 RUN "CDW999"

Browser opens and displays