Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- scrset(
- sCFormPestsBeneficialsYadMordechaiNew:frm(#Pests_and_Beneficials,55|50|50|40|40,
- init:block(
- set($pestCode, .pest, dDone),
- set($taskCode, .task, dDone),
- set($lc,.plot,dDone),
- set($plotCode,.plot,dDone)
- set($crop, .crop, dDone),
- set($growerCode,.gCode,dDone),
- set($growerName,${qps('.def.sRoot/mi[val==growerCode].lbl')}),
- set($userLanguage, ${userLang()}, dTemp)
- log(warn,${'Crop '.crop}),
- log(warn,${'Contains any '.containsAny(crop,'CR15G0')}),
- log(warn,${'Contains any '.containsNone(crop,'CR15G0')}),
- )
- refresh:block(),
- focus:block(
- set($lblName,${qp('.lblName','dTemp')}),
- if(${notEmpty(lblName)}, block(
- focus(${'.'.lblName}),
- unset(.lblName,dTemp))
- )
- ),
- @copyNotes1:block(
- if(${notEmpty(qp('.'.dsetName.':dset.notes','dTemp'))},set(.notes,${qp('.'.dsetName.':dset.notes','dTemp')},dDone)),
- for(photo,${qp('.'.dsetName.':dset.photo_note/dfile.file','dTemp')},
- set(.photo_note\:dlist/dfile[i_photo].file,$photo,dDone)),
- if(${notEmpty(qp('.'.dsetName.':dset.individual_recommendation','dTemp'))},set(.individual_recommendation,${qp('.'.dsetName.':dset.individual_recommendation','dTemp')},dDone)),
- unset(${'.'.dsetName},dTemp,true)
- ),
- @cleanNotes1:block(
- unset(.notes,dDone),
- unset(.photo_note,dDone,true),
- unset(.individual_recommendation,dDone)
- ),
- @ldBeneficials:ldata(
- li(Please select beneficial,${res("Please_Select_Beneficial")},ord:1),
- li(PT217G4I0I,${res("Insidious_flower_bug")}),
- li(PT217G3I0I,${res("Aphidius_colemani")}),
- li(PT217DI4I,${res("Antilion")}),
- li(PT217G1I0I0I,${res("Parasitization").'('.res("Tabaco_whitefly").')'}),
- li(PT217G0I0I0I,${res("Parasitization").'('.res("Pseudococcidae").')'}),
- li(PT2171I2I,${res("Ladybug")}),
- li(PT2170I2I2I,${res("Amblyseius_swirskii")}),
- li(PT2170I2I4I,${res("Phytoseiulus_persimilis")})
- ),
- @ldPestSpread:ldata(
- li(Please Select Distribution,${res("Please_Select_Distribution")},ord:1),
- li(1. isolated cases,${res("Isolated_cases")}),
- li(2. a number of areas,${res("A_number_of_areas")}),
- li(3. mainly on the margins,${res("Mainly_on_the_margins")}),
- li(4. in the entire section,${res("In_the_entire_section")})
- ),
- // Headers
- lbl(${res('Plot').':'}, lo(2, m(5, 0, 0, 0), bg:FFc6d2d2)),
- lbl(${qp('.plotName', 'dTemp')}, aln:left, lo(3, m(5, 0, 0, 0), bg:FFc6d2d2)),
- lbl(${res('Grower').':'}, lo(2, style:captionGrey)),
- lbl(${def(growerName,res('n%2Fa'))}, aln:left, lo(3, style:captionGrey)),
- lbl(${res('Crop').':'}, lo(2, bg:FFc6d2d2)),
- lbl(${qp('.cropName', 'dTemp')}, aln:left, lo(3, bg:FFc6d2d2)),
- lbl(${res("Report_Contamination_Levels")},lo(5,m(3,0,0,0),style:group),aln:center),
- // Carmine spider mite
- lCarmineSpiderMite:lbl(${res("Carmine_spider_mite")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsCarmineSpiderMite'},dTemp),
- set(.lblName,${'lCarmineSpiderMite'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,carmineSpiderMite,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[0].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:carmineSpiderMiteSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp, .pests\:dlist/dset[0].spread),
- lo(3)
- ),
- lbl(#Select_beneficial,lo(2)),
- list(in:carmineSpiderMiteBeneficial,data:ldBeneficials,req:false,sort:no,
- dpath(dTemp,.pests\:dlist/dset[0].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${carmineSpiderMiteBeneficial!='Please select beneficial'})),
- ci(single,levelCarmineSpiderMiteBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${carmineSpiderMiteBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[0].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_beneficial,lo(2,visible:${notEmpty(levelCarmineSpiderMiteBeneficial)})),
- list(in:carmineSpiderMiteBeneficialTwo,data:ldBeneficials,req:false,sort:no,
- dpath(dTemp,.pests\:dlist/dset[0].beneficials_name_two),
- lo(3,visible:${notEmpty(levelCarmineSpiderMiteBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${carmineSpiderMiteBeneficialTwo!='Please select beneficial'})),
- ci(single,levelCarmineSpiderMiteBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${carmineSpiderMiteBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[0].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Broad mite
- lBroadMite:lbl(${res("Broad_mite")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsBroadMite'},dTemp),
- set(.lblName,${'lBroadMite'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,broadMite,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[1].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:broadMiteSpread,data:ldPestSpread,req:false,sort:no,
- dpath(dTemp,.pests\:dlist/dset[1].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:broadMiteBeneficial,data:ldBeneficials,req:false,sort:no,
- dpath(dTemp,.pests\:dlist/dset[1].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${broadMiteBeneficial!='Please select beneficial'})),
- ci(single,levelBroadMiteBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${broadMiteBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[1].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelBroadMiteBeneficial)})),
- list(in:broadMiteBeneficialTwo,data:ldBeneficials,req:false,sort:no,
- dpath(dTemp,.pests\:dlist/dset[1].beneficials_name_two),
- lo(3,visible:${notEmpty(levelBroadMiteBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${broadMiteBeneficialTwo!='Please select beneficial'})),
- ci(single,levelBroadMiteBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${broadMiteBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[1].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Gray Mould
- lGrayMould:lbl(${res("Gray_mould")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsGrayMould'},dTemp),
- set(.lblName,${'lGrayMould'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,grayMould,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[2].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:grayMouldSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[2].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:greyMouldBeneficial,data:ldBeneficials,req:false,sort:no,
- dpath(dTemp,.pests\:dlist/dset[2].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${greyMouldBeneficial!='Please select beneficial'})),
- ci(single,levelGreyMouldBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${greyMouldBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[2].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelGreyMouldBeneficial)})),
- list(in:greyMouldBeneficialTwo,data:ldBeneficials,req:false,sort:no,
- dpath(dTemp,.pests\:dlist/dset[2].beneficials_name_two),
- lo(3,visible:${notEmpty(levelGreyMouldBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${greyMouldBeneficialTwo!='Please select beneficial'})),
- ci(single,levelGreyMouldBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${greyMouldBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[2].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // TSWV
- lTSWV:lbl(${res("TSWV")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsTSWV'},dTemp),
- set(.lblName,${'lTSWV'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,tSWV,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[3].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:TSWVSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[3].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:TSWVBeneficial,data:ldBeneficials,req:false,sort:no,
- dpath(dTemp,.pests\:dlist/dset[3].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${TSWVBeneficial!='Please select beneficial'})),
- ci(single,levelTSWVBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${TSWVBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[3].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelTSWVBeneficial)})),
- list(in:TSWVBeneficialTwo,data:ldBeneficials,req:false,sort:no,
- dpath(dTemp,.pests\:dlist/dset[3].beneficials_name_two),
- lo(3,visible:${notEmpty(levelTSWVBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${TSWVBeneficialTwo!='Please select beneficial'})),
- ci(single,levelTSWVBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${TSWVBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[3].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // PYLCV
- lPYLCV:lbl(${res("PYLCV")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsPYLCV'},dTemp),
- set(.lblName,${'lPYLCV'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,pYLCV,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[4].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:PYLCVSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[4].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:PYLVCBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[4].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${PYLVCBeneficial!='Please select beneficial'})),
- ci(single,levelPYLVCBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${PYLVCBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[4].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelPYLVCBeneficial)})),
- list(in:PYLVCBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[4].beneficials_name_two),
- lo(3,visible:${notEmpty(levelPYLVCBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${PYLVCBeneficialTwo!='Please select beneficial'})),
- ci(single,levelPYLVCBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${PYLVCBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[4].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Fruit Fly
- lFruitFly:lbl(${res("Fruit_fly")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsFruitFly'},dTemp),
- set(.lblName,${'lFruitFly'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,fruitFly,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[5].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:fruitFlySpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[5].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:fruitFlyBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[5].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${fruitFlyBeneficial!='Please select beneficial'})),
- ci(single,levelFruitFlyBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${fruitFlyBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[5].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelFruitFlyBeneficial)})),
- list(in:fruitFlyBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[5].beneficials_name_two),
- lo(3,visible:${notEmpty(levelFruitFlyBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${fruitFlyBeneficialTwo!='Please select beneficial'})),
- ci(single,levelFruitFlyBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${fruitFlyBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[5].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Mediterranean fruit fly
- lMediterraneanFruitFly:lbl(${res("Mediterranean_fruit_fly")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsMediterraneanFruitFly'},dTemp),
- set(.lblName,${'lMediterraneanFruitFly'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,mediterraneanFruitFly,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[6].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:mediterraneanFruitFlySpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[6].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:mediterraneanFruitFlyBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[6].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${mediterraneanFruitFlyBeneficial!='Please select beneficial'})),
- ci(single,levelMediterraneanFruitFlyBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${mediterraneanFruitFlyBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[6].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelMediterraneanFruitFlyBeneficial)})),
- list(in:mediterraneanFruitFlyBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[6].beneficials_name_two),
- lo(3,visible:${notEmpty(levelMediterraneanFruitFlyBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${mediterraneanFruitFlyBeneficialTwo!='Please select beneficial'})),
- ci(single,levelMediterraneanFruitFlyBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${mediterraneanFruitFlyBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[6].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Moth caterpillar
- lMothCaterpillar:lbl(${res("Moth_caterpillar")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsMothCaterpillar'},dTemp),
- set(.lblName,${'lMothCaterpillar'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,mothCaterpillar,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[7].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:mothCaterpillarSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[7].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:mothCaterpillarBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[7].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${mothCaterpillarBeneficial!='Please select beneficial'})),
- ci(single,levelMothCaterpillarBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${mothCaterpillarBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[7].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelMothCaterpillarBeneficial)})),
- list(in:mothCaterpillarBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[7].beneficials_name_two),
- lo(3,visible:${notEmpty(levelMothCaterpillarBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${mothCaterpillarBeneficialTwo!='Please select beneficial'})),
- ci(single,levelMothCaterpillarBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${mothCaterpillarBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[7].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Chilli gall midge
- lChilliGallMidge:lbl(${res("Chilli_gall_midge")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsChilliGallMidge'},dTemp),
- set(.lblName,${'lChilliGallMidge'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,chilliGallMidge,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[8].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:chilliGallMidgeSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[8].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:chilliGallMidgeBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[8].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${chilliGallMidgeBeneficial!='Please select beneficial'})),
- ci(single,levelChilliGallMidgeBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${chilliGallMidgeBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[8].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelChilliGallMidgeBeneficial)})),
- list(in:chilliGallMidgeBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[8].beneficials_name_two),
- lo(3,visible:${notEmpty(levelChilliGallMidgeBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${chilliGallMidgeBeneficialTwo!='Please select beneficial'})),
- ci(single,levelChilliGallMidgeBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${chilliGallMidgeBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[8].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Aphid
- lAphid:lbl(${res("Aphid")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsAphid'},dTemp),
- set(.lblName,${'lAphid'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,aphid,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[9].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:aphidSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[9].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:aphidBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[9].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${aphidBeneficial!='Please select beneficial'})),
- ci(single,levelAphidBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${aphidBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[9].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelAphidBeneficial)})),
- list(in:aphidBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[9].beneficials_name_two),
- lo(3,visible:${notEmpty(levelAphidBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${aphidBeneficialTwo!='Please select beneficial'})),
- ci(single,levelAphidBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${aphidBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[9].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Green peach aphid
- lGreenPeachAphid:lbl(${res("Green_peach_aphid")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsGreenPeachAphid'},dTemp),
- set(.lblName,${'lGreenPeachAphid'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,greenPeachAphid,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[10].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:greenPeachAphidSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[10].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:greenPeachAphidBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[10].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${greenPeachAphidBeneficial!='Please select beneficial'})),
- ci(single,levelGreenPeachAphidBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${greenPeachAphidBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[10].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelGreenPeachAphidBeneficial)})),
- list(in:greenPeachAphidBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[10].beneficials_name_two),
- lo(3,visible:${notEmpty(levelGreenPeachAphidBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${greenPeachAphidBeneficialTwo!='Please select beneficial'})),
- ci(single,levelGreenPeachAphidBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${greenPeachAphidBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[10].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Melon and cotton aphid
- lMelonAndCottonAphid:lbl(${res("Melon_and_cotton_aphid")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsMelonAndCottonAphid'},dTemp),
- set(.lblName,${'lMelonAndCottonAphid'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,melonAndCottonAphid,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[11].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:melonAndCottonAphidSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[11].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:melonAndCottonAphidBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[11].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${melonAndCottonAphidBeneficial!='Please select beneficial'})),
- ci(single,levelMelonAndCottonAphidBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${melonAndCottonAphidBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[11].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelMelonAndCottonAphidBeneficial)})),
- list(in:melonAndCottonAphidBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[11].beneficials_name_two),
- lo(3,visible:${notEmpty(levelMelonAndCottonAphidBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${melonAndCottonAphidBeneficialTwo!='Please select beneficial'})),
- ci(single,levelMelonAndCottonAphidBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${melonAndCottonAphidBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[11].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Black bean aphid
- lBlackBeanAphid:lbl(${res("Black_bean_aphid")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsBlackBeanAphid'},dTemp),
- set(.lblName,${'lBlackBeanAphid'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,blackBeanAphid,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[12].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:blackBeanAphidSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[12].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:blackBeanAphidBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[12].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${blackBeanAphidBeneficial!='Please select beneficial'})),
- ci(single,levelBlackBeanAphidBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${blackBeanAphidBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[12].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelBlackBeanAphidBeneficial)})),
- list(in:blackBeanAphidBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[12].beneficials_name_two),
- lo(3,visible:${notEmpty(levelBlackBeanAphidBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${blackBeanAphidBeneficialTwo!='Please select beneficial'})),
- ci(single,levelBlackBeanAphidBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${blackBeanAphidBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[12].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Tobacco aphid
- lTobaccoAphid:lbl(${res("Tobacco_aphid")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsTobaccoAphid'},dTemp),
- set(.lblName,${'lTobaccoAphid'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,tobaccoAphid,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[13].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:tobaccoAphidSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[13].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:tobaccoAphidBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[13].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${tobaccoAphidBeneficial!='Please select beneficial'})),
- ci(single,levelTobaccoAphidBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${tobaccoAphidBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[13].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelTobaccoAphidBeneficial)})),
- list(in:tobaccoAphidBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[13].beneficials_name_two),
- lo(3,visible:${notEmpty(levelTobaccoAphidBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${tobaccoAphidBeneficialTwo!='Please select beneficial'})),
- ci(single,levelTobaccoAphidBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${tobaccoAphidBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[13].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Tobacco white fly
- lTobaccoWhitefly:lbl(${res("Tobacco_whitefly")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsTobaccoWhitefly'},dTemp),
- set(.lblName,${'lTobaccoWhitefly'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,tobaccoWhitefly,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[14].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:tobaccoWhiteFlySpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[14].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:tobaccoWhiteFlyBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[14].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${tobaccoWhiteFlyBeneficial!='Please select beneficial'})),
- ci(single,levelTobaccoWhiteFlyBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${tobaccoWhiteFlyBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[14].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelTobaccoWhiteFlyBeneficial)})),
- list(in:tobaccoWhiteFlyBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[14].beneficials_name_two),
- lo(3,visible:${notEmpty(levelTobaccoWhiteFlyBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${tobaccoWhiteFlyBeneficialTwo!='Please select beneficial'})),
- ci(single,levelTobaccoWhiteFlyBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${tobaccoWhiteFlyBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[14].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Solanum mealybug
- lSolanumMealybug:lbl(${res("Solanum_mealybug")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsSolanumMealybug'},dTemp),
- set(.lblName,${'lSolanumMealybug'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,solanumMealybug,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[15].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:solanumMealybugSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[15].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:solanumMealybugBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[15].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${solanumMealybugBeneficial!='Please select beneficial'})),
- ci(single,levelSolanumMealybugBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${solanumMealybugBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[15].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelSolanumMealybugBeneficial)})),
- list(in:solanumMealybugBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[15].beneficials_name_two),
- lo(3,visible:${notEmpty(levelSolanumMealybugBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${solanumMealybugBeneficialTwo!='Please select beneficial'})),
- ci(single,levelSolanumMealybugBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${solanumMealybugBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[15].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Cotton mealybug
- lCottonMealybug:lbl(${res("Cotton_mealybug")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsCottonMealybug'},dTemp),
- set(.lblName,${'lCottonMealybug'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,cottonMealybug,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[16].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:cottonMealybugSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[16].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:cottonMealybugBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[16].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${cottonMealybugBeneficial!='Please select beneficial'})),
- ci(single,levelCottonMealybugBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${cottonMealybugBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[16].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelCottonMealybugBeneficial)})),
- list(in:cottonMealybugBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[16].beneficials_name_two),
- lo(3,visible:${notEmpty(levelCottonMealybugBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${cottonMealybugBeneficialTwo!='Please select beneficial'})),
- ci(single,levelCottonMealybugBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${cottonMealybugBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[16].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Cotton root knot nematode
- lCottonRootKnotNematode:lbl(${res("Cotton_root%2Dknot_nematode")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsCottonRootKnotNematode'},dTemp),
- set(.lblName,${'lCottonRootKnotNematode'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,cottonRootKnotNematode,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[17].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:cottonRootKnotNematodeSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[17].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:cottonRootKnotNematodeBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[17].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${cottonRootKnotNematodeBeneficial!='Please select beneficial'})),
- ci(single,levelCottonRootKnotNematodeBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${cottonRootKnotNematodeBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[17].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelCottonRootKnotNematodeBeneficial)})),
- list(in:cottonRootKnotNematodeBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[17].beneficials_name_two),
- lo(3,visible:${notEmpty(levelCottonRootKnotNematodeBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${cottonRootKnotNematodeBeneficialTwo!='Please select beneficial'})),
- ci(single,levelCottonRootKnotNematodeBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${cottonRootKnotNematodeBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[17].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Ants
- lAnts:lbl(${res("Ants")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsAnts'},dTemp),
- set(.lblName,${'lAnts'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,ants,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[18].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:antsSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[18].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:antsBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[18].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${antsBeneficial!='Please select beneficial'})),
- ci(single,levelAntsBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${antsBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[18].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelAntsBeneficial)})),
- list(in:antsBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[18].beneficials_name_two),
- lo(3,visible:${notEmpty(levelAntsBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${antsBeneficialTwo!='Please select beneficial'})),
- ci(single,levelAntsBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${antsBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[18].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Herbarium
- lHerbarium:lbl(${res("Herbarium")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsHerbarium'},dTemp),
- set(.lblName,${'lHerbarium'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,herbarium,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[19].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:herbariumSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[19].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:herbariumBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[19].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${herbariumBeneficial!='Please select beneficial'})),
- ci(single,levelHerbariumBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${herbariumBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[19].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelHerbariumBeneficial)})),
- list(in:herbariumBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[19].beneficials_name_two),
- lo(3,visible:${notEmpty(levelHerbariumBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${herbariumBeneficialTwo!='Please select beneficial'})),
- ci(single,levelHerbariumBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${herbariumBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[19].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // False Codling Moth
- lFalseCodlingMoth:lbl(${res("False_codling_moth")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsFalseCodlingMoth'},dTemp),
- set(.lblName,${'lFalseCodlingMoth'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,falseCodlingMoth,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[20].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:falseCodlingMothSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[20].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:falseCpdlingMothBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[20].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${falseCpdlingMothBeneficial!='Please select beneficial'})),
- ci(single,levelFalseCpdlingMothBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${falseCpdlingMothBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[20].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelFalseCpdlingMothBeneficial)})),
- list(in:falseCpdlingMothBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[20].beneficials_name_two),
- lo(3,visible:${notEmpty(levelFalseCpdlingMothBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${falseCpdlingMothBeneficialTwo!='Please select beneficial'})),
- ci(single,levelFalseCpdlingMothBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${falseCpdlingMothBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[20].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Pythium
- lPythium:lbl(${res("Pythium")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsPythium'},dTemp),
- set(.lblName,${'lPythium'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,pythium,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[21].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),lbl(#Pest_spread,lo(2)),
- list(in:pythiumSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[21].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:pythiumBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[21].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${pythiumBeneficial!='Please select beneficial'})),
- ci(single,levelPythiumBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${pythiumBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[21].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelPythiumBeneficial)})),
- list(in:pythiumBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[21].beneficials_name_two),
- lo(3,visible:${notEmpty(levelPythiumBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${pythiumBeneficialTwo!='Please select beneficial'})),
- ci(single,levelPythiumBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${pythiumBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[21].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Ovulariopsis
- lOvulariopsis:lbl(${res("Ovulariopsis")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsOvulariopsis'},dTemp),
- set(.lblName,${'lOvulariopsis'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,ovulariopsis,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[22].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:ovulariopsisSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[22].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:ovulariopsisBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[22].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${ovulariopsisBeneficial!='Please select beneficial'})),
- ci(single,levelOvulariopsisBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${ovulariopsisBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[22].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelOvulariopsisBeneficial)})),
- list(in:ovulariopsisBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[22].beneficials_name_two),
- lo(3,visible:${notEmpty(levelOvulariopsisBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${ovulariopsisBeneficialTwo!='Please select beneficial'})),
- ci(single,levelOvulariopsisBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${ovulariopsisBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[22].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Cottony rot
- lCottonyRot:lbl(${res("Cottony_rot")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsCottonyRot'},dTemp),
- set(.lblName,${'lCottonyRot'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,cottonyRot,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[23].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:cottonyRotSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[23].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:cottonyRotBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[23].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${cottonyRotBeneficial!='Please select beneficial'})),
- ci(single,levelCottonyRotBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${cottonyRotBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[23].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelCottonyRotBeneficial)})),
- list(in:cottonyRotBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[23].beneficials_name_two),
- lo(3,visible:${notEmpty(levelCottonyRotBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${cottonyRotBeneficialTwo!='Please select beneficial'})),
- ci(single,levelCottonyRotBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${cottonyRotBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[23].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Tobacco thrips
- lTobaccoThrips:lbl(${res("Tobacco_thrips")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsTobaccoThrips'},dTemp),
- set(.lblName,${'lTobaccoThrips'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,tobaccoThrips,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[24].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:tobaccoThripsSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[24].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:tobaccoThripsBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[24].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${tobaccoThripsBeneficial!='Please select beneficial'})),
- ci(single,levelTobaccoThripsBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${tobaccoThripsBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[24].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelTobaccoThripsBeneficial)})),
- list(in:tobaccoThripsBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[24].beneficials_name_two),
- lo(3,visible:${notEmpty(levelTobaccoThripsBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${tobaccoThripsBeneficialTwo!='Please select beneficial'})),
- ci(single,levelTobaccoThripsBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${tobaccoThripsBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[24].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Western flower thrips
- lWesternFlowerThrips:lbl(${res("Western_flower_thrips")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsWesternFlowerThrips'},dTemp),
- set(.lblName,${'lWesternFlowerThrips'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,westernFlowerThrips,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[25].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:westernFlowerThripsSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[25].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:westernFlowerThripsBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[25].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${westernFlowerThripsBeneficial!='Please select beneficial'})),
- ci(single,levelWesternFlowerThripsBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${westernFlowerThripsBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[25].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelWesternFlowerThripsBeneficial)})),
- list(in:westernFlowerThripsBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[25].beneficials_name_two),
- lo(3,visible:${notEmpty(levelWesternFlowerThripsBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${westernFlowerThripsBeneficialTwo!='Please select beneficial'})),
- ci(single,levelWesternFlowerThripsBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${westernFlowerThripsBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[25].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Chilli thrips
- lChilliThrips:lbl(${res("Chilli_thrips")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsChilliThrips'},dTemp),
- set(.lblName,${'lChilliThrips'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,chilliThrips,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[26].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:chilliThripsSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[26].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:chilliThripsBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[26].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${chilliThripsBeneficial!='Please select beneficial'})),
- ci(single,levelChilliThripsBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${chilliThripsBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[26].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelChilliThripsBeneficial)})),
- list(in:chilliThripsBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[26].beneficials_name_two),
- lo(3,visible:${notEmpty(levelChilliThripsBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${chilliThripsBeneficialTwo!='Please select beneficial'})),
- ci(single,levelChilliThripsBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${chilliThripsBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[26].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // No pests
- lNoPests:lbl(${res("No_pests")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsNoPests'},dTemp),
- set(.lblName,${'lNoPests'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,noPests,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[27].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:noPestsSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[27].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:noPestsBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[27].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${noPestsBeneficial!='Please select beneficial'})),
- ci(single,levelNoPestsBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${noPestsBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[27].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelNoPestsBeneficial)})),
- list(in:noPestsBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[27].beneficials_name_two),
- lo(3,visible:${notEmpty(levelNoPestsBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${noPestsBeneficialTwo!='Please select beneficial'})),
- ci(single,levelNoPestsBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${noPestsBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[27].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- // Other
- lOther:lbl(${res("Other")},lo(4,m(1,0,0,0),style:caption)),
- btn(img:ic_note_add,lo(1,m(1,0,0,0),style:caption),call(na,rvr:no,block(
- set(.dsetName,${'dsOther'},dTemp),
- set(.lblName,${'lOther'},dTemp),
- goto(scr,.def.sCFormCustomNotesAndPhotosScreenPestBeneficialsNew)))),
- ci(single,other,no,cols:5, lo(1, m(4, 40, 0, 0)),
- dpath(dTemp, .pests\:dlist/dset[28].level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Pest_spread,lo(2)),
- list(in:otherSpread,req:false,data:ldPestSpread,sort:no,
- dpath(dTemp,.pests\:dlist/dset[28].spread),
- lo(3)
- ),
- lbl(#Select_Beneficial,lo(2)),
- list(in:otherBeneficial,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[28].beneficials_name),
- lo(3)
- ),
- lbl(#Beneficial_levels,lo(2,visible:${otherBeneficial!='Please select beneficial'})),
- ci(single,levelOtherBeneficial,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${otherBeneficial!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[28].beneficials_level),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- lbl(#Select_Beneficial,lo(2,visible:${notEmpty(levelOtherBeneficial)})),
- list(in:otherBeneficialTwo,req:false,data:ldBeneficials,sort:no,
- dpath(dTemp,.pests\:dlist/dset[28].beneficials_name_two),
- lo(3,visible:${notEmpty(levelOtherBeneficial)})
- ),
- lbl(#Beneficial_levels,lo(2,visible:${otherBeneficialTwo!='Please select beneficial'})),
- ci(single,levelOtherBeneficialTwo,no,cols:5, lo(1, m(4, 40, 0, 0),visible:${otherBeneficialTwo!='Please select beneficial'}),
- dpath(dTemp, .pests\:dlist/dset[28].beneficials_level_two),
- opt(1, '1 '),
- opt(2, '2 '),
- opt(3, '3 '),
- opt(4, '4 '),
- opt(5, '5')),
- btn(#Review_report_before_sending,aln:center,pim:yes,lo(5,m(15,20,8,20)),call(na,block(
- if(${qpc('.pests/dset.level','dTemp')<=0&&qpc('.beneficials/dset.level','dTemp')<=0},block(
- alert(warn, #Please_report_at_least_one_pest_or_beneficial),
- end()
- )),
- //.Setting.Pests.Names.English
- if(${userLanguage=="en"}, block(
- set(.pests\:dlist/dset[0].name, ${"Carmine spider mite"}, dTemp),
- set(.pests\:dlist/dset[1].name, ${"Broad mite"}, dTemp),
- set(.pests\:dlist/dset[2].name, ${"Gray mould"}, dTemp),
- set(.pests\:dlist/dset[3].name, ${"TSWV"}, dTemp),
- set(.pests\:dlist/dset[4].name, ${"PYLCV"}, dTemp),
- set(.pests\:dlist/dset[5].name, ${"Fruit fly"}, dTemp),
- set(.pests\:dlist/dset[6].name, ${"Mediterranean fruit fly"}, dTemp),
- set(.pests\:dlist/dset[7].name, ${"Moth caterpillar"}, dTemp),
- set(.pests\:dlist/dset[8].name, ${"Chilli gall midge"}, dTemp),
- set(.pests\:dlist/dset[9].name, ${"Aphid"}, dTemp),
- set(.pests\:dlist/dset[10].name, ${"Green peach aphid"}, dTemp),
- set(.pests\:dlist/dset[11].name, ${"Melon and cotton aphid"}, dTemp),
- set(.pests\:dlist/dset[12].name, ${"Black bean aphid"}, dTemp),
- set(.pests\:dlist/dset[13].name, ${"Tobacco aphid"}, dTemp),
- set(.pests\:dlist/dset[14].name, ${"Tobacco whitefly"}, dTemp),
- set(.pests\:dlist/dset[15].name, ${"Solanum mealybug"}, dTemp),
- set(.pests\:dlist/dset[16].name, ${"Cotton mealybug"}, dTemp),
- set(.pests\:dlist/dset[17].name, ${"Cotton root-knot nematode"}, dTemp),
- set(.pests\:dlist/dset[18].name, ${"Ants"}, dTemp),
- set(.pests\:dlist/dset[19].name, ${"Herbarium"}, dTemp),
- set(.pests\:dlist/dset[20].name, ${"False codling moth"}, dTemp),
- set(.pests\:dlist/dset[21].name, ${"Pythium"}, dTemp),
- set(.pests\:dlist/dset[22].name, ${"Ovulariopsis"}, dTemp),
- set(.pests\:dlist/dset[23].name, ${"Cottony rot"}, dTemp),
- set(.pests\:dlist/dset[24].name, ${"Tobacco thrips"}, dTemp),
- set(.pests\:dlist/dset[25].name, ${"Western flower thrips"}, dTemp),
- set(.pests\:dlist/dset[26].name, ${"Chilli thrips"}, dTemp),
- set(.pests\:dlist/dset[27].name, ${"No pests"}, dTemp),
- set(.pests\:dlist/dset[28].name, ${"Other"}, dTemp)
- ),
- //.Setting.Pests.Names.Hebrew
- else:block(
- set(.pests\:dlist/dset[0].name, ${"אקרית אדומה"}, dTemp),
- set(.pests\:dlist/dset[1].name, ${"אקרית עיוותים"}, dTemp),
- set(.pests\:dlist/dset[2].name, ${"בוטריטיס"}, dTemp),
- set(.pests\:dlist/dset[3].name, ${"וירוס TSWV"}, dTemp),
- set(.pests\:dlist/dset[4].name, ${"וירוס PYLCV"}, dTemp),
- set(.pests\:dlist/dset[5].name, ${"זבובי פירות"}, dTemp),
- set(.pests\:dlist/dset[6].name, ${"זבוב פירות ים תיכוני"}, dTemp),
- set(.pests\:dlist/dset[7].name, ${"זחלי עשים"}, dTemp),
- set(.pests\:dlist/dset[8].name, ${"יתוץ החרוב"}, dTemp),
- set(.pests\:dlist/dset[9].name, ${"כנימות עלה"}, dTemp),
- set(.pests\:dlist/dset[10].name, ${"כנימת עלה אפרסק"}, dTemp),
- set(.pests\:dlist/dset[11].name, ${"כנימת עלה דלועים"}, dTemp),
- set(.pests\:dlist/dset[12].name, ${"כנימות עלה הפול"}, dTemp),
- set(.pests\:dlist/dset[13].name, ${"כנימות עלה ניקוטיאנה"}, dTemp),
- set(.pests\:dlist/dset[14].name, ${"כנימת עש הטבק"}, dTemp),
- set(.pests\:dlist/dset[15].name, ${"כנימה קמחית הסולנית"}, dTemp),
- set(.pests\:dlist/dset[16].name, ${"כנימה קמחית מנוקדת"}, dTemp),
- set(.pests\:dlist/dset[17].name, ${"נמטודות"}, dTemp),
- set(.pests\:dlist/dset[18].name, ${"נמלים"}, dTemp),
- set(.pests\:dlist/dset[19].name, ${"עשבייה"}, dTemp),
- set(.pests\:dlist/dset[20].name, ${"עש התפוח המדומה"}, dTemp),
- set(.pests\:dlist/dset[21].name, ${"פתיום (מקמקת)"}, dTemp),
- set(.pests\:dlist/dset[22].name, ${"קמחונית"}, dTemp),
- set(.pests\:dlist/dset[23].name, ${"קשיוניה גדולה"}, dTemp),
- set(.pests\:dlist/dset[24].name, ${"תריפס הטבק"}, dTemp),
- set(.pests\:dlist/dset[25].name, ${"תריפס קליפורני"}, dTemp),
- set(.pests\:dlist/dset[26].name, ${"תריפס קיקיון"}, dTemp),
- set(.pests\:dlist/dset[27].name, ${"לא נמצאו מזיקים"}, dTemp),
- set(.pests\:dlist/dset[28].name, ${"אחר"}, dTemp)
- )),
- goto(scr,.def.sReviewReportBeforeSendingYadMordecaiNew)
- ))),
- btn(#Back,lo(5,m(2,20,1,20)), pim:yes, call(#Back,cancel())),
- back:call(#Back,
- cancel()
- )
- ),
- sCFormCustomNotesAndPhotosScreenPestBeneficialsNew:frm(#Aditional_info,55|40|40|60|40,
- init:block(
- set($dsetName,.dsetName,dTemp)
- ),
- lbl("",lo(5)),
- lbl("",lo(5)),
- btn(#Text_notes,lo(5,m(5,30,5,30)),aln:center,call(na,
- goto(scr,.def.sCFormNotesCustomNew,mode:dialog))
- ),
- btn(#Recommendations,lo(5,m(5,30,5,30)),aln:center,call(na,
- goto(scr,.def.sCFormRecommendationsYadMordechaiPestBeneficialsNew)
- )),
- btn(#Capture_photo,lo(5,m(5,30,5,30)),aln:center,call(na,
- rvr:no,sys(cmd:photo,rid:dTemp,path:${dsetName.':dset.photo_note'},max:100))
- ),
- btn(#Add_photo,lo(5,m(5,30,5,30)),aln:center,call(na,
- rvr:no,sys(cmd:gallery,rid:dTemp,path:${dsetName.':dset.photo_note'},max:100))
- ),
- btn(#Save,lo(5,m(5,20,5,20)),pim:yes,aln:center,call(na,block(
- back()
- ))),
- back:call(#Back,
- cancel()
- )
- ),
- sCFormRecommendationsYadMordechaiPestBeneficialsNew:frm(#Recommendations,58|58|58|58,
- init:block(
- set($dsetName,.dsetName,dTemp),
- set($crop, .crop,dDone)
- ),
- lbl(" ",lo(4)),
- // List of Recommendations for all crops
- list(in:recommendationsYad,req:yes,
- dpath(dTemp, .individual_recommendation),
- lo(4,visible:${containsNone(crop,'CR15G0')}),
- producer(listOptions,prm(prop:recommendation_pepper_rest))
- ),
- ti(otherRecommendationsYad, lo(4,visible:${recommendationsYad=='0.0'}), req:false, dpath(dTemp, .other_recommendation)),
- // List of Recommendations for Strawberies
- list(in:recommendationsYadStrawberries,req:yes,
- dpath(dTemp, .individual_recommendation_strawberries),
- lo(4,visible:${containsAny(crop,'CR15G0')}),
- producer(listOptions,prm(prop:recommendation_strawberries))
- ),
- ti(otherRecommendationsYadStrawberries, lo(4,visible:${recommendationsYadStrawberries=='0.0'}), req:false, dpath(dTemp, .other_recommendation_strawberries)),
- lbl(" ",lo(4)),
- btn(#Cancel,lo(2),call(na,block(
- cancel()
- ))),
- btn(#OK,lo(2),call(na,block(
- if(${containsNone(crop,'CR15G0')},
- set(${'.'.dsetName.':dset.individual_recommendation'},${if(recommendationsYad=='0.0',otherRecommendationsYad,lbl_recommendationsYad)},dTemp), //then
- set(${'.'.dsetName.':dset.individual_recommendation'},${if(recommendationsYadStrawberries=='0.0',otherRecommendationsYadStrawberries,lbl_recommendationsYadStrawberries)},dTemp) //else
- ),
- unset(.individual_recommendation, dTemp),
- unset(.other_recommendation, dTemp),
- unset(.other_recommendation_strawberries, dTemp),
- back()
- ))),
- back:call(#Back,
- cancel()
- )
- ),
- sCFormNotesCustomNew:frm(#Notes,58|58|58|58,
- init:block(
- set($dsetName,.dsetName,dTemp),
- set($crop, .crop,dDone)
- ),
- lbl(" ",lo(4)),
- // List of notes for all Cropps
- list(in:notesYad,req:yes,sort:no,
- dpath(dTemp, .list_notes),
- lo(4,visible:${containsNone(crop,'CR15G0')}),
- producer(listOptions,prm(prop:notes_pepper_rest))
- ),
- ti(otherNotesYad, lo(4,visible:${notesYad=='1.0'&&containsNone(crop,'CR15G0')}), req:false, dpath(dTemp, .custom_notes)),
- // List of notes for Strawberries
- list(in:notesYadStrawberries,req:yes,sort:no,
- dpath(dTemp, .list_notes_strawberries),
- lo(4,visible:${containsAny(crop,'CR15G0')}),
- producer(listOptions,prm(prop:notes_strawberries))
- ),
- ti(otherNotesYadStrawberries, lo(4,visible:${notesYadStrawberries=='1.0'&&containsAny(crop,'CR15G0')}), req:false, dpath(dTemp, .custom_notes_strawberries)),
- lbl(" ",lo(4)),
- btn(#Cancel,lo(2),call(na,block(
- cancel()
- ))),
- btn(#OK,lo(2),call(na,block(
- if(${containsNone(crop,'CR15G0')},
- set(${'.'.dsetName.':dset.notes'},${if(notesYad=='1.0',otherNotesYad,lbl_notesYad)},dTemp), //Then
- set(${'.'.dsetName.':dset.notes'},${if(notesYadStrawberries=='1.0',otherNotesYadStrawberries,lbl_notesYadStrawberries)},dTemp) //Else
- ),
- unset(.list_notes, dTemp),
- unset(.list_notes_strawberries, dTemp),
- unset(.custom_notes, dTemp),
- unset(.custom_notes_strawberries, dTemp),
- back()
- ))),
- back:call(#Back,
- cancel()
- )
- ),
- sReviewReportBeforeSendingYadMordecaiNew:frm(#Review_report, 58|58|58|58,
- init:block(
- set($pestCode, .pest, dDone),
- set($taskCode, .task, dDone),
- set($lc,.plot,dDone),
- set($plotCode,.plot,dDone)
- set($crop, .crop, dDone),
- set($growerCode,.gCode,dDone),
- set($growerName,${qps('.def.sRoot/mi[val==growerCode].lbl')})
- ),
- refresh:block(),
- captionBlank:style(
- style(spec:light,bg:FFfafafa),
- style(spec:dark,bg:FF000000)
- ),
- @ldPestSpread:ldata(
- li(Please Select Distribution,${res("Please_Select_Distribution")},ord:1),
- li(1. isolated cases,${res("Isolated_cases")}),
- li(2. a number of areas,${res("A_number_of_areas")}),
- li(3. mainly on the margins,${res("Mainly_on_the_margins")}),
- li(4. in the entire section,${res("In_the_entire_section")})
- ),
- // Headers
- lbl(${res('Plot').':'}, lo(2, m(5, 0, 0, 0), bg:FFc6d2d2)),
- lbl(${qp('.plotName', 'dTemp')}, aln:left, lo(2, m(5, 0, 0, 0), bg:FFc6d2d2)),
- lbl(${res('Grower').':'}, lo(2, style:captionGrey)),
- lbl(${def(growerName,res('n%2Fa'))}, aln:left, lo(2, style:captionGrey)),
- lbl(${res('Crop').':'}, lo(2, bg:FFc6d2d2)),
- lbl(${qp('.cropName', 'dTemp')}, aln:left, lo(2, bg:FFc6d2d2)),
- lbl(${res("Summary")}, aln:center, lo(4,m(1,0,0,0), style:group)),
- lbl(${res("Contamination_levels")}, aln:center, lo(4, style:caption)),
- prp(ivar:pest, lo(4), dpath(dTemp, .pests\:dlist/dset[pest]),
- cont:pnl(cols:120|35|35|45,
- lbl(${res('Pest_and_beneficial').'('.res('name_and_level').')'},lo(4,m(5,0,5,0),style:caption,visible:${notEmpty(qp('.pests\:dlist/dset[pest].level','dTemp'))})),
- lbl(${def(qp('.pests\:dlist/dset[pest].name','dTemp'), "n/a")}, lo(2,style:captionBlank, m(0,0,0,0), visible:${notEmpty(qp('.pests\:dlist/dset[pest].level','dTemp'))})),
- lbl(${def(qp('.pests\:dlist/dset[pest].level','dTemp'), "n/a")}, lo(2,style:captionBlank, m(0,0,0,0), visible:${notEmpty(qp('.pests\:dlist/dset[pest].level','dTemp'))})),
- lbl(#Pest_spread%3A,lo(2,style:captionBlank,m(0,0,0,0), visible:${notEmpty(qp('.pests\:dlist/dset[pest].level','dTemp'))&&qp('.pests\:dlist/dset[pest].spread','dTemp')!='Please Select Distribution'})),
- // lbl(${def(qp('.pests\:dlist/dset[pest].spread','dTemp'), "n/a")}, lo(2,style:captionBlank, m(0,0,0,0), visible:${notEmpty(qp('.pests\:dlist/dset[pest].level','dTemp'))&&qp('.pests\:dlist/dset[pest].spread','dTemp')!='Please Select Distribution'})),
- list(in:spreadList,req:yes,data:ldPestSpread,
- dpath(dTemp, .pests\:dlist/dset[pest].spread),
- lo(2, style:captionBlank, enabled:${false},visible:${notEmpty(qp('.pests\:dlist/dset[pest].level','dTemp'))&&qp('.pests\:dlist/dset[pest].spread','dTemp')!='Please Select Distribution'})
- ),
- list(in:beneficialOneName,req:yes,data:ldBeneficials,
- dpath(dTemp, .pests\:dlist/dset[pest].beneficials_name),
- lo(2, style:captionBlank, enabled:${false},visible:${notEmpty(qp('.pests\:dlist/dset[pest].beneficials_level','dTemp'))})
- ),
- lbl(${def(qp('.pests\:dlist/dset[pest].beneficials_level','dTemp'), "n/a")}, lo(2, style:captionBlank, m(0,0,0,0), visible:${notEmpty(qp('.pests\:dlist/dset[pest].beneficials_level','dTemp'))})),
- list(in:beneficialTwoName,req:yes,data:ldBeneficials,
- dpath(dTemp, .pests\:dlist/dset[pest].beneficials_name_two),
- lo(2, style:captionBlank, enabled:${false},visible:${notEmpty(qp('.pests\:dlist/dset[pest].beneficials_level_two','dTemp'))})
- ),
- lbl(${def(qp('.pests\:dlist/dset[pest].beneficials_level_two','dTemp'), "n/a")}, lo(2,style:captionBlank, m(0,0,0,0), visible:${notEmpty(qp('.pests\:dlist/dset[pest].beneficials_level_two','dTemp'))}))
- )
- ),
- lbl(${res("Reported_pests_and_beneficials").":"}, aln:center, lo(2,m(10,0,0,0), style:captionGrey)),
- lbl(${qpc('.pests\:dlist/dset.level','dTemp')." / (29)"}, aln:center, lo(2,m(10,0,0,0), style:captionGrey)),
- lbl(${""},lo(4)),
- auxinfo:producer(prm(tags:yes,photos:yes,notes:yes,dset:dsInspectionNotes)),
- btn(#Save,lo(4,m(5,20,5,20)),pim:yes,aln:center,call(na,block(
- //Carmine Spider Mite
- if(${notEmpty(qp('.pests\:dlist/dset[0].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[0].beneficials_level','dTemp'))}, block(
- set($beneficialLevelCarmineSpriderMite, ${qp('.pests\:dlist/dset[0].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[0].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelCarmineSpriderMite,dDone),
- set(.data,$beneficialLevelCarmineSpriderMite,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[0].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoCarmineSpiderMite, ${qp('.pests\:dlist/dset[0].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[0].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoCarmineSpiderMite,dDone),
- set(.data,$beneficialLevelTwoCarmineSpiderMite,dDone),
- store(dDone,no),
- )),
- set($carmineSpiderMite, ${qp('.pests\:dlist/dset[0].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT204GSI0I"},dDone),
- if(${notEmpty(beneficialLevelCarmineSpriderMite)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelCarmineSpriderMite},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoCarmineSpiderMite)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoCarmineSpiderMite},dDone)
- )),
- if(${notEmpty(qps(".dsCarmineSpiderMite:dset.individual_recommendation",'dTemp'))},
- set(.individual_recommendation,${qps(".dsCarmineSpiderMite:dset.individual_recommendation",'dTemp')},dDone)
- ),
- if(${qp('.pests\:dlist/dset[0].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[0].spread','dTemp')},dDone),
- )),
- set(.items,${carmineSpiderMite},dDone),
- set(.levels5,${carmineSpiderMite},dDone),
- set(.data,$carmineSpiderMite,dDone),
- set($dsetName,${"dsCarmineSpiderMite"}),
- proc(copyNotes1),
- store(dDone,no),
- proc(cleanNotes1)
- )),
- //Broad mite
- if(${notEmpty(qp('.pests\:dlist/dset[1].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[1].beneficials_level','dTemp'))}, block(
- set($beneficialLevelBroadMite, ${qp('.pests\:dlist/dset[1].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[1].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelBroadMite,dDone),
- set(.data,$beneficialLevelBroadMite,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[1].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoBroadMite, ${qp('.pests\:dlist/dset[1].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[1].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoBroadMite,dDone),
- set(.data,$beneficialLevelTwoBroadMite,dDone),
- store(dDone,no),
- )),
- set($broadMite, ${qp('.pests\:dlist/dset[1].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT2047I1I"},dDone),
- if(${notEmpty(beneficialLevelBroadMite)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelBroadMite},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoBroadMite)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoBroadMite},dDone),
- )),
- if(${qp('.pests\:dlist/dset[1].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[1].spread','dTemp')},dDone),
- )),
- set(.items,${broadMite},dDone),
- set(.levels5,${broadMite},dDone),
- set(.data,$broadMite,dDone),
- set($dsetName,${"dsBroadMite"}),
- if(${notEmpty(qps(".dsBroadMite:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsBroadMite:dset.individual_recommendation",'dTemp')},dDone)
- )),
- proc(copyNotes1),
- store(dDone,no),
- proc(cleanNotes1)
- )),
- //Gray mould
- if(${notEmpty(qp('.pests\:dlist/dset[2].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[2].beneficials_level','dTemp'))}, block(
- set($beneficialLevelGrayMould, ${qp('.pests\:dlist/dset[2].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[2].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelGrayMould,dDone),
- set(.data,$beneficialLevelGrayMould,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[2].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoGrayMould, ${qp('.pests\:dlist/dset[2].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[2].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoGrayMould,dDone),
- set(.data,$beneficialLevelTwoGrayMould,dDone),
- store(dDone,no),
- )),
- set($grayMould, ${qp('.pests\:dlist/dset[2].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT15G2I3I"},dDone),
- if(${notEmpty(beneficialLevelGrayMould)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelGrayMould},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoGrayMould)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoGrayMould},dDone),
- )),
- if(${qp('.pests\:dlist/dset[2].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[2].spread','dTemp')},dDone),
- )),
- set(.items,${grayMould},dDone),
- set(.levels5,${grayMould},dDone),
- set(.data,$grayMould,dDone),
- set($dsetName,${"dsGrayMould"}),
- if(${notEmpty(qps(".dsGrayMould:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsGrayMould:dset.individual_recommendation",'dTemp')},dDone)
- )),
- proc(copyNotes1),
- store(dDone,no),
- proc(cleanNotes1)
- )),
- //TSWV
- if(${notEmpty(qp('.pests\:dlist/dset[3].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[3].beneficials_level','dTemp'))}, block(
- set($beneficialLevelTSWV, ${qp('.pests\:dlist/dset[3].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[3].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelTSWV,dDone),
- set(.data,$beneficialLevelTSWV,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[3].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoTSWV, ${qp('.pests\:dlist/dset[3].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[3].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoTSWV,dDone),
- set(.data,$beneficialLevelTwoTSWV,dDone),
- store(dDone,no),
- )),
- set($tSWV, ${qp('.pests\:dlist/dset[3].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT15GAI0I"},dDone),
- if(${notEmpty(beneficialLevelTSWV)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelTSWV},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoTSWV)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoTSWV},dDone),
- )),
- if(${qp('.pests\:dlist/dset[3].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[3].spread','dTemp')},dDone),
- )),
- set(.items,${tSWV},dDone),
- set(.levels5,${tSWV},dDone),
- set(.data,$tSWV,dDone),
- set($dsetName,${"dsTSWV"}),
- if(${notEmpty(qps(".dsTSWV:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsTSWV:dset.individual_recommendation",'dTemp')},dDone)
- )),
- proc(copyNotes1),
- store(dDone,no),
- proc(cleanNotes1)
- )),
- //PYLCV
- if(${notEmpty(qp('.pests\:dlist/dset[4].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[4].beneficials_level','dTemp'))}, block(
- set($beneficialLevelPYLCV, ${qp('.pests\:dlist/dset[4].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[4].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelPYLCV,dDone),
- set(.data,$beneficialLevelPYLCV,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[4].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoPYLCV, ${qp('.pests\:dlist/dset[4].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[4].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoPYLCV,dDone),
- set(.data,$beneficialLevelTwoPYLCV,dDone),
- store(dDone,no),
- )),
- set($pYLCV, ${qp('.pests\:dlist/dset[4].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT15H6BI0I"},dDone),
- if(${notEmpty(beneficialLevelPYLCV)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone,dDone,dDone),
- set(.beneficial_one_level, ${beneficialLevelPYLCV},dDone,dDone,dDone),
- )),
- if(${notEmpty(beneficialLevelTwoPYLCV)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone,dDone,dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoPYLCV},dDone,dDone,dDone),
- )),
- if(${notEmpty(qps(".dsPYLCV:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsPYLCV:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[4].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[4].spread','dTemp')},dDone),
- )),
- set(.items,${pYLCV},dDone),
- set(.levels5,${pYLCV},dDone),
- set(.data,$pYLCV,dDone),
- set($dsetName,${"dsPYLCV"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Fruit fly
- if(${notEmpty(qp('.pests\:dlist/dset[5].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[5].beneficials_level','dTemp'))}, block(
- set($beneficialLevelFruitFly, ${qp('.pests\:dlist/dset[5].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[5].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelFruitFly,dDone),
- set(.data,$beneficialLevelFruitFly,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[5].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoFruitFly, ${qp('.pests\:dlist/dset[5].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[5].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoFruitFly,dDone),
- set(.data,$beneficialLevelTwoFruitFly,dDone),
- store(dDone,no),
- )),
- set($fruitFly, ${qp('.pests\:dlist/dset[5].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT2008I1I"},dDone),
- if(${notEmpty(beneficialLevelFruitFly)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone,dDone),
- set(.beneficial_one_level, ${beneficialLevelFruitFly},dDone,dDone),
- )),
- if(${notEmpty(beneficialLevelTwoFruitFly)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone,dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoFruitFly},dDone,dDone),
- )),
- if(${notEmpty(qps(".dsFruitFly:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsFruitFly:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[5].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[5].spread','dTemp')},dDone),
- )),
- set(.items,${fruitFly},dDone),
- set(.levels5,${fruitFly},dDone),
- set(.data,$fruitFly,dDone),
- set($dsetName,${"dsFruitFly"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Mediterranean fruit fly
- if(${notEmpty(qp('.pests\:dlist/dset[6].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[6].beneficials_level','dTemp'))}, block(
- set($beneficialLevelMediterraneanFruitFly, ${qp('.pests\:dlist/dset[6].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[6].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelMediterraneanFruitFly,dDone),
- set(.data,$beneficialLevelMediterraneanFruitFly,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[6].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoMediterraneanFruitFly, ${qp('.pests\:dlist/dset[6].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[6].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoMediterraneanFruitFly,dDone),
- set(.data,$beneficialLevelTwoMediterraneanFruitFly,dDone),
- store(dDone,no),
- )),
- set($mediterraneanFruitFly, ${qp('.pests\:dlist/dset[6].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT2001I5I0I"},dDone),
- if(${notEmpty(beneficialLevelMediterraneanFruitFly)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelMediterraneanFruitFly},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoMediterraneanFruitFly)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoMediterraneanFruitFly},dDone),
- )),
- if(${notEmpty(qps(".dsMediterraneanFruitFly:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsMediterraneanFruitFly:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[6].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[6].spread','dTemp')},dDone),
- )),
- set(.items,${mediterraneanFruitFly},dDone),
- set(.levels5,${mediterraneanFruitFly},dDone),
- set(.data,$mediterraneanFruitFly,dDone),
- set($dsetName,${"dsMediterraneanFruitFly"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Moth caterpillar
- if(${notEmpty(qp('.pests\:dlist/dset[7].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[7].beneficials_level','dTemp'))}, block(
- set($beneficialLevelMothCaterpillar, ${qp('.pests\:dlist/dset[7].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[7].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelMothCaterpillar,dDone),
- set(.data,$beneficialLevelMothCaterpillar,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[7].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoMothCaterpillar, ${qp('.pests\:dlist/dset[7].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[7].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoMothCaterpillar,dDone),
- set(.data,$beneficialLevelTwoMothCaterpillar,dDone),
- store(dDone,no),
- )),
- set($mothCaterpillar, ${qp('.pests\:dlist/dset[7].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT205I2I0I"},dDone),
- if(${notEmpty(beneficialLevelMothCaterpillar)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelMothCaterpillar},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoMothCaterpillar)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoMothCaterpillar},dDone),
- )),
- if(${notEmpty(qps(".dsMothCaterpillar:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsMothCaterpillar:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[7].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[7].spread','dTemp')},dDone),
- )),
- set(.items,${mothCaterpillar},dDone),
- set(.levels5,${mothCaterpillar},dDone),
- set(.data,$mothCaterpillar,dDone),
- set($dsetName,${"dsMothCaterpillar"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Chilli gall midge
- if(${notEmpty(qp('.pests\:dlist/dset[8].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[8].beneficials_level','dTemp'))}, block(
- set($beneficialLevelChilliGallMidge, ${qp('.pests\:dlist/dset[8].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[8].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelChilliGallMidge,dDone),
- set(.data,$beneficialLevelChilliGallMidge,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[8].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoChilliGallMidge, ${qp('.pests\:dlist/dset[8].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[8].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoChilliGallMidge,dDone),
- set(.data,$beneficialLevelTwoChilliGallMidge,dDone),
- store(dDone,no),
- )),
- set($chilliGallMidge, ${qp('.pests\:dlist/dset[8].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT201GTI0I"},dDone),
- if(${notEmpty(beneficialLevelChilliGallMidge)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone,dDone,dDone,dDone,dDone),
- set(.beneficial_one_level, ${beneficialLevelChilliGallMidge},dDone,dDone,dDone,dDone,dDone),
- )),
- if(${notEmpty(beneficialLevelTwoChilliGallMidge)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone,dDone,dDone,dDone,dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoChilliGallMidge},dDone,dDone,dDone,dDone,dDone),
- )),
- if(${notEmpty(qps(".dsChilliGallMidge:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsChilliGallMidge:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[8].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[8].spread','dTemp')},dDone),
- )),
- set(.items,${chilliGallMidge},dDone),
- set(.levels5,${chilliGallMidge},dDone),
- set(.data,$chilliGallMidge,dDone),
- set($dsetName,${"dsChilliGallMidge"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Aphid
- if(${notEmpty(qp('.pests\:dlist/dset[9].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[9].beneficials_level','dTemp'))}, block(
- set($beneficialLevelAphid, ${qp('.pests\:dlist/dset[9].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[9].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelAphid,dDone),
- set(.data,$beneficialLevelAphid,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[9].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoAphid, ${qp('.pests\:dlist/dset[9].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[9].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoAphid,dDone),
- set(.data,$beneficialLevelTwoAphid,dDone),
- store(dDone,no),
- )),
- set($aphid, ${qp('.pests\:dlist/dset[9].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT135IBI"},dDone),
- if(${notEmpty(beneficialLevelAphid)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone,dDone,dDone,dDone),
- set(.beneficial_one_level, ${beneficialLevelAphid},dDone,dDone,dDone,dDone),
- )),
- if(${notEmpty(beneficialLevelTwoAphid)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone,dDone,dDone,dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoAphid},dDone,dDone,dDone,dDone),
- )),
- if(${notEmpty(qps(".dsAphid:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsAphid:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[9].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[9].spread','dTemp')},dDone),
- )),
- set(.items,${aphid},dDone),
- set(.levels5,${aphid},dDone),
- set(.data,$aphid,dDone),
- set($dsetName,${"dsAphid"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Green peach aphid
- if(${notEmpty(qp('.pests\:dlist/dset[10].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[10].beneficials_level','dTemp'))}, block(
- set($beneficialLevelGreenPeachAphid, ${qp('.pests\:dlist/dset[10].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[10].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelGreenPeachAphid,dDone),
- set(.data,$beneficialLevelGreenPeachAphid,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[10].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoGreenPeachAphid, ${qp('.pests\:dlist/dset[10].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[10].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoGreenPeachAphid,dDone),
- set(.data,$beneficialLevelTwoGreenPeachAphid,dDone),
- store(dDone,no),
- )),
- set($greenPeachAphid, ${qp('.pests\:dlist/dset[10].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT13G7I2I"},dDone),
- if(${notEmpty(beneficialLevelGreenPeachAphid)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone,dDone,dDone),
- set(.beneficial_one_level, ${beneficialLevelGreenPeachAphid},dDone,dDone,dDone),
- )),
- if(${notEmpty(beneficialLevelTwoGreenPeachAphid)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone,dDone,dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoGreenPeachAphid},dDone,dDone,dDone),
- )),
- if(${notEmpty(qps(".dsGreenPeachAphid:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsGreenPeachAphid:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[10].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[10].spread','dTemp')},dDone),
- )),
- set(.items,${greenPeachAphid},dDone),
- set(.levels5,${greenPeachAphid},dDone),
- set(.data,$greenPeachAphid,dDone),
- set($dsetName,${"dsGreenPeachAphid"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Melon and cotton aphid
- if(${notEmpty(qp('.pests\:dlist/dset[11].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[11].beneficials_level','dTemp'))}, block(
- set($beneficialLevelMelonAndCottonAphid, ${qp('.pests\:dlist/dset[11].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[11].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelMelonAndCottonAphid,dDone),
- set(.data,$beneficialLevelMelonAndCottonAphid,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[11].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoMelonAndCottonAphid, ${qp('.pests\:dlist/dset[11].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[11].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoMelonAndCottonAphid,dDone),
- set(.data,$beneficialLevelTwoMelonAndCottonAphid,dDone),
- store(dDone,no),
- )),
- set($melonAndCottonAphid, ${qp('.pests\:dlist/dset[11].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT13HHI0I"},dDone),
- if(${notEmpty(beneficialLevelMelonAndCottonAphid)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone,dDone),
- set(.beneficial_one_level, ${beneficialLevelMelonAndCottonAphid},dDone,dDone),
- )),
- if(${notEmpty(beneficialLevelTwoMelonAndCottonAphid)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone,dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoMelonAndCottonAphid},dDone,dDone),
- )),
- if(${notEmpty(qps(".dsMelonAndCottonAphid:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsMelonAndCottonAphid:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[11].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[11].spread','dTemp')},dDone),
- )),
- set(.items,${melonAndCottonAphid},dDone),
- set(.levels5,${melonAndCottonAphid},dDone),
- set(.data,$melonAndCottonAphid,dDone),
- set($dsetName,${"dsMelonAndCottonAphid"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Black bean aphid
- if(${notEmpty(qp('.pests\:dlist/dset[12].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[12].beneficials_level','dTemp'))}, block(
- set($beneficialLevelBlackBeanAphid, ${qp('.pests\:dlist/dset[12].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[12].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelBlackBeanAphid,dDone),
- set(.data,$beneficialLevelBlackBeanAphid,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[12].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoBlackBeanAphid, ${qp('.pests\:dlist/dset[12].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[12].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoBlackBeanAphid,dDone),
- set(.data,$beneficialLevelTwoBlackBeanAphid,dDone),
- store(dDone,no),
- )),
- set($blackBeanAphid, ${qp('.pests\:dlist/dset[12].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT135AI0I"},dDone),
- if(${notEmpty(beneficialLevelBlackBeanAphid)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelBlackBeanAphid},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoBlackBeanAphid)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoBlackBeanAphid},dDone),
- )),
- if(${notEmpty(qps(".dsBlackBeanAphid:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsBlackBeanAphid:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[12].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[12].spread','dTemp')},dDone),
- )),
- set(.items,${blackBeanAphid},dDone),
- set(.levels5,${blackBeanAphid},dDone),
- set(.data,$blackBeanAphid,dDone),
- set($dsetName,${"dsBlackBeanAphid"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Tobacco Aphid
- if(${notEmpty(qp('.pests\:dlist/dset[13].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[13].beneficials_level','dTemp'))}, block(
- set($beneficialLevelTobaccoAphid, ${qp('.pests\:dlist/dset[13].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[13].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelTobaccoAphid,dDone),
- set(.data,$beneficialLevelTobaccoAphid,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[13].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoTobaccoAphid, ${qp('.pests\:dlist/dset[13].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[13].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoTobaccoAphid,dDone),
- set(.data,$beneficialLevelTwoTobaccoAphid,dDone),
- store(dDone,no),
- )),
- set($tobaccoAphid, ${qp('.pests\:dlist/dset[13].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT13J0I0I"},dDone),
- if(${notEmpty(beneficialLevelTobaccoAphid)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelTobaccoAphid},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoTobaccoAphid)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoTobaccoAphid},dDone),
- )),
- if(${notEmpty(qps(".dsTobaccoAphid:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsTobaccoAphid:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[13].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[13].spread','dTemp')},dDone),
- )),
- set(.items,${tobaccoAphid},dDone),
- set(.levels5,${tobaccoAphid},dDone),
- set(.data,$tobaccoAphid,dDone),
- set($dsetName,${"dsTobaccoAphid"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Tobacco whitefly
- if(${notEmpty(qp('.pests\:dlist/dset[14].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[14].beneficials_level','dTemp'))}, block(
- set($beneficialLevelTobaccoWhitefly, ${qp('.pests\:dlist/dset[14].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[14].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelTobaccoWhitefly,dDone),
- set(.data,$beneficialLevelTobaccoWhitefly,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[14].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoTobaccoWhitefly, ${qp('.pests\:dlist/dset[14].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[14].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoTobaccoWhitefly,dDone),
- set(.data,$beneficialLevelTwoTobaccoWhitefly,dDone),
- store(dDone,no),
- )),
- set($tobaccoWhitefly, ${qp('.pests\:dlist/dset[14].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT217G1I0I1I"},dDone),
- if(${notEmpty(beneficialLevelTobaccoWhitefly)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelTobaccoWhitefly},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoTobaccoWhitefly)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoTobaccoWhitefly},dDone),
- )),
- if(${notEmpty(qps(".dsTobaccoWhitefly:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsTobaccoWhitefly:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[14].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[14].spread','dTemp')},dDone),
- )),
- set(.items,${tobaccoWhitefly},dDone),
- set(.levels5,${tobaccoWhitefly},dDone),
- set(.data,$tobaccoWhitefly,dDone),
- set($dsetName,${"dsTobaccoWhitefly"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Solanum mealybug
- if(${notEmpty(qp('.pests\:dlist/dset[15].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[15].beneficials_level','dTemp'))}, block(
- set($beneficialLevelSolanumMealybug, ${qp('.pests\:dlist/dset[15].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[15].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelSolanumMealybug,dDone),
- set(.data,$beneficialLevelSolanumMealybug,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[15].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoSolanumMealybug, ${qp('.pests\:dlist/dset[15].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[15].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoSolanumMealybug,dDone),
- set(.data,$beneficialLevelTwoSolanumMealybug,dDone),
- store(dDone,no),
- )),
- set($solanumMealybug, ${qp('.pests\:dlist/dset[15].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT13HXI0I"},dDone),
- if(${notEmpty(beneficialLevelSolanumMealybug)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelSolanumMealybug},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoSolanumMealybug)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoSolanumMealybug},dDone),
- )),
- if(${notEmpty(qps(".dsSolanumMealybug:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsSolanumMealybug:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[15].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[15].spread','dTemp')},dDone),
- )),
- set(.items,${solanumMealybug},dDone),
- set(.levels5,${solanumMealybug},dDone),
- set(.data,$solanumMealybug,dDone),
- set($dsetName,${"dsSolanumMealybug"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Cotton mealybug
- if(${notEmpty(qp('.pests\:dlist/dset[16].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[16].beneficials_level','dTemp'))}, block(
- set($beneficialLevelCottonMealybug, ${qp('.pests\:dlist/dset[16].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[16].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelCottonMealybug,dDone),
- set(.data,$beneficialLevelCottonMealybug,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[16].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoCottonMealybug, ${qp('.pests\:dlist/dset[16].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[16].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoCottonMealybug,dDone),
- set(.data,$beneficialLevelTwoCottonMealybug,dDone),
- store(dDone,no),
- )),
- set($cottonMealybug, ${qp('.pests\:dlist/dset[16].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT13J1I0I"},dDone),
- if(${notEmpty(beneficialLevelCottonMealybug)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelCottonMealybug},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoCottonMealybug)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoCottonMealybug},dDone),
- )),
- if(${notEmpty(qps(".dsCottonMealybug:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsCottonMealybug:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[16].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[16].spread','dTemp')},dDone),
- )),
- set(.items,${cottonMealybug},dDone),
- set(.levels5,${cottonMealybug},dDone),
- set(.data,$cottonMealybug,dDone),
- set($dsetName,${"dsCottonMealybug"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Cotton root-knot nematode
- if(${notEmpty(qp('.pests\:dlist/dset[17].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[17].beneficials_level','dTemp'))}, block(
- set($beneficialLevelCottonRootKnotNematode, ${qp('.pests\:dlist/dset[17].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[17].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelCottonRootKnotNematode,dDone),
- set(.data,$beneficialLevelCottonRootKnotNematode,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[17].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoCottonRootKnotNematode, ${qp('.pests\:dlist/dset[17].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[17].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoCottonRootKnotNematode,dDone),
- set(.data,$beneficialLevelTwoCottonRootKnotNematode,dDone),
- store(dDone,no),
- )),
- set($cottonRootKnotNematode, ${qp('.pests\:dlist/dset[17].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT20162I1I"},dDone),
- if(${notEmpty(beneficialLevelCottonRootKnotNematode)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelCottonRootKnotNematode},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoCottonRootKnotNematode)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoCottonRootKnotNematode},dDone),
- )),
- if(${notEmpty(qps(".dsCottonRootKnotNematode:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsCottonRootKnotNematode:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[17].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[17].spread','dTemp')},dDone),
- )),
- set(.items,${cottonRootKnotNematode},dDone),
- set(.levels5,${cottonRootKnotNematode},dDone),
- set(.data,$cottonRootKnotNematode,dDone),
- set($dsetName,${"dsCottonRootKnotNematode"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Ants
- if(${notEmpty(qp('.pests\:dlist/dset[18].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[18].beneficials_level','dTemp'))}, block(
- set($beneficialLevelAnts, ${qp('.pests\:dlist/dset[18].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[18].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelAnts,dDone),
- set(.data,$beneficialLevelAnts,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[18].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoAnts, ${qp('.pests\:dlist/dset[18].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[18].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoAnts,dDone),
- set(.data,$beneficialLevelTwoAnts,dDone),
- store(dDone,no),
- )),
- set($ants, ${qp('.pests\:dlist/dset[18].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT2017I7I"},dDone),
- if(${notEmpty(beneficialLevelAnts)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelAnts},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoAnts)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoAnts},dDone),
- )),
- if(${notEmpty(qps(".dsAnts:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsAnts:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[18].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[18].spread','dTemp')},dDone),
- )),
- set(.items,${ants},dDone),
- set(.levels5,${ants},dDone),
- set(.data,$ants,dDone),
- set($dsetName,${"dsAnts"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Herbarium
- if(${notEmpty(qp('.pests\:dlist/dset[19].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[19].beneficials_level','dTemp'))}, block(
- set($beneficialLevelHerbarium, ${qp('.pests\:dlist/dset[19].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[19].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelHerbarium,dDone),
- set(.data,$beneficialLevelHerbarium,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[19].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoHerbarium, ${qp('.pests\:dlist/dset[19].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[19].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoHerbarium,dDone),
- set(.data,$beneficialLevelTwoHerbarium,dDone),
- store(dDone,no),
- )),
- set($herbarium, ${qp('.pests\:dlist/dset[19].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"ML207I7I0I"},dDone),
- if(${notEmpty(beneficialLevelHerbarium)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelHerbarium},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoHerbarium)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoHerbarium},dDone),
- )),
- if(${notEmpty(qps(".dsHerbarium:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsHerbarium:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[19].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[19].spread','dTemp')},dDone),
- )),
- set(.items,${herbarium},dDone),
- set(.levels5,${herbarium},dDone),
- set(.data,$herbarium,dDone),
- set($dsetName,${"dsHerbarium"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //False codling moth
- if(${notEmpty(qp('.pests\:dlist/dset[20].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[20].beneficials_level','dTemp'))}, block(
- set($beneficialLevelFalseCodlingMoth, ${qp('.pests\:dlist/dset[20].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[20].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelFalseCodlingMoth,dDone),
- set(.data,$beneficialLevelFalseCodlingMoth,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[20].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoFalseCodlingMoth, ${qp('.pests\:dlist/dset[20].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[20].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoFalseCodlingMoth,dDone),
- set(.data,$beneficialLevelTwoFalseCodlingMoth,dDone),
- store(dDone,no),
- )),
- set($falseCodlingMoth, ${qp('.pests\:dlist/dset[20].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT205G6I6I0I"},dDone),
- if(${notEmpty(beneficialLevelFalseCodlingMoth)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelFalseCodlingMoth},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoFalseCodlingMoth)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoFalseCodlingMoth},dDone),
- )),
- if(${notEmpty(qps(".dsFalseCodlingMoth:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsFalseCodlingMoth:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[20].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[20].spread','dTemp')},dDone),
- )),
- set(.items,${falseCodlingMoth},dDone),
- set(.levels5,${falseCodlingMoth},dDone),
- set(.data,$falseCodlingMoth,dDone),
- set($dsetName,${"dsFalseCodlingMoth"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Pythium
- if(${notEmpty(qp('.pests\:dlist/dset[21].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[21].beneficials_level','dTemp'))}, block(
- set($beneficialLevelPythium, ${qp('.pests\:dlist/dset[21].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[21].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelPythium,dDone),
- set(.data,$beneficialLevelPythium,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[21].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoPythium, ${qp('.pests\:dlist/dset[21].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[21].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoPythium,dDone),
- set(.data,$beneficialLevelTwoPythium,dDone),
- store(dDone,no),
- )),
- set($pythium, ${qp('.pests\:dlist/dset[21].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT1570I0I"},dDone),
- if(${notEmpty(beneficialLevelPythium)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelPythium},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoPythium)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoPythium},dDone),
- )),
- if(${notEmpty(qps(".dsPythium:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsPythium:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[21].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[21].spread','dTemp')},dDone),
- )),
- set(.items,${pythium},dDone),
- set(.levels5,${pythium},dDone),
- set(.data,$pythium,dDone),
- set($dsetName,${"dsPythium"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Ovulariopsis
- if(${notEmpty(qp('.pests\:dlist/dset[22].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[22].beneficials_level','dTemp'))}, block(
- set($beneficialLevelOvulariopsis, ${qp('.pests\:dlist/dset[22].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[22].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelOvulariopsis,dDone),
- set(.data,$beneficialLevelOvulariopsis,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[22].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoOvulariopsis, ${qp('.pests\:dlist/dset[22].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[22].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoOvulariopsis,dDone),
- set(.data,$beneficialLevelTwoOvulariopsis,dDone),
- store(dDone,no),
- )),
- set($ovulariopsis, ${qp('.pests\:dlist/dset[22].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT15L7I0I"},dDone),
- if(${notEmpty(beneficialLevelOvulariopsis)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelOvulariopsis},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoOvulariopsis)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoOvulariopsis},dDone),
- )),
- if(${notEmpty(qps(".dsOvulariopsis:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsOvulariopsis:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[22].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[22].spread','dTemp')},dDone),
- )),
- set(.items,${ovulariopsis},dDone),
- set(.levels5,${ovulariopsis},dDone),
- set(.data,$ovulariopsis,dDone),
- set($dsetName,${"dsOvulariopsis"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Cottony rot
- if(${notEmpty(qp('.pests\:dlist/dset[23].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[23].beneficials_level','dTemp'))}, block(
- set($beneficialLevelCottonyRot, ${qp('.pests\:dlist/dset[23].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[23].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelCottonyRot,dDone),
- set(.data,$beneficialLevelCottonyRot,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[23].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoCottonyRot, ${qp('.pests\:dlist/dset[23].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[23].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoCottonyRot,dDone),
- set(.data,$beneficialLevelTwoCottonyRot,dDone),
- store(dDone,no),
- )),
- set($cottonyRot, ${qp('.pests\:dlist/dset[23].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT15L8I0I"},dDone),
- if(${notEmpty(beneficialLevelCottonyRot)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelCottonyRot},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoCottonyRot)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoCottonyRot},dDone),
- )),
- if(${notEmpty(qps(".dsCottonyRot:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsCottonyRot:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[23].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[23].spread','dTemp')},dDone),
- )),
- set(.items,${cottonyRot},dDone),
- set(.levels5,${cottonyRot},dDone),
- set(.data,$cottonyRot,dDone),
- set($dsetName,${"dsCottonyRot"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Tobacco thrips
- if(${notEmpty(qp('.pests\:dlist/dset[24].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[24].beneficials_level','dTemp'))}, block(
- set($beneficialLevelTobaccoThrips, ${qp('.pests\:dlist/dset[24].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[24].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelTobaccoThrips,dDone),
- set(.data,$beneficialLevelTobaccoThrips,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[24].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoTobaccoThrips, ${qp('.pests\:dlist/dset[24].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[24].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoTobaccoThrips,dDone),
- set(.data,$beneficialLevelTwoTobaccoThrips,dDone),
- store(dDone,no),
- )),
- set($tobaccoThrips, ${qp('.pests\:dlist/dset[24].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT2102I1I"},dDone),
- if(${notEmpty(beneficialLevelTobaccoThrips)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelTobaccoThrips},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoTobaccoThrips)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoTobaccoThrips},dDone),
- )),
- if(${notEmpty(qps(".dsTobaccoThrips:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsTobaccoThrips:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[24].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[24].spread','dTemp')},dDone),
- )),
- set(.items,${tobaccoThrips},dDone),
- set(.levels5,${tobaccoThrips},dDone),
- set(.data,$tobaccoThrips,dDone),
- set($dsetName,${"dsTobaccoThrips"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Western flower thrips
- if(${notEmpty(qp('.pests\:dlist/dset[25].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[25].beneficials_level','dTemp'))}, block(
- set($beneficialLevelWesternFlowerThrips, ${qp('.pests\:dlist/dset[25].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[25].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelWesternFlowerThrips,dDone),
- set(.data,$beneficialLevelWesternFlowerThrips,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[25].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoWesternFlowerThrips, ${qp('.pests\:dlist/dset[25].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[25].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoWesternFlowerThrips,dDone),
- set(.data,$beneficialLevelTwoWesternFlowerThrips,dDone),
- store(dDone,no),
- )),
- set($westernFlowerThrips, ${qp('.pests\:dlist/dset[25].level','dTemp')}, dTemp),
- set(.task,${"TS100H3F"},dDone),
- set(.pest,${"PT2106I2I0I"},dDone),
- if(${notEmpty(beneficialLevelWesternFlowerThrips)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelWesternFlowerThrips},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoWesternFlowerThrips)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoWesternFlowerThrips},dDone),
- )),
- if(${notEmpty(qps(".dsWesternFlowerThrips:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsWesternFlowerThrips:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[25].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[25].spread','dTemp')},dDone),
- )),
- set(.items,${westernFlowerThrips},dDone),
- set(.levels5,${westernFlowerThrips},dDone),
- set(.data,$westernFlowerThrips,dDone),
- set($dsetName,${"dsWesternFlowerThrips"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Chilli thrips
- if(${notEmpty(qp('.pests\:dlist/dset[26].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[26].beneficials_level','dTemp'))}, block(
- set($beneficialLevelChilliThrips, ${qp('.pests\:dlist/dset[26].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[26].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelChilliThrips,dDone),
- set(.data,$beneficialLevelChilliThrips,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[26].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoChilliThrips, ${qp('.pests\:dlist/dset[26].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[26].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoChilliThrips,dDone),
- set(.data,$beneficialLevelTwoChilliThrips,dDone),
- store(dDone,no),
- )),
- set($chilliThrips, ${qp('.pests\:dlist/dset[26].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT2105I0I"},dDone),
- if(${notEmpty(beneficialLevelChilliThrips)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelChilliThrips},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoChilliThrips)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoChilliThrips},dDone),
- )),
- if(${notEmpty(qps(".dsChilliThrips:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsChilliThrips:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[26].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[26].spread','dTemp')},dDone),
- )),
- set(.items,${chilliThrips},dDone),
- set(.levels5,${chilliThrips},dDone),
- set(.data,$chilliThrips,dDone),
- set($dsetName,${"dsChilliThrips"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //No pests
- if(${notEmpty(qp('.pests\:dlist/dset[27].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[27].beneficials_level','dTemp'))}, block(
- set($beneficialLevelNoPests, ${qp('.pests\:dlist/dset[27].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[27].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelNoPests,dDone),
- set(.data,$beneficialLevelNoPests,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[27].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoNoPests, ${qp('.pests\:dlist/dset[27].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[27].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoNoPests,dDone),
- set(.data,$beneficialLevelTwoNoPests,dDone),
- store(dDone,no),
- )),
- set($noPests, ${qp('.pests\:dlist/dset[27].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PT225I1I"},dDone),
- if(${notEmpty(beneficialLevelNoPests)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone),
- set(.beneficial_one_level, ${beneficialLevelNoPests},dDone),
- )),
- if(${notEmpty(beneficialLevelTwoNoPests)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoNoPests},dDone),
- )),
- if(${notEmpty(qps(".dsNoPests:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsNoPests:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[27].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[27].spread','dTemp')},dDone),
- )),
- set(.items,${noPests},dDone),
- set(.levels5,${noPests},dDone),
- set(.data,$noPests,dDone),
- set($dsetName,${"dsNoPests"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- //Other
- if(${notEmpty(qp('.pests\:dlist/dset[28].level','dTemp'))}, block(
- if(${notEmpty(qp('.pests\:dlist/dset[28].beneficials_level','dTemp'))}, block(
- set($beneficialLevelOther, ${qp('.pests\:dlist/dset[28].beneficials_level','dTemp')},dTemp),
- set($beneficialPestCode, ${qp('.pests\:dlist/dset[28].beneficials_name','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCode},dDone),
- set(.levels5,$beneficialLevelOther,dDone),
- set(.data,$beneficialLevelOther,dDone),
- store(dDone,no),
- )),
- if(${notEmpty(qp('.pests\:dlist/dset[28].beneficials_level_two','dTemp'))}, block(
- set($beneficialLevelTwoOther, ${qp('.pests\:dlist/dset[28].beneficials_level_two','dTemp')},dTemp),
- set($beneficialPestCodeTwo, ${qp('.pests\:dlist/dset[28].beneficials_name_two','dTemp')},dTemp),
- set(.task,${"TS100H3D"},dDone),
- set(.pest,${beneficialPestCodeTwo},dDone),
- set(.levels5,$beneficialLevelTwoOther,dDone),
- set(.data,$beneficialLevelTwoOther,dDone),
- store(dDone,no),
- )),
- set($other, ${qp('.pests\:dlist/dset[28].level','dTemp')}, dTemp),
- set(.task,${"TS100H3C"},dDone),
- set(.pest,${"PTI13I"},dDone),
- if(${notEmpty(beneficialLevelOther)}, block(
- set(.beneficial_one, ${beneficialPestCode},dDone,dDone),
- set(.beneficial_one_level, ${beneficialLevelOther},dDone,dDone),
- )),
- if(${notEmpty(beneficialLevelTwoOther)}, block(
- set(.beneficial_two, ${beneficialPestCodeTwo},dDone,dDone),
- set(.beneficial_two_level, ${beneficialLevelTwoOther},dDone,dDone),
- )),
- if(${notEmpty(qps(".dsOther:dset.individual_recommendation",'dTemp'))}, block(
- set(.individual_recommendation,${qps(".dsOther:dset.individual_recommendation",'dTemp')},dDone)
- )),
- if(${qp('.pests\:dlist/dset[28].spread','dTemp')!='Please select beneficial'}, block(
- set(.pest_spread_yad, ${qp('.pests\:dlist/dset[28].spread','dTemp')},dDone),
- )),
- set(.items,${other},dDone),
- set(.levels5,${other},dDone),
- set(.data,$other,dDone),
- set($dsetName,${"dsOther"}),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- // Inspection Notes
- set($dsetName,${"dsInspectionNotes"}),
- if(${notEmpty(qp('.'.dsetName.':dset.notes', 'dTemp'))},block(
- set(.task,${"TS100J2"},dDone),// Input Method "Text"
- set(.pest,${"PT213IEI"},dDone),//Inspection Notes
- set(.data,${qp('.'.dsetName.':dset.notes','dTemp')},dDone),
- proc(copyNotes),
- store(dDone,no),
- proc(cleanNotes)
- )),
- set(.task,${taskCode},dDone),
- set(.pest,${pestCode},dDone),
- set(.data,${"yes"},dDone),
- store(dDone,yes),
- cancel(${qp('.pestPath','dTemp')})
- ))),
- btn(#Back,lo(4,m(2,20,1,20)), pim:yes, call(#Back,cancel())),
- back:call(#Back,
- cancel()
- )
- )
- )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement