Skip to content

Commit

Permalink
12.2.13 Release
Browse files Browse the repository at this point in the history
  • Loading branch information
swaohan committed Nov 28, 2023
1 parent 7a716a2 commit 65b5f6e
Showing 1 changed file with 2 additions and 11 deletions.
13 changes: 2 additions & 11 deletions adedict/_dictg.p
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
/************************************************************************
* Copyright (C) 2006-2017,2021 by Progress Software Corporation. *
* Copyright (C) 2006-2017,2021,2023 by Progress Software Corporation. *
* All rights reserved. Prior versions of this work may contain portions *
* contributed by participants of Possenet. *
* *
Expand All @@ -22,6 +22,7 @@ Modified Date: 11/27/96 kkelley Removed labels under icons in dictionary fo
10/10/04 K. McIntosh Added code to reset SESSION:SUPPRESS-WARNINGS when
user cancels. Bug # 20041108-002
06/08/21 tmasood Restrict use of dictionary for 32-bit
06/08/23 tmasood Enable use of dictionary for 32-bit
----------------------------------------------------------------------------*/

&SCOPED-DEFINE DICTG dictg
Expand Down Expand Up @@ -356,16 +357,6 @@ do ON STOP UNDO, LEAVE:
/* Set global active ade tool procedure handle to Dictionary. */
assign h_ade_tool = this-procedure.

/*--------------------- Check the OE bitness ----------------------------*/

&IF "{&WINDOW-SYSTEM}" <> "TTY" &THEN
IF ade_licensed[{&DICT_IDX}] = {&INSTALLED} AND PROCESS-ARCHITECTURE = 32 THEN DO:
MESSAGE "Data Dictionary is not supported in the 32-bit Windows GUI client"
VIEW-AS ALERT-BOX ERROR.
RETURN.
END.
&ENDIF

pause 0 before-hide.
assign
supw_sav = session:suppress-warnings /* save current value */
Expand Down

0 comments on commit 65b5f6e

Please sign in to comment.