Summary of display array problem/idea

Subject: Summary of display array problem/idea Thanks to Dave Deisz, Hyatt Tech Center uunet!support!dgd Eric M Gordon, SST Computer Systems Lee Brintle, Advantage Information Managament. Solution: Create a two arrays and store the data that could be 'arrowed' through in one array and the rest of the data i a second array. While yes it was more labor intensive, it created a *slick* routine. Basically what occurs is the oem code,partno, desc * serial key are in second array. I then display those out to the screen. I could just as easily placed the above columns as fields in this .per also, but didn't just because I wanted to be different :-) Thanks guys, rick tucker rickt@wybbs.mi.org Below is a sample .per of the problem/solution. {##################################################################### # Copyright (C) 1991 # Written by: Independent Consulting Services # Rick Tucker # (616) 457-HELP (457-4357, 457-8873, 242-3821) ###################################################################### } database rapid SCREEN { OEM Code : OEM Part No.: Serial Key: Description : ------------------------------------------------------------------------- Vendor Net List Suggested Min Lead Q/ Flags Effect Price Price Resell Order Time C NRSD Date [A|a0 ] [a1 |a2 |a3 |a4 ][a5 ][B][a7 ][a8 ] [A|a0 ] [a1 |a2 |a3 |a4 ][a5 ][B][a7 ][a8 ] [A|a0 ] [a1 |a2 |a3 |a4 ][a5 ][B][a7 ][a8 ] [A|a0 ] [a1 |a2 |a3 |a4 ][a5 ][B][a7 ][a8 ] [A|a0 ] [a1 |a2 |a3 |a4 ][a5 ][B][a7 ][a8 ] [A|a0 ] [a1 |a2 |a3 |a4 ][a5 ][B][a7 ][a8 ] [A|a0 ] [a1 |a2 |a3 |a4 ][a5 ][B][a7 ][a8 ] [A|a0 ] [a1 |a2 |a3 |a4 ][a5 ][B][a7 ][a8 ] [A|a0 ] [a1 |a2 |a3 |a4 ][a5 ][B][a7 ][a8 ] [A|a0 ] [a1 |a2 |a3 |a4 ][a5 ][B][a7 ][a8 ] Press 'ESC' to return current record, or 'DEL' to exit F6 = Zoom in, F7 = Quality Notes, F8 = General Notes } TABLES xref1 ATTRIBUTES A = formonly.inputde; a0 = xref1.vendor_code; a1 = xref1.net_price; a2 = xref1.list_price; a3 = formonly.sugglist; a4 = xref1.min_order_qty; a5 = xref1.lead_time_days; B = xref1.quality_ctrl; a7 = formonly.flagss; a8 = formonly.effect_date; INSTRUCTIONS DELIMITERS " " SCREEN RECORD s_array[10] (formonly.inputde, xref1.vendor_code, xref1.net_price, xref1.list_price, formonly.sugglist, xref1.min_order_qty, xref1.lead_time_days, xref1.quality_ctrl, formonly.flagss, formonly.effect_date);