Просмотр исходного текста страницы FCTSLF R01

[[FCTSLF_R01]] - это программа из справочника [[R266]] 
 Опрос пар-ров FctSlf_ACP/ACS
= Текст =
 Parameters  KD:='ACP', with_msg:=.f.
 Local  dt
 
 if  len(result:=VarAsArray(atr(GetPrm('FctSlf_'+KD,,,dt:=BoM(CurDate))),.f.))=0 .and. with_msg
   dt:=BoM(CurDate)  //изменён GetPrm'ом
   Message('На начало '+DocPeriod2(dt)+' значение системного параметра FctSlf_'+KD+' НЕ определено.')
 endif
= Смотрите также =
[[Полезные функции]]

[[Функции Delphi]]