fn EExecY0 &KWD X Y Z U V Att Sg1 Sg2 Sg3 Sg4 Sg5 FM =
(     
	if (X==undefined) or (Y==undefined) or (Z==undefined) or (U==undefined) or (V==undefined) then return false

    	if ((X.OB=="P") and (Y.OB=="P") and (Z.OB=="P") and (U.OB=="P") and (V.OB=="P")) then
	(
		TOKwadr_Create &KWD X Y Z U V Att
		AddInc X KWD 
		AddInc Y KWD 
		AddInc Z KWD 
		AddInc U KWD 
		AddInc V KWD 
    	) else if (Att.Chk==1) then TOEmpty_Create &KWD Att

	return true
) -- EExecY0