Version 12.0.11-pre

Src/Build/wsctl.nsi

@@ -4,9 +4,17 @@
 ;
 !define PRODUCT_PUBLISHER "A.Fokin, A.Sobolev"
 !define PRODUCT_WEB_SITE "http://www.petroglif.ru"
-!define SRC_REDIST   "${SRC_ROOT}\src\redist"
-!define SRC_TARGET   "${SRC_ROOT}\PPY\BIN"
-!define PRODUCT_NAME "WSCTL"
+!define SRC_REDIST               "${SRC_ROOT}\src\redist"
+!define SRC_TARGET               "${SRC_ROOT}\PPY\BIN"
+!define SRC_3P_REDIST            "${SRC_ROOT}\redist"
+!define SRC_TOOLS                "${SRC_ROOT}\tools"
+!define DIR_BIN                  "$INSTDIR\BIN"
+!define DIR_DRV                  "${DIR_BIN}\DRV"
+!define FILE_PPINI               "${DIR_BIN}\PP.INI"
+!define DIR_PACK                 "$INSTDIR\PACK"
+!define DIR_LOG                  "$INSTDIR\LOG"
+!define DIR_TEMP                 "$INSTDIR\DATA\TEMP"
+!define PRODUCT_NAME            "WSCTL"
 
 !define PRODUCT_UNINST_ROOT_KEY "HKLM"
 !define PRODUCT_UNINST_KEY "Software\Microsoft\Windows\CurrentVersion\Uninstall\${PRODUCT_NAME}"

Src/Include/Db.h

