Downgrading Visio 2013 Professional to Standard using Batch script ?

People,

I need your help in revising or modifying the script below so that it can downgrade Visio 2013 Professional into Standard Edition ?

REM @echo off

if "%PROCESSOR_ARCHITECTURE%"=="x86" if "%PROCESSOR_ARCHITEW6432%"=="" goto x86 
set ProgramFilesPath=%ProgramFiles(x86)%
goto RUN

:x86 
set ProgramFilesPath=%ProgramFiles%

:OSPP 
reg query HKLM\Software\Microsoft\Office\15.0\Common\OSPPRUNONCE 
if %errorlevel%==1 (goto RUN) else (goto END)

:RUN 
C:\Windows\system32\cscript.exe "%ProgramFilesPath%\Microsoft Office\Office15\ospp.vbs" /inpkey:J484Y-4NKBF-W2HMG-DBMJC-PGWR7 
C:\Windows\system32\cscript.exe "%ProgramFilesPath%\Microsoft Office\Office15\ospp.vbs" /act 

REM Rename the Visio Professional display name into Standard edition in the Add/Remove Program lists.
REG ADD "HKLM\Software\Microsoft\Office\15.0\Common\OSPPRUNONCE"
REG ADD "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Office15.VISPRO" /v DisplayName /d "Microsoft Visio Standard 2013"
REG ADD "HKLM\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\Office15.VISPRO" /v DisplayName /d "Microsoft Visio Standard 2013"

:END 
Exit

pause

The typical scenario is that Visio 2013 Professional is installed in Windows 7/8.1 64 bit OS but the Visio application is just 32 bit.

Here's the Error message when executing the script above:

Microsoft (R) Windows Script Host Version 5.8
Copyright (C) Microsoft Corporation. All rights reserved.

---Processing--------------------------
---------------------------------------
ERROR CODE: 0xC004F069
ERROR DESCRIPTION: The Software Licensing Service reported that the product SKU is not found.
---------------------------------------
---Exiting-----------------------------

Any help would be greatly appreciated.

Thanks,

Note:

Here's the link for the serial number: https://technet.microsoft.com/en-us/library/dn385360.aspx
Source of the script: http://blogs.technet.com/b/odsupport/archive/2010/12/03/volume-license-editions-of-visio-2010-install-premium-edition-by-default.aspx