[progress Communities] [progress Openedge Abl] Forum Post: Re: How To Check If A Given...

[George Potemkin]

Two solutions: REPEAT i = 1 TO NUM-DBS: CREATE ALIAS DICTDB FOR DATABASE VALUE(LDBNAME(i)). RUN your_program. END. or hQuery:QUERY-PREPARE(SUBSTITUTE("FOR EACH &1 NO-LOCK":U), ctablename)) NO-ERROR. IF ERROR-STATUS:NUM-MESSAGES GT 0 THEN MESSAGE ctablename "is not here" VIEW-AS ALERT-BOX BUTTONS OK.

Continue reading...