Re: 4gl: display array - question
Posted in 1991
Topics: Stored Procedures & SPL, Connectivity: ESQL/C, 4GL & Embedded SQL
On Apr 24, 6:42am, "Dieter Becker" wrote: ] Subject: 4gl: display array - question ] ] I have two problems in 4gl programming: ] ] machine: SIEMENS MX500 (multi(6)-processor NS 32532 ) ] INFORMIX 4GL, INFORMIX ONLINE I am using 4GL 4.00.UD2 on a SUN 3/280 with the Standard Engine ] ] 1. Using 'display array' I want to show the current line with an attribute. ] pe. highlighted, inverse, ... But I don't see any easyly programmable ] possibility. INFORMIX in the tbmonitor ( informing about databases or ] tbspaces) shows this facility. How about something like this DISPLAY ARRAY pa_foo TO sa_foo BEFORE ROW # # The following could be made into a function: reverse_pa_foo() # DISPLAY pa_foo[p_index].* TO sa_foo[p_screen_index].* ATTRIBUTE(REVERSE) ] 2. I am programming a patient's information system and I have some tables ] which are to big to use the standard display array option: ] define xx array [n] of record like yy.* ] declare cursor ..., foreach .. into xx[i].*, ... ] display array xx .... ] How to write a "window to the table" ? I would check my normalization... you probably can benefit from breaking out the data but I would handle it differently... define xx1 array [n] of record like yy.key thru yy.N_field define xx2 array [n] of record key like yy.key, N+1_field Like yy.N+1_field, ... {right through the last yy field} then declare cursor..., foreach cursor1 Into xx1.*, xx2.N+1_field thru N+n_field ] Thanks for your help and excuse my bad english It is just fine... what type of patient database are you working on? ] ] Dieter Becker ] ]-- End of excerpt from "Dieter Becker" -- Brian Colfer | UC San Francisco |------------------------| | Dept. of Lab. Medicine | System Administrator, | brianc@labmed.ucsf.edu | S.F. CA, 94143-0134 USA | Programer/Analyst | BRIANC@UCSFCCA.BITNET | PH. (415) 476-2325 |------------------------|