[Info-vax] HP Bringing the Hobbyist Program In-House

[Jan-Erik Soderholm]

Rich Jordan wrote 2012-01-26 16:54:
> On Jan 26, 9:35 am, Jan-Erik Soderholm<jan-erik.soderh... at telia.com>
> wrote:
>> Jan-Erik Soderholm wrote 2012-01-26 10:39:
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>> MG wrote 2012-01-26 09:53:
>>>> On 26-1-2012 1:01, ss wrote:
>>>>> Spotted this onhttp://www.openvmshobbyist.com/
>>>>> Not much information right now but let's hope for the best! :-) Just
>>>>> thought to post it here too. AFAICS it's bad news for those whose PAKs
>>>>> will - just as mine - expire soon.
>>
>>>> I'm not sure what to make of this. Like you, I keep on hoping for the
>>>> best. (My PAKs will expire in mid-April.)
>>
>>>> - MG
>>
>>> Argh !
>>> Just saw that my lics expired 23-JAN-2012...
>>> And now what... ?
>>
>>> Jan-Erik.
>>
>> Problem solved. My system is now reloaded with fresh hobbyist
>> licenses from HP lasting to 31-Jan-2013.
>>
>> Aprox 15 min from mailing back some system info I had the lics
>> as a COM file to run. This time as a complete COM file with
>> not only the LIC REGISTER commands but also the DIS/UNL/ENAB/LOAD
>> commands to clean up and activate the new licenses in one run.
>>
>> Before I had a separate DCL routine to read the supplied COM
>> file and create an own COM file. No need for that anymore.
>>
>> This was manualy handled and I got the impression that it is
>> not the final solution.
>>
>> Jan-Erik.
>
> That command procedure sounds just like the method used to deliver
> DSPP PAKs.

The complete DCL for one product ("C" in this case) is :

-----------------------------------------------------------
...
$! This PAK issued on 26-Jan-2012 10:19
$ Call CheckLicense "C" "31-JAN-2013"
$ IF ($STATUS .EQS. "%X107880D3") .OR. ($STATUS .EQS. "%X107880CB")
$ THEN
$!
$ LICENSE REGISTER C -
/ISSUER=DEC -
/AUTHORIZATION=HOBBYIST-JAN-ERIK-SODERHOLM -
/PRODUCER=DEC -
/UNITS=0 -
/TERMINATION_DATE=31-JAN-2013 -
/ACTIVITY=CONSTANT=100 -
/CHECKSUM=<the usual checksum format...>
$!
$ LICENSE DISABLE C/LOG/PRODUCER=DEC/ALL
$ LICENSE UNLOAD  C/LOG/PRODUCER=DEC
$ LICENSE ENABLE  C/LOG/PRODUCER=DEC/AUTH=HOBBYIST-JAN-ERIK-SODERHOLM
$ LICENSE LOAD    C/LOG/PRODUCER=DEC
$ ENDIF
$ !
...
-----------------------------------------------------------

Which when runed gave :

%LICENSE-I-DISABLED, C <my old expired licens> has been disabled
%LICENSE-I-DISABLED, C HOBBYIST-JAN-ERIK-SODERHOLM has been disabled
%LICENSE-I-UNLOADED, C   has been unloaded
%LICENSE-I-ENABLED, C HOBBYIST-JAN-ERIK-SODERHOLM has been enabled
%LICENSE-I-LOADED, DEC C was successfully loaded with 0 units