Consider the following input screen generated by an RDML REQUEST command. It requests that the user input a company number, a department number and an invoice number. Note also that the prompt key is enabled (and is handled automatically):
INVOICE01 Invoice Inquiry Company number . . . ___ Dept number . . . . . __ Invoice number . . . ________ F4=Prompt |
|---|
|
If the user tabs into the field department number, and uses F4, the following processing occurs:
The prompting process/function is invoked. It is a simple program and just displays a list of all departments in a pop up window and allows the user to indicate the desired one by selecting it with the cursor. The screen panel that the user is seeing at this point might look like this:
INVOICE01 Invoice Inquiry Company number . . . ___ .............................. Dept number . . . . . __ : DEP01 Departments : Invoice number . . . ______ : : : Dept Department : : Num : Description : : 001 ADMINISTRATION : : 002 FINANCE : : 004 SALES & MARKETING : : 006 PLANT MAINTENANCE + : : : F4=Prompt : |
|---|
|
Finally the exchange list is cleared and the screen is redisplayed. Since the value of field department number has been changed by the value returned in the exchange list, the resulting display would now look like this:
INVOICE01 Invoice Inquiry Company number . . . ____ Dept number . . . . . 004 Invoice number . . . _______ F4=Prompt |
|---|
|
The "prompt key cycle" has now completed.
Some further things worth noting about key processing techniques and this example are as follows:
Consider an inquiry screen that is showing invoice details to the user. All fields on the screen are protected (i.e., not input capable), but the prompt key is still enabled:
INVOICE02 Invoice Inquiry Company number . . . 003 ACME ENGINEERIN Dept number . . . . 004 SALES & MARKETIN Invoice number . . . 1627487 Date of issue . . . 10/10/89 Customer . . . . . . 152643 Talls Hardware Shop 121 Any Street Anytown 41828 Product Description SKU Quantity Price 0001920 1/4" BOLTS BOX 300 700.45 0188734 4" CLOUT HEAD NAILS BOX 200 200.34 1102939 ROOFING STRUTS PALLET 2 1107.00 0126378 6" GALVANISED GUTTERIN 20LENG 10 265.45 F4=Prompt |
|---|
|
By using the prompt key from this screen, the user might be able to perform the following additional "inquires" (with no extra RDML coding required in the invoice inquiry program) on: