It rings me a bell when you use a browse in the UIB you could have
{&OPEN-QUERY-BROWSE-2}
Which is related to the browse browse-2 define several lines above in your code
/* Definitions for BROWSE BROWSE-2 */
&Scoped-define FIELDS-IN-QUERY-BROWSE-2 tt-cpt.TYP ..
&Scoped-define ENABLED-FIELDS-IN-QUERY-BROWSE-2
&Scoped-define SELF-NAME BROWSE-2
&Scoped-define QUERY-STRING-BROWSE-2 FOR EACH tt-cpt WHERE ...
&Scoped-define OPEN-QUERY-BROWSE-2 OPEN QUERY {&SELF-NAME} FOR EACH tt-cpt WHERE ...
&Scoped-define TABLES-IN-QUERY-BROWSE-2 tt-cpt
&Scoped-define FIRST-TABLE-IN-QUERY-BROWSE-2 tt-cpt