#IF(NOT #Session.User OR #Session.User.IsAnonymous)

{Newsletter}

#ELSE

{MyAccount} {Newsletters}

#ENDIF
#IF(#FormError AND NOT #FormErrors.Form.Login.ErrorCount) #IF(#FormErrors.Reason.RequestManipulated)

{FatalError}

{RequestManipulated}
#ELSIF(#FormErrors.Reason.LoginForSubscribe)

{FatalError}

{LoginForSubscribe}
#ELSIF(#FormErrors.Reason.InvalidEMailFormat)

{InputError}

{FormatNotEMail}
#ELSIF(#FormErrors.Reason.NoCampaignSelected)

{SelectACampain}


#ELSE

{InputError}

{PleaseCorrectErrors}
#ENDIF
#ENDIF #LOCAL("RemoveInfo", 0) #IF(#CONFIRMATION_REQUEST_MAIL_SENT AND NOT #SEND_MAIL_FAILED)

{ConfirmNote}

{PleaseConfirmYourNewsletterAction}
#SET("RemoveInfo", 1) #ELSE #IF(#DEFINED(#LastAction) AND #LastAction EQ "Subscribe")

{SubscribeConfirmation}

{SubscribedForNewsletters}
#LOOP(#LastActionCampaigns)>> #NameOrAlias
#ENDLOOP
{StartPage}
#SET("RemoveInfo", 1) #ENDIF #IF(#DEFINED(#LastAction) AND #LastAction EQ "Unsubscribe")

{UnsubscribeConfirmation}

{UnsubscribedForNewsletters}
#LOOP(#LastActionCampaigns)>> #NameOrAlias
#ENDLOOP
{StartPage}

#SET("RemoveInfo", 1) #ENDIF #ENDIF #IF(#SEND_MAIL_FAILED)

{Notification}

{SEND_MAIL_FAILED}

#SET("RemoveInfo", 1) #ENDIF #IF(#Shop.NewsletterInfoText AND NOT #RemoveInfo)
#Shop.NewsletterInfoText[0]
#ENDIF #ENDLOCAL #IF(NOT #CONFIRMATION_REQUEST_MAIL_SENT AND NOT #LastAction)
#LOCAL("VisNewsletterCampaigns", #VisibleNewsletterCampaigns) #IF(NOT #COUNT(#VisNewsletterCampaigns))
{NoNewsletterCampaigns}
#ELSE #LOCAL("Alternate", 0) #LOOP(#VisNewsletterCampaigns) #LOCAL("LocalUnsubscribed", 2) #LOCAL("LocalAddressees",#Addressees) #IF(#DEFINED(#INPUT.EMail) AND #INPUT.EMail NE "") #LOCAL("Addressee",#GREP(#LocalAddressees,"EMail",#INPUT.EMail)) #LOOP(#Addressee)#SET("LocalUnsubscribed", #Unsubscribed)#ENDLOOP #ENDLOCAL #ELSE #LOCAL("Addressee",#GREP(#LocalAddressees,"EMail",#Session.User.EMail)) #LOOP(#Addressee)#SET("LocalUnsubscribed", #Unsubscribed)#ENDLOOP #ENDLOCAL #ENDIF #ENDLOCAL
#SET("Alternate", 1 - #Alternate)
#LOOP(#Shop.Languages) #IF(#DEFINED(#LangID) AND #DEFINED(#LanguageID) AND #LangID EQ #LanguageID) (#Native) #ENDIF #ENDLOOP

#IF(#LocalUnsubscribed EQ "1")   #ELSIF(#LocalUnsubscribed EQ "0")   #ELSE   #ENDIF #ENDLOCAL

#ENDLOOP #ENDLOCAL #ENDIF #ENDLOCAL
#IF(#Shop.FeatureMaxValue.Newsletter) #LOCAL("VisNewsletterCampaigns", #VisibleNewsletterCampaigns) #IF(#COUNT(#VisNewsletterCampaigns)) #IF(NOT #Session.User OR #Session.User.IsAnonymous)#WITH_ERROR(#FormError)
{Name} {EMail}{MandatoryStar}
#ENDWITH_ERROR#ENDIF
 
#ENDIF
{MandatoryFields}
#ENDLOCAL #ENDIF
#ENDIF