@@ -2391,11 +2391,11 @@ class BCopySet : public TSCollection <BCopyData> {
 #define BACKUPLOG_SUC_REMOVE        10 // Удаление резервной копии
 #define BACKUPLOG_ERROR             11 // Общая ошибка
 #define BACKUPLOG_ERR_DECOMPRESSCRC 12 // Ошибка распаковки файла (неверный CRC)
-#define BACKUPLOG_ERR_REMOVE        13 // @v10.8.6 Ошибка удаления резервной копии
+#define BACKUPLOG_ERR_REMOVE        13 // Ошибка удаления резервной копии
 //
 // callback function ptr
 //
-typedef int (*BackupLogFunc)(int, const char *, void * extraPtr); // @v10.8.2 long initParam-->void * extraPtr
+typedef int (*BackupLogFunc)(int, const char *, void * extraPtr);
 //
 //
 //
@@ -4945,7 +4945,7 @@ class SRecPageManager {
 	//   <0 - запись не может быть изменена в пределах одной страницы
 	//    0 - ошибка
 	//
-	int    UpdateOnPage(SDataPage_ * pPage, uint64 rowId, uint pageType, const void * pData, size_t dataLen);  
+	int    UpdateOnPage(SDataPage_ * pPage, uint64 rowId, const void * pData, size_t dataLen);  
 	int    Update(uint64 rowId, uint64 * pNewRowId, uint pageType, const void * pData, size_t dataLen); // @construction
 	//
 	// Returns:

Src/Include/PPDEFS.H

@@ -1548,7 +1548,7 @@
 #define BBT_DRAFTBILLS          7
 #define BBT_REALTYPES           8  // Товарные, бухгалтерские документы и оплаты
 #define BBT_WMSBILLS            9  // Документы складских операций
-#define BBT_SPC_CHARGEONMARKS  10  // @v10.9.0 Special: постановка на баланс маркированной продукции
+#define BBT_SPC_CHARGEONMARKS  10  // Special: постановка на баланс маркированной продукции
 //
 // Вид анализа счета. Применяются в PPViewAccAnlz
 // Перечисление AccAnlzKind (pp.h) однозначно проецируется в эти константы.
@@ -8026,6 +8026,7 @@
 	#define CTL_GDSCLSFORM_PAR2        (4 + WINDOWS_ID_BIAS)
 	#define CTL_GDSCLSFORM_PAR3        (5 + WINDOWS_ID_BIAS)
 	#define CTL_GDSCLSFORM_FLAGS       (6 + WINDOWS_ID_BIAS)
+	#define CTL_GDSCLSFORM_SYMB        (7 + WINDOWS_ID_BIAS) // @v12.0.11 Символ формулы для ссылок
 #define DLG_GDSCLSCALC           864 // Расчет по формуле класса товаров
 	#define CTL_GDSCLSCALC_FORM        (1 + WINDOWS_ID_BIAS)
 	#define CTLSEL_GDSCLSCALC_FORM     (2 + WINDOWS_ID_BIAS)

Src/Include/SLIB.H

@@ -1019,20 +1019,20 @@
 #define S_CHAR               1
 #define S_INT                2
 #define S_FLOAT              3
-#define S_DATE               4
-#define S_TIME               5
-#define S_DEC                6
+#define S_DATE               4 // Дата в формате LDATE
+#define S_TIME               5 // Время в формате LTIME
+#define S_DEC                6 // Двоично-десятичное представление числа с фиксированной точкой в формате COBOL
 #define S_MONEY              7
 #define S_LOGICAL            8
 #define S_BOOL               S_LOGICAL
 #define S_NUMERIC            9
 // @v11.9.9 (unused) #define S_BFLOAT            10
-#define S_LSTRING           11
-#define S_ZSTRING           12
-#define S_NOTE              13      // Для BTRIEVE - символьное поле переменной длины (последнее в таблице), для SQL - VARCHAR. Максимальная бинарная (с завершающим нулем) длина специфицируется //
+#define S_LSTRING           11 // Текстовая строка в формате PASCAL (первый байт - длина, далее - символы)
+#define S_ZSTRING           12 // Тестовая строка, завершающаяся нулевым байтом
+#define S_NOTE              13 // Для BTRIEVE - символьное поле переменной длины (последнее в таблице), для SQL - VARCHAR. Максимальная бинарная (с завершающим нулем) длина специфицируется //
 #define S_LVAR              14
-#define S_UBINARY           15
-#define S_UINT              S_UBINARY
+#define S_UINT              15
+// @v12.0.11 #define S_UBINARY           S_UINT
 #define S_AUTOINC           16
 #define S_BIT               17
 #define S_STS               18
@@ -1053,9 +1053,17 @@
 #define S_FPOINT2           32      // Вещественная двумерная точка (x, y)
 #define S_WZSTRING          33      // Unicode-zstring
 #define S_UUID_             34      // (Суффиксное подчеркивание необходимо для отличия от class S_GUID)
-#define S_INT64             35      // @v10.6.3
-#define S_UINT64            36      // @v10.6.3
-#define S_COLOR_RGBA        37      // @v10.9.10 4-компонентное представление цвета ARGB class SColorBase
+#define S_INT64             35      // Этот тип, как и S_UINT64, избыточен. Введен из-за мелких нестыковок, возникающих при использовании S_INT(8)
+#define S_UINT64            36      // 
+#define S_COLOR_RGBA        37      // 4-компонентное представление цвета ARGB class SColorBase
+//
+// Следующие 4 типа введены для соблюдения логической целостности набора типов и проекции на набор данных UED. 
+// Практически использовать их в обозримом времени не планируется.
+//
+#define S_LEINT             38      // @v12.0.11 int low-endian
+#define S_LEUINT            39      // @v12.0.11 uint low-endian
+#define S_BEINT             40      // @v12.0.11 int big-endian
+#define S_BEUINT            41      // @v12.0.11 uint big-endian
 //
 #define S_FIRSTUSERTYPE     50
 //
@@ -1075,15 +1083,15 @@
 
 #define T_CHAR             MKSTYPE(S_CHAR,1)
 #define T_INT              MKSTYPE(S_INT,2)
-#define T_UINT             MKSTYPE(S_UBINARY,2)
-#define T_UINT16           MKSTYPE(S_UBINARY,2)
-#define T_UINT32           MKSTYPE(S_UBINARY,4)
-#define T_UINT64           MKSTYPE(S_UBINARY,8)
+#define T_UINT             MKSTYPE(S_UINT,2)
+#define T_UINT16           MKSTYPE(S_UINT,2)
+#define T_UINT32           MKSTYPE(S_UINT,4)
+#define T_UINT64           MKSTYPE(S_UINT,8)
 #define T_INT16            MKSTYPE(S_INT,2)
 #define T_INT32            MKSTYPE(S_INT,4)
 #define T_INT64            MKSTYPE(S_INT64 ,8) // @v10.6.3 MKSTYPE(S_INT ,8)-->MKSTYPE(S_INT64 ,8)
 #define T_LONG             MKSTYPE(S_INT,4)
-#define T_ULONG            MKSTYPE(S_UBINARY,4)
+#define T_ULONG            MKSTYPE(S_UINT,4)
 #define T_FLOAT            MKSTYPE(S_FLOAT,4)
 #define T_DOUBLE           MKSTYPE(S_FLOAT,8)
 #define T_MONEY            MKSTYPED(S_DEC,8,2)
@@ -1125,7 +1133,7 @@ typedef char   * BCD_T;
 typedef unsigned short      RECORDSIZE;
 typedef unsigned long       RECORDNUMBER;
 typedef unsigned char       xmlChar; // Определение из libxml и для libxml (libxml now includes slib.h)
-typedef int                 boolint; // @v10.5.2 Введен с целью унифицировать "рукотворные" целочисленные булевы типы в разных включенных библиотеках
+typedef int                 boolint; // Введен с целью унифицировать "рукотворные" целочисленные булевы типы в разных включенных библиотеках
 typedef int32               TYPEID;
 
 class  SBuffer;
@@ -13882,7 +13890,9 @@ public:
 	};
 	SHistogram();
 	~SHistogram();
-	void   Setup();
+	bool   FASTCALL Copy(const SHistogram & rS);
+	//void   Setup();
+	SHistogram & Z();
 	void   SetupDynamic(double leftEdge, double step);
 	void   SetupDev(int even, double widthSigm, uint binCount = 0);
 	int    AddBin(long binId, double lowBound);

Src/Include/Tvdefs.h

@@ -584,7 +584,7 @@ extern struct ODC OwnerDrawCtrls[32]; // @defined(TDIALOG.CPP)
 #define BCO_CAPTOP       0x00000080
 #define BCO_CAPBOTTOM    0x00000100
 #define BCO_CAPVCENTER   0x00000200
-#define BCO_SORTABLE     0x00000400 // @v10.6.3 По содержимому колонки допускается сортировка таблицы
+#define BCO_SORTABLE     0x00000400 // По содержимому колонки допускается сортировка таблицы
 #define BCO_USERPROC     0x00001000
 //#define BCO_SKIP       0x00002000
 #define BCO_DEFOPT       (BCO_CAPBOTTOM | BCO_CAPCENTER)

Src/Include/ued-id.h

@@ -1,6 +1,6 @@
 // UED-ID.H
-// version: 34
-// sha256: 5e9cbeca2b7ff057db997ea47b5400d7c63f2e77ac1a15b6a66c2e3d93221a0b
+// version: 35
+// sha256: e4e857834b6a904bfacd0093364da64d517c02b0fc328f66a10c9de429661911
 //
 #ifndef __UED_ID_H
 #define __UED_ID_H
@@ -2363,38 +2363,38 @@
 	#define UED_PROGLANG_ERLANG                          0x460000001fULL
 	#define UED_PROGLANG_POWERSHELL                      0x4600000020ULL
 #define UED_META_DATATYPE                            0x100000047ULL
-	#define UED_DATATYPE_INT8                            0x4700000001ULL
-	#define UED_DATATYPE_UINT8                           0x4700000002ULL
-	#define UED_DATATYPE_INT16                           0x4700000003ULL
-	#define UED_DATATYPE_UINT16                          0x4700000004ULL
-	#define UED_DATATYPE_LEINT16                         0x4700000005ULL
-	#define UED_DATATYPE_LEUINT16                        0x4700000006ULL
-	#define UED_DATATYPE_BEINT16                         0x4700000007ULL
-	#define UED_DATATYPE_BEUINT16                        0x4700000008ULL
-	#define UED_DATATYPE_INT32                           0x4700000009ULL
-	#define UED_DATATYPE_UINT32                          0x470000000aULL
-	#define UED_DATATYPE_LEINT32                         0x470000000bULL
-	#define UED_DATATYPE_LEUINT32                        0x470000000cULL
-	#define UED_DATATYPE_BEINT32                         0x470000000dULL
-	#define UED_DATATYPE_BEUINT32                        0x470000000eULL
-	#define UED_DATATYPE_INT64                           0x470000000fULL
-	#define UED_DATATYPE_UINT64                          0x4700000010ULL
-	#define UED_DATATYPE_LEINT64                         0x4700000011ULL
-	#define UED_DATATYPE_LEUINT64                        0x4700000012ULL
-	#define UED_DATATYPE_BEINT64                         0x4700000013ULL
-	#define UED_DATATYPE_BEUINT64                        0x4700000014ULL
-	#define UED_DATATYPE_INT128                          0x4700000015ULL
-	#define UED_DATATYPE_UINT128                         0x4700000016ULL
-	#define UED_DATATYPE_LEINT128                        0x4700000017ULL
-	#define UED_DATATYPE_LEUINT128                       0x4700000018ULL
-	#define UED_DATATYPE_BEINT128                        0x4700000019ULL
-	#define UED_DATATYPE_BEUINT128                       0x470000001aULL
-	#define UED_DATATYPE_REAL16                          0x470000001bULL
-	#define UED_DATATYPE_REAL32                          0x470000001cULL
-	#define UED_DATATYPE_REAL64                          0x470000001dULL
-	#define UED_DATATYPE_REAL80                          0x470000001eULL
-	#define UED_DATATYPE_INT                             0x470000001fULL
-	#define UED_DATATYPE_REAL                            0x4700000020ULL
+	#define UED_DATATYPE_INT                             0x4700000002ULL
+	#define UED_DATATYPE_REAL                            0x4700000003ULL
+	#define UED_DATATYPE_INT8                            0x4700010002ULL
+	#define UED_DATATYPE_UINT8                           0x470001000fULL
+	#define UED_DATATYPE_INT16                           0x4700020002ULL
+	#define UED_DATATYPE_REAL16                          0x4700020003ULL
+	#define UED_DATATYPE_UINT16                          0x470002000fULL
+	#define UED_DATATYPE_LEINT16                         0x4700020026ULL
+	#define UED_DATATYPE_LEUINT16                        0x4700020027ULL
+	#define UED_DATATYPE_BEINT16                         0x4700020028ULL
+	#define UED_DATATYPE_BEUINT16                        0x4700020029ULL
+	#define UED_DATATYPE_INT32                           0x4700040002ULL
+	#define UED_DATATYPE_REAL32                          0x4700040003ULL
+	#define UED_DATATYPE_UINT32                          0x470004000fULL
+	#define UED_DATATYPE_LEINT32                         0x4700040026ULL
+	#define UED_DATATYPE_LEUINT32                        0x4700040027ULL
+	#define UED_DATATYPE_BEINT32                         0x4700040028ULL
+	#define UED_DATATYPE_BEUINT32                        0x4700040029ULL
+	#define UED_DATATYPE_INT64                           0x4700080002ULL
+	#define UED_DATATYPE_REAL64                          0x4700080003ULL
+	#define UED_DATATYPE_UINT64                          0x470008000fULL
+	#define UED_DATATYPE_LEINT64                         0x4700080026ULL
+	#define UED_DATATYPE_LEUINT64                        0x4700080027ULL
+	#define UED_DATATYPE_BEINT64                         0x4700080028ULL
+	#define UED_DATATYPE_BEUINT64                        0x4700080029ULL
+	#define UED_DATATYPE_REAL80                          0x47000a0003ULL
+	#define UED_DATATYPE_INT128                          0x4700100002ULL
+	#define UED_DATATYPE_UINT128                         0x470010000fULL
+	#define UED_DATATYPE_LEINT128                        0x4700100026ULL
+	#define UED_DATATYPE_LEUINT128                       0x4700100027ULL
+	#define UED_DATATYPE_BEINT128                        0x4700100028ULL
+	#define UED_DATATYPE_BEUINT128                       0x4700100029ULL
 #define UED_META_ABSTRACTDATASTRUCT                  0x100000048ULL
 #define UED_META_DATAFORMAT                          0x100000049ULL
 	#define UED_DATAFORMAT_TXT                           0x4900000001ULL

Src/OSF/icu/icu4c/source/i18n/dtitvinf.cpp

@@ -360,27 +360,22 @@ void DateIntervalInfo::initializeData(const Locale & locale, UErrorCode & status
 	status = U_ZERO_ERROR;
 
 	// Instantiate the resource bundles
-	UResourceBundle * rb, * calBundle;
-	rb = ures_open(nullptr, locName, &status);
+	UResourceBundle * calBundle;
+	UResourceBundle * rb = ures_open(nullptr, locName, &status);
 	if(U_FAILURE(status)) {
 		return;
 	}
 	calBundle = ures_getByKeyWithFallback(rb, gCalendarTag, nullptr, &status);
-
 	if(U_SUCCESS(status)) {
-		UResourceBundle * calTypeBundle, * itvDtPtnResource;
-
 		// Get the fallback pattern
 		const char16_t * resStr = nullptr;
 		int32_t resStrLen = 0;
-		calTypeBundle = ures_getByKeyWithFallback(calBundle, calendarTypeToUse, nullptr, &status);
-		itvDtPtnResource = ures_getByKeyWithFallback(calTypeBundle,
-			gIntervalDateTimePatternTag, nullptr, &status);
+		UResourceBundle * calTypeBundle = ures_getByKeyWithFallback(calBundle, calendarTypeToUse, nullptr, &status);
+		UResourceBundle * itvDtPtnResource = ures_getByKeyWithFallback(calTypeBundle, gIntervalDateTimePatternTag, nullptr, &status);
 		// TODO(ICU-20400): After the fixing, we should find the "fallback" from
 		// the rb directly by the path "calendar/${calendar}/intervalFormats/fallback".
 		if(U_SUCCESS(status)) {
-			resStr = ures_getStringByKeyWithFallback(itvDtPtnResource, gFallbackPatternTag,
-				&resStrLen, &status);
+			resStr = ures_getStringByKeyWithFallback(itvDtPtnResource, gFallbackPatternTag, &resStrLen, &status);
 		}
 
 		if(U_SUCCESS(status) && (resStr != nullptr)) {

Src/OSF/nginx/src/core/ngx_string.c

@@ -804,7 +804,7 @@ time_t FASTCALL ngx_atotm(const uchar * line, size_t n)
 
 ngx_int_t FASTCALL ngx_hextoi(const uchar * line, size_t n)
 {
-	uchar c, ch;
+	uchar ch;
 	ngx_int_t value, cutoff;
 	if(n == 0) {
 		return NGX_ERROR;
@@ -829,10 +829,12 @@ ngx_int_t FASTCALL ngx_hextoi(const uchar * line, size_t n)
 				value = value * 16 + (ch - '0');
 				continue;
 			}
-			c = (uchar)(ch | 0x20);
-			if(c >= 'a' && c <= 'f') {
-				value = value * 16 + (c - 'a' + 10);
-				continue;
+			{
+				uchar c = (uchar)(ch | 0x20);
+				if(c >= 'a' && c <= 'f') {
+					value = value * 16 + (c - 'a' + 10);
+					continue;
+				}
 			}
 			return NGX_ERROR;
 			*/

Src/PPLib/CCHECK.CPP

@@ -1824,12 +1824,21 @@ void FASTCALL CSessTotal::Add(const CSessTotal * pSubTotal)
 	WORetAmount    += pSubTotal->WORetAmount;
 	WORetBnkAmount += pSubTotal->WORetBnkAmount;
 	BnkDiscount    += pSubTotal->BnkDiscount;
-	AltRegCount    += pSubTotal->AltRegCount; // @v10.0.02
-	AltRegAmount   += pSubTotal->AltRegAmount; // @v10.0.02
+	AltRegCount    += pSubTotal->AltRegCount;
+	AltRegAmount   += pSubTotal->AltRegAmount;
 }
 //
 // CCheckCore
 //
+CCheckCore::CcMarkedEntry::CcMarkedEntry() : CcID(0), LineNo(0), Flags(0), Qtty(0.0)
+{
+}
+
+CCheckCore::ListByMarkEntry::ListByMarkEntry() : OrgLotID(0), OrgLotDate(ZERODATE), OrgLotQtty(0.0), Flags(0), TotalOpQtty(0.0)
+{
+	Mark[0] = 0;
+}
+
 /*static*/SString & FASTCALL CCheckCore::MakeCodeString(const CCheckTbl::Rec * pRec, uint options, SString & rBuf)
 {
 	rBuf.Z();
@@ -1901,7 +1910,7 @@ int CCheckCore::SearchByDateAndCode(long code, LDATE dt, int unprintedOnly, TSVe
 {
 	int    ok = -1;
 	if(pRecList) {
-		pRecList->clear(); // @v10.6.11 freeAll()-->clear()
+		pRecList->clear();
 		CCheckTbl::Key1  k1;
 		MEMSZERO(k1);
 		k1.Dt = dt;
@@ -3326,7 +3335,6 @@ int CCheckCore::GetSessTotal(PPID sessID, long flags, CSessTotal * pTotal, BVATA
 	for(q.initIteration(false, &k, spGe); q.nextIteration() > 0;) {
 		if(!(data.Flags & CCHKF_SKIP) && (!(flags & gglfSkipUnprintedChecks) || (data.Flags & CCHKF_PRINTED))) {
 			if(flags & gglfUseFullCcPackets) {
-				// @v10.8.7 (LoadPacket) pack.Z();
 				if(LoadPacket(data.ID, 0, &pack) > 0) {
 					double fiscal = 0.0, nonfiscal = 0.0;
 					AddRecToSessTotal(&pack.Rec, pTotal);
@@ -3488,11 +3496,11 @@ int CCheckCore::ReplaceSCard(PPID destCardID, PPID srcCardID, int use_ta)
 		if(GetListByCard(destCardID, 0, &id_list) > 0) {
 			for(uint i = 0; i < id_list.getCount(); i++) {
 				const  PPID check_id = id_list.get(i);
-				if(SearchByID_ForUpdate(this, PPOBJ_CCHECK, check_id, 0) > 0) { // @v7.0.11 CCheckCore::Search-->::SearchByID_ForUpdate
+				if(SearchByID_ForUpdate(this, PPOBJ_CCHECK, check_id, 0) > 0) {
 					double amount = MONEYTOLDBL(data.Amount);
 					data.SCardID = srcCardID;
 					THROW_DB(updateRec()); // @sfu
-					if(!(data.Flags & (CCHKF_JUNK|CCHKF_SKIP))) { // @v7.0.11
+					if(!(data.Flags & (CCHKF_JUNK|CCHKF_SKIP))) {
 						THROW(Cards.AddTurnover(destCardID, -amount, 0));
 						THROW(Cards.AddTurnover(srcCardID, amount, 0));
 					}