GML::START - Identify Grids to be Managed by GML
Syntax
CALL "GML::START"
Description
This procedure identifies the grids to be managed by the Grid Management Library. This procedure is used once in the application code at startup, just prior to calling program GML_I. When procedure START is executed a GML_INIT$ template is returned to the calling programming with the variables dimensioned based on the value in variable GML_QTY%, which denotes that quantity of grid sets to be managed by the GML. The GML_INIT$ template variables are as follows ([s] denotes the grid set number):
|
GML_INIT.MAIN_ID%[s] |
main grid control ID |
|
GML_INIT.COL_HEADER_ID%[s] |
column header control ID |
|
GML_INIT.ROW_HEADER_ID%[s] |
row header control ID |
|
GML_INIT.SYSGUI%[s] |
GUI system device channel number |
|
GML_INIT.CONTEXT%[s] |
control context |
|
GML_INIT.LUM_QTY% |
quantity of look-up controls (see GML Look-Up Manager Feature for additional information) |
A Main Grid control ID must contain a value that returns the number 1 when using the MOD(n,5) function, such as in the example where MOD(5001,5)=1. A Column Header control ID for the same grid must be equal to the Main Grid Control ID+1, while the Row Header Control ID must equal to the Main Grid control ID+2. If a main grid does not have an associated column header control and/or row header control, then the variables for those control ID's in template GML_INIT$ must be set to 0.
Example
Two grids to be managed by the GML. Since grid set 1 does not contain a row header control, the row header ID value is set to 0.
4130 LET GML_QTY%=2
4140 CALL "GML::START"
4150 LET GML_INIT.MAIN_ID%[1]=5001
4160 LET GML_INIT.COL_HEADER_ID%[1]=5002
4170 LET GML_INIT.ROW_HEADER_ID%[1]=0
4180 LET GML_INIT.SYSGUI%[1]=SYSGUI%
4190 LET GML_INIT.CONTEXT%[1]=1
4200 LET GML_INIT.MAIN_ID%[2]=5021
4210 LET GML_INIT.COL_HEADER_ID%[2]=5022
4220 LET GML_INIT.ROW_HEADER_ID%[2]=5023
4230 LET GML_INIT.SYSGUI%[2]=SYSGUI%
4240 LET GML_INIT.CONTEXT%[2]=2
4250 LET GML_INIT.LUM_QTY%=1
4260 CALL "GML_I",SYSGUI,GML_INIT$,GML$,GML_GM$[ALL],GML_GC$[ALL],
GML_GR$[ALL],GML_SET$