Показать сообщение отдельно
Старый 05.09.2013, 11:58   #8  
zuzka is offline
zuzka
Участник
Аватар для zuzka
 
131 / 10 (1) +
Регистрация: 29.07.2013
Цитата:
Сообщение от Fierce Посмотреть сообщение
сделал вот так вот..
Цитата:
IF Vend."Employee No."<>'' THEN
BEGIN
IF Employee.GET(Vend."Employee No.") THEN

BEGIN
IF Person.GET(Employee."Person No.") THEN
INN:=Person."VAT Registration No.";
END;

END;
можно оформить получше:
Код:
IF Vend."Employee No."<>'' THEN BEGIN
  IF Employee.GET(Vend."Employee No.") THEN BEGIN
    IF Person.GET(Employee."Person No.") THEN
      INN:=Person."VAT Registration No.";
  END;
END;
равнозначно и более читабельно:
Код:
IF Vend."Employee No."<>'' THEN
  IF Employee.GET(Vend."Employee No.") THEN
    IF Person.GET(Employee."Person No.") THEN
      INN:=Person."VAT Registration No.";
__________________
Как только вы проиграете, все ваши прошлые победы забудут.