powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Пожалуйста посмотрите и скажите что не так
2 сообщений из 2, страница 1 из 1
Пожалуйста посмотрите и скажите что не так
    #32332457
Newb
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Что-то я запутался с фоксом. Гляньте пожалуйста.
Есть таблица (MS-SQL Server 2000) которая перекачивается в курсор.
Для этой таблицы в другой храниться предварительно посчитанное кол-во записей и CRC (точнее не CRC а просто сумма всех значений которая считается также как и в фоксе)
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
&& Обнуляем
m.LCRC =  0 
m.LLength =  0 

&& берем посчитанные длину и CRC
m.lcSQL =  "SELECT * FROM CRC" 
= SQLEXEC(m.pcConnectHeader, m.lcSQL,  "cTmp" )
m.Length = cTmp.Length
m.CRC    = cTmp.CRC

&& Загоняем таблицу в курсор
m.lcSQL =  "SELECT * FROM Tab1"  
= SQLEXEC(m.pcConnectHeader, m.lcSQL,  "cTab1" )

&& Вновь считаем длину и CRC
SELECT COUNT(*) AS Length,;
       SUM(INT(NVL(Dat1, 0 ))+;
           INT(NVL(Dat2, 0 ))) AS CRC;
FROM cTab1;
INTO CURSOR cTmp
m.newCRC = cTmp.CRC
m.newLength = cTmp.Length
...
Рейтинг: 0 / 0
Пожалуйста посмотрите и скажите что не так
    #32332459
Newb
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В итоге:

MESSAGEBOX(m.Length)
MESSAGEBOX(m.CRC)

Возвращают правильные значения

MESSAGEBOX(m.newLength)
MESSAGEBOX(m.newCRC)

Оба возвращают 0
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Пожалуйста посмотрите и скажите что не так
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]