#BLOCK("WITH_FORM_ERROR",#FormError)
#IF(#FormError)
#IF(#FormErrors.Reason.MISSING_TO_ADDRESS )
{InputError}
{CanNotActivate_MissingToAddress} #ELSE
{InputError}
{PleaseCorrectErrors} #ENDIF
#REM #ENDREM #ELSE #IF(NOT #MailFrom)
{InsertSenderAddressFirst}
{GotoEmailSettings}
#REM #ENDREM #ENDIF #ENDIF
{EmailEvent}
{Subject}
{active}
#LOOP(#MAILTYPETEMPLATESADMIN(#Shop)) #LOCAL("DisplayFeature", #FeaturedActionAvailable(#Shop.Object, #Object)) #IF(#DisplayFeature NE "NotVisible") #IF(#IsForUnity) #LOCAL("_Error", #GET("FormErrorAlias.".#Alias))
#IF(#DisplayFeature EQ "NotAllowed")
#NameOrAlias
#Subject
#ELSE #IF(#FUNCTION("EXISTSCHILD", #Shop.Child.MailTypes.Object, #Alias)) #WITH(#FUNCTION("CHILD", #Shop.Child.MailTypes.Object, #Alias))
#MailTypeTemplate.NameOrAlias
#WITH(#MailTypeTemplate) #INCLUDE("INC-BubbleHelp") #ENDWITH
#Subject
#ENDWITH #ELSE
#NameOrAlias
#INCLUDE("INC-BubbleHelp")
#Subject
#ENDIF #ENDIF
#SET("Alternate", 1-#Alternate) #ENDLOCAL #ENDIF #ENDIF #ENDLOCAL #ENDLOOP
{Save}
#REM#ENDREM #ENDBLOCK