Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

dsd1-10 / dsd-08=skill / res

.doc
Скачиваний:
64
Добавлен:
05.06.2015
Размер:
21.5 Кб
Скачать

procedure(parameter_R()

let((R)

R=aelNumber(cdfgData->R->value)

if( ((cdfgData->typeres->value == "nplusres") && (cdfgData->typenplusres->value == "R&W"))

then

if((R<10||R>5K) then

print("Error!!!")

cdfgData->R->value=cdfgData->R->defValue)

else

if((R<10||R>1K) then

print("Error!!!")

cdfgData->R->value=cdfgData->R->defValue)

)

))

procedure(parameter_PW()

PW=aelNumber(cdfgData->PW->value)

if((PW<5u||PW>100u) then

print("Error PW!!!")

cdfgData->PW->value=cdfgData->PW->defValue

))

procedure(parameter_PL()

PL=aelNumber(cdfgData->PL->value)

if((PL<1u||PL>10u) then

print("Error PL!!!")

cdfgData->PL->value=cdfgData->PL->defValue

))

procedure(parameter_PM()

PolyMult=aelNumber(cdfgData->PolyMult->value)

if((PolyMult==0) then

print("Error MULTIPLAER!!!")

cdfgData->PolyMult->value=cdfgData->PolyMult->defValue

))

procedure(parameter_NPW()

NPW=aelNumber(cdfgData->PW->value)

if((NPW<5u||PW>100u) then

print("Error NPW!!!")

cdfgData->NPW->value=cdfgData->NPW->defValue

))

procedure(parameter_NPL()

NPL=aelNumber(cdfgData->NPL->value)

if((NPL<5u||NPL>15u) then

print("Error NPL!!!")

cdfgData->NPL->value=cdfgData->NPL->defValue

))

procedure(parameter_NM()

NPlusMult=aelNumber(cdfgData->NPlusMult->value)

if((NPlusMult==0) then

print("Error MULTIPLAER!!!")

cdfgData->NPlusMult->value=cdfgData->NPlusMult->defValue

))

Соседние файлы в папке dsd-08=skill