## WRITE GUI

PURPOSE:
To send display information to the Web View of a PC3 screen driver

    STATEMENT SYNTAX:
    {stno} WRITE GUI (0{,ERR=}) ksa[ALL]

    EXAMPLE:
    0120 WRITE GUI K![ALL]

### The data for the "type" key is the GUI Command

"type" | Parameter Key | Parameter Data | Command Purpose
--- | --- | --- | ---
"Copy" | "option" | "DODEFAULT" | Copy selected text to clipboard
Example: 340 DIM K! 345 LET K!["type"]="Copy" 350 LET K!["option"]="DODEFAULT" 355 WRITE GUI K![ALL]
"Cut" | "option" | "DODEFAULT" | Cut selected text to clipboard
Example: 340 DIM K! 345 LET K!["type"]="Cut" 350 LET K!["option"]="DODEFAULT" 355 WRITE GUI K![ALL]
"Dialog" | "title" | Dialog Window Title | Bring up a Dialog Box
"x" | Screen X co-ordinate
"y" | Screen Y co-ordinate
"cx" | Width
"cy" | Height
Example: 40 DIM K! 50 LET K!["type"]="Dialog" 60 LET K!["title"]="My Dialog" 70 LET K!["x"]=-1 80 LET K!["y"]=-1 90 LET K!["cx"]=600 100 LET K!["cy"]=400 110 WRITE GUI K![ALL]
"Dialog End" | Example: 100 DIM K! 120 K!["type"]="Dialog End" 140 WRITE GUI K![ALL] | Close a Dialog Box
"FilePrint" | "option" | "DODEFAULT" or "DONTPROMPTUSER" | Prints the Document
Example: 340 DIM K! 345 LET K!["type"]="FilePrint" 350 LET K!["option"]="DONTPROMPTUSER" 355 WRITE GUI K![ALL]
"GETouterHTML" | "ElementId" | The NAME or ID of the HTML Segement | Gets an HTML Segment
Example: 8015 DIM K! 8020 LET K!["type"]="GETouterHTML" 8025 LET K!["ElementId"]=ID$ 8030 WRITE GUI K![ALL] 8035 READ GUI K![ALL]
"GetPageSetup" | Example: 100 DIM K! 120 K!["type"]="GetPageSetup" 140 WRITE GUI K![ALL] | Get current Page Setup
"Go" | Example: 100 DIM K! 120 K!["type"]="Go" 140 WRITE GUI K![ALL] | Allow a Document to be displayed
"Navigate2" | "url" | Document to Display | Display a Page
"frame name" | Target Frame (optional)
"headers" | Headers (optional normally not used)
"posted data" | Posted Data (optional normally not used)
"nav flag" | Flag Bits (optional normally not used) Where flag bits are: navOpenInNewWindow = 1 navNoHistory = 2 navNoReadFromCache = 4 Not Supported navNoWriteToCache = 8 Not Supported navAllowAutosearch = 16 navBrowserBar = 32 navHyperlink = 64
Example: 100 DIM K! 120 K!["type"]="Navigate2" 130 K!["url"]="HTML\TEMP.HTML" 140 WRITE GUI K![ALL]
"NoGo" | Example: 100 DIM K! 120 K!["type"]="NoGo" 140 WRITE GUI K![ALL] | Stop a Document from being displayed
"PageSetup" | "option" | "DODEFAULT" | Brings up the Page Setup Dialog Box
Example: 340 DIM K! 345 LET K!["type"]="PageSetup" 350 LET K!["option"]="DODEFAULT" 355 WRITE GUI K![ALL]
"Paste" | "option" | "DODEFAULT" | Paste clipboard into Text Box/Area
Example: 340 DIM K! 345 LET K!["type"]="Paste" 350 LET K!["option"]="DODEFAULT" 355 WRITE GUI K![ALL]
"PrintPreview" | "option" | "DODEFAULT" | Does a Print Preview
Example: 340 DIM K! 345 LET K!["type"]="PrintPreview" 350 LET K!["option"]="DODEFAULT" 355 WRITE GUI K![ALL]
"SelectAll" | "option" | "DODEFAULT" | Select the complete document
Example: 340 DIM K! 345 LET K!["type"]="SelectAll" 350 LET K!["option"]="DODEFAULT" 355 WRITE GUI K![ALL]
"SendDocumentDone" | "State" | "On" or "Off" | Start or Stop sending DocumentComplete
Example: 140 DIM K! 145 LET K!["type"]="SendDocumentDone" 150 LET K!["State"]="On" 155 WRITE GUI K![ALL]
"SendSizeChange" | "State" | "On" or "Off" | Start or Stop sending SizeChange
Example: 140 DIM K! 145 LET K!["type"]="SendSizeChange" 150 LET K!["State"]="On" 155 WRITE GUI K![ALL]
"SETouterHTML" | "ElementId" | The NAME or ID of the HTML Segement | Replace a HTML segment
"Text" | The new HTML Segement
Example: 8115 DIM K! 8120 LET K!["type"]="SETouterHTML" 8125 LET K!["ElementId"]=ID$ 8130 LET K!["Text"]=A$ 8135 WRITE GUI K![ALL]
"SetPageSetup" | "header" | Page Header | Set Pagesetup Defaults
"footer" | Page Footer
"margin_bottom" | Bottom Margin
"margin_top" | Top Margin
"margin_left" | Left Margin
"margin_right" | Right Margin
"orientation" | "landscape" or "portrait"
Example: 120 DIM K! 125 LET K!["type"]="SetPageSetup" 130 LET K!["header"]="&w&bPage &p of &P" 135 LET K!["footer"]="&u&b&d" 140 LET K!["margin_bottom"]="0.75000" 145 LET K!["margin_top"]="0.75000" 150 LET K!["margin_left"]="0.75000" 155 LET K!["margin_right"]="0.75000" 160 LET K!["orientation"]="landscape" 165 WRITE GUI K![ALL]

SEE: 'READ GUI'