3P icon indicating copy to clipboard operation
3P copied to clipboard

Unable to locate the browses queries in .w with the 3P code explorer

Open hgrandperrin opened this issue 7 years ago • 5 comments

It is a bit boring to have to search by hand for the definitions of the browse queries The graphic world is clearly not the strength of 3P. Thanks in advance. Sorry for my poor English...

In short: in the list of items of code explorer, there are all events, proc, functions ... but we do not see the list of triggers as OPEN-QUERY of the browsers. This development would be desirable.

hgrandperrin avatar Mar 28 '17 14:03 hgrandperrin

Sorry I don't speak french!

jcaillon avatar Mar 28 '17 14:03 jcaillon

Jokes aside, please provide more information on your request

jcaillon avatar Mar 28 '17 14:03 jcaillon

Moi non plus !

hgrandperrin avatar Mar 28 '17 14:03 hgrandperrin

An exemple : &Scoped-define OPEN-QUERY-bw_menus_autorises OPEN QUERY {&SELF-NAME} FOR EACH t_BOi_MENU WHERE t_BOi_MENU.vishab = TRUE NO-LOCK, ~ EACH t_BOI_HABMEN OF t_BOi_MENU WHERE t_BOI_HABMEN.PROFIL = l_profil NO-LOCK INDEXED-REPOSITION.

hgrandperrin avatar Mar 28 '17 15:03 hgrandperrin

The user should modify this :

&ANALYZE-SUSPEND _QUERY-BLOCK BROWSE BW_aagrac
/* Query rebuild information for BROWSE BW_aagrac
     _START_FREEFORM
OPEN QUERY {&SELF-NAME} FOR EACH AAGRAC
    WHERE AAGRAC.ANNIDEAFC = AGREMT.ANNIDEAFC
    AND AAGRAC.NUMINTDOSAFC = AGREMT.NUMINTDOSAFC
    AND AAGRAC.NUMINTAGR = AGREMT.NUMINTAGR
    NO-LOCK,
    FIRST ZTYACC WHERE AAGRAC.TYPEACCUEIL = ZTYACC.TYPEACCUEIL NO-LOCK.
     _END_FREEFORM
     _Options          = "NO-LOCK"
     _TblOptList       = ", FIRST, FIRST, FIRST, FIRST"
     _Query            is NOT OPENED
*/  /* BROWSE BW_aagrac */
&ANALYZE-RESUME

Stuff between _START_FREEFORM and _END_FREEFORM shoud then be copied to : &Scoped-define OPEN-QUERY-BW_aagrac

See below...

/* Definitions for BROWSE BW_aagrac                                     */
&Scoped-define FIELDS-IN-QUERY-BW_aagrac ZTYACC.LIBTYPEACCUEIL AAGRAC.NBPLACCAFACC   
&Scoped-define ENABLED-FIELDS-IN-QUERY-BW_aagrac   
&Scoped-define SELF-NAME BW_aagrac
&Scoped-define QUERY-STRING-BW_aagrac FOR EACH AAGRAC     WHERE AAGRAC.ANNIDEAFC = AGREMT.ANNIDEAFC     AND AAGRAC.NUMINTDOSAFC = AGREMT.NUMINTDOSAFC     AND AAGRAC.NUMINTAGR = AGREMT.NUMINTAGR     NO-LOCK, ~
           FIRST ZTYACC WHERE AAGRAC.TYPEACCUEIL = ZTYACC.TYPEACCUEIL NO-LOCK
&Scoped-define OPEN-QUERY-BW_aagrac OPEN QUERY {&SELF-NAME} FOR EACH AAGRAC     WHERE AAGRAC.ANNIDEAFC = AGREMT.ANNIDEAFC     AND AAGRAC.NUMINTDOSAFC = AGREMT.NUMINTDOSAFC     AND AAGRAC.NUMINTAGR = AGREMT.NUMINTAGR     NO-LOCK, ~
           FIRST ZTYACC WHERE AAGRAC.TYPEACCUEIL = ZTYACC.TYPEACCUEIL NO-LOCK.
&Scoped-define TABLES-IN-QUERY-BW_aagrac AAGRAC ZTYACC
&Scoped-define FIRST-TABLE-IN-QUERY-BW_aagrac AAGRAC
&Scoped-define SECOND-TABLE-IN-QUERY-BW_aagrac ZTYACC

jcaillon avatar Feb 12 '18 14:02 jcaillon