баланс кассы, р/с

[by_HT]

Цитата:

Сообщение от RedFox

Первая строчка для меня малеха не понятно. Так как таблица 270 "Bank Account" имеет первичный ключ "Account No" (а это рано "Account No" и "Bal. Account No"), то лучше использовать GET и это будет гораздо быстрее работать, чем фильтр в любой версии.

IF GenJnlLine."Bal. Account Type"=4 THEN BEGIN

Этим я хотел узнать правдо ли у нас Bal. Account Type имеет значение: Bank Account.
а этой строкой:

IF GenJnlLine."Bal. Account Type"= Acc::"Bank Account" THEN GenJnlLine."Bal. Account Type" :=4;

Я присваеваю значение...
Буду очень рад, если ты напишешь, как это сделать гораздо правельней!
Я так и не разобрался с Get.

Цитата:

Сообщение от RedFox

EXIT не очень удачная конструкция в данному случае. ЛУчше использовать ERROR - и транзакцию прерывает (а не просто выходит!!!! из CU) и информативное сообщение можно пользователю послать ;-)

ясно..спасиб!

Цитата:

Сообщение от RedFox

Тип поля - FlowField. Нужно вызывать CALCFIELD вроде как

Ого, я и не мог предположить... =(

Пока у меня выходит так:

IF GenJnlLine."Bal. Account Type"= Acc::"Bank Account" THEN GenJnlLine."Bal. Account Type" :=4;
 IF GenJnlLine."Bal. Account Type"=4 THEN BEGIN
  IF BankAccount.FIND('-') THEN
   REPEAT
	IF BankAccount."No." =  GenJnlLine."Bal. Account No." THEN
	 IF (BankAccount.CALCFIELDS(Balance) = TRUE) AND (BankAccount.Balance <> 0) THEN
	  IF BankAccount."Min. Balance" >= BankAccount.Balance - GenJnlLine.Amount THEN
	  ERROR(Text010);
   UNTIL BankAccount.NEXT =0;
END;