If the 3700 scripting language is the same or similar to 9700 here's a way to popup a window with information using the Window command. This command will draw a window on the operator display and is required in
order to display information referenced by the various Display commands.
Syntax
Window row, column[, expression[{output_specifier}]...]
row: the number of rows the window should contain; valid entries are 1 to 14
column" the number of columns the window should contain; valid entries are 1 to 78 expression an expression that represents the title of the window, which will appear centered in the top line of the window itself (above the first row); it may be on of the following: user_variable and or string
{output_specifier}: one or more of the output_specifiers that determine the format of the output fields
Window 8, 60 // 8 rows, 60 columns (characters) wide
display 1, @CENTER, "This text is centerd in the"{=(@WCOLS)}
display 2, @CENTER, "middle of the window"{=(@WCOLS)}
display 4, 2, "Information to be displayed: ", yourStringText
display 5, 2, "More information : ", stringText2
display 6, 2, "Additional INformation again", trim(description)
display 7
waitforclear // Tells the window to wait for the user to press the Clear button
However you want a Window to ask for input, this input being Yes or No.
Lets say you ask "Are you sure you want to make the payment?"
sub paymentNotification
var key_pressed : key
var data : A10
var sPaymentAmt : A8 // Alphanumeric amount, allows to show $ and . in the amount
Window 10, 68
display 1, @CENTER, "CONFIRM PAYMENT - NOTIFICATION"{=(@WCOLS)}
display 3, 2, "You can display payment information here"
display 4, 2, "Payment Amount: ", sPaymentAmt
display 6, @CENTER, "Please confirm you would like to make a payment."
display 9, @CENTER, "Select [YES] to Continue or Select [NO] to Cancel"
inputkey key_pressed, data, "[YES] to PAY or [NO] to CANCEL PAYMENT"
// Check What KEY was Pressed
if key_pressed = @KEY_CLEAR
ExitOnCancel // Exits Script when the Clear Key is pressed
else
// Call Close Check and post payment, or other things to do
endif
endsub
Let me know if this helps at all.
