Код

SELECT
	Журнал.IDDoc as [Док $Документ.Перемещение]
	FROM
	(
	SELECT DISTINCT
		Жур.IDDoc as IDDoc
	FROM
		1SJourn Жур
	INNER JOIN
		$Документ.Перемещение as Док ON Док.IDDoc = Жур.IDDoc
	) as Журнал
 

pvase писал(а) 30. Октября 2006 :: 16:06:

LEFT JOIN
           $Документ.Перемещение as Док ON Жур.IDDoc = Док.IDDoc

По барабану!!!
Может проблема в подключении? К меня:

Код

БД.Соединение("DRIVER=Microsoft Visual FoxPro ceType=DBF;SourceDB="+КаталогИБ()); 

Код

	SELECT
		Жур.IDDoc as IDDoc
	FROM
		1SJourn Жур
 

Код

	SELECT
		Док.IDDoc as IDDoc
	FROM
		$Документ.Перемещение as Док
 

Код

	SELECT
		Жур.IDDoc as IDDoc
	FROM
		1SJourn Жур
	INNER JOIN
		$Документ.Перемещение as Док ON Док.IDDoc = Жур.IDDoc
 

Код

	OLEDB = СоздатьОбъект("OLEDBData");
	OLEDB.Connect("Provider=VFPOLEDB.1;Deleted=Yes;Data Source=" + КаталогИБ() + ";Mode=ReadWrite;Extended Properties="";User ID="";Password="";Mask Password=False;Collating Sequence=RUSSIAN;DSN=""");
	Command = OLEDB.CreateCommand();
	ТЗПроверка = СоздатьОбъект("ТаблицаЗначений");
	ТЗПроверка = Command.ExecuteStatement("SELECT * FROM 1SJOURN");
	ТЗПроверка.ВыбратьСтроку();
	Command.Close();
	OLEDB.Close();