Moving cursor during input statements in 4GL
Posted in 1993
Topics: Connectivity: ESQL/C, 4GL & Embedded SQL
Good afternoon!! During INPUT ARRAY statements, I would like to move the cursor to the beginning of both the screen array and the program array when the user moves the cursor to the first row beyond the last filled row of the program array. I have a program array that has x number of rows in the first column filled with data, and the user will fill the remaining columns. COL1 COL2 COL3 COL4 ROW# x y y y 1 x y y y 2 x y y y 3 x y y y 4 x y y y 5 z z z z 6 z z z z 7 z z z z 8 The x's are select form a table and inserted into col1 of the program array, while the user will fill in the y's during the input array statement. The z's are not supposed to be touched by the user. The input statement could look something like this: ----- INPUT ARRAY program_array FROM screen_array.* WITHOUT DEFAULTS AFTER FIELD col4 NEXT FIELD col2 BEFORE ROW IF (#_of_x's + 1) = arr_curr() THEN {move cursor to screen line 1, program_array[1]} END IF END INPUT ----- Does anybody know how to do this? Can it be done in 4GL? Any help, hints, or pointers are highly appreciated!! Sincerely SoM PS! I would like to thank Mr. Parker and Mr. Sargent for answering my last posting. Thank you very much! --------------------------------------------------------- From: Knut E. Vonheim Sign.: SoM Comp: A/S OBI Addr.: Fred Olsensgt. 1 0102 Oslo Norway tlf: + 47 22 34 18 06 e-mail knutv@boers.no Beeper: + 47 096 99357 ---------------------------------------------------------