Index: Prod/GAMeta/ItemPR.cls.xml
===================================================================
diff -u -r2589 -r17620
--- Prod/GAMeta/ItemPR.cls.xml	(.../ItemPR.cls.xml)	(revision 2589)
+++ Prod/GAMeta/ItemPR.cls.xml	(.../ItemPR.cls.xml)	(revision 17620)
@@ -248,12 +248,11 @@
 	If ..Parameters.IsDefined(ParamCheck) Do
 	. Set okPR=(''DItem.Eval(ParamCheck))
 	Else  Do
-	. ;Set okPR=(DItem.Get("PRNr")?2.6N)   Quit
 	. New PRNr
 	. Set PRNr=DItem.Get("PRNr")
 	. Set okPR=$$$PRExist
 	Quit:('okPR) okPR
-	; Else
+	
 	If ..Code="PR1DIM" Do   ; Check DimHF < PRLen
 	. New PRNr
 	. Set PRNr=DItem.Get("PRNr")