diff --git a/prodict/mss/_gendsql.p b/prodict/mss/_gendsql.p index d7a7d759..20f29999 100644 --- a/prodict/mss/_gendsql.p +++ b/prodict/mss/_gendsql.p @@ -1,5 +1,5 @@ /********************************************************************* -* Copyright (C) 2005-2006,2008-2010,2011 by Progress Software * +* Copyright (C) 2005-2006,2008-2010,2011-2024 by Progress Software * * Corporation. All rights reserved. Prior versions of this work may * * contain portions contributed by participants of Possenet. * * * @@ -57,7 +57,8 @@ Supported batch mode delta SQL Utility. 09/18/13 sgarg Fix for empty string ("") INITIAL value, does not generate SQL (OE00241307) 12/11/13 sdash OE Initial Value not propagated w/"Include Defaults" on delta.sql (PSC00247036) - 08/20/18 vprasad ODIA-1951 - ODBC Driver 17 for SQL Server certification + 08/20/18 vprasad ODIA-1951 - ODBC Driver 17 for SQL Server certification + 02/29/24 kberlia Fixed issue for not considering width option in DSRVR-PRECISION value While generating DF using delta SQL utility (OCTA-56151). If the user wants to have a DEFAULT value of blank for VARCHAR fields, an environmental variable BLANKDEFAULT can be set to "YES" and the code will @@ -4027,6 +4028,7 @@ DO ON STOP UNDO, LEAVE: ASSIGN df-info.df-seq = dfseq dfseq = dfseq + 1 df-info.df-tbl = tablename + df-info.df-fld = fieldname df-line = " DSRVR-PRECISION " + STRING(all_digits). CREATE df-info. ASSIGN df-info.df-seq = dfseq