create procedure [dbo].[MssWebDeleteOrderContactAddress]
    @inContactId int
as
begin
    set nocount on

    ;with MainAddressType as
    (
        select AddressType.AddressTypeID
        from AddressType
        where TypeName = 'Main'
    )
    delete OrderContactAddress
    from OrderContactAddress
    cross join MainAddressType
    where
    OrderContactAddress.OrderContactFID = @inContactId and
    AddressTypeFID = MainAddressType.AddressTypeID

end
GO
GRANT EXECUTE ON  [dbo].[MssWebDeleteOrderContactAddress] TO [MssExec]
GO