I cannot answer your question, only wanted to comment it's good to see Tone 
Software still around, I still have my Tone Stone from.....so many years ago  
   
Carmen Vitullo 

   

-----Original Message-----

From: John <[email protected]>
To: IBM-MAIN <[email protected]>
Date: Wednesday, 24 March 2021 2:57 PM CDT
Subject: Unable to get data from IFAURP roe registered product

I am beginning to test registration of our products for usage. I can't seem to 
get 
IFAURP to display my records. I am using the following to create records: 

NOAREG IFAUSAGE REQUEST=REGISTER, Register the product 
PRODOWNER=TONENAME, - CL16'Tone Software Co' 
PRODNAME=MYPROD, - CL16'OurProduct' 
PRODVERS=PRODVER, - CL8'V3R2M0' 
PRODQUAL=USERID, - CL8'JSZ1' 
PRODID=DYS320, - CL8'DYS320' 
DOMAIN=TASK, - 
SCOPE=FUNCTION, - 
PRTOKEN=PRODTOKB, - 
LINKAGE=BRANCH, - 
FBFE=YES, - 
RETCODE=RETCODE, - 
* 
NOABEG IFAUSAGE REQUEST=FUNCTIONBEGIN, 
PRTOKEN=PRODTOKB, - 
LINKAGE=BRANCH, - 
RETCODE=RETCODE, - 
MF=(E,IFAULIST) 

A dump of SMF data shows that the type 89 subtype 1 records are being produced: 

RecType: 89 Date-Time: Tuesday, March 9, 2021 (2021.068) 03:00:00.00 
0000 03420000 DE590010 7AC00121 068FD1E2 F2C1E2E3 C3400001 00000024 00000040 
*........:.....JS2ASTC ......... * 
0020 00400001 00000080 00CE0001 0000014E 005C0001 00000000 000001AA 00880003 *. 
.............+.*...........h..* 
0040 E2D4C640 40404040 00000001 E2D7F74B F24BF340 000AFC80 0121068F 00107AC0 
*SMF ....SP7.2.3 ..........:.* 
0060 0121068F 00000000 00000000 00000000 FFFF94B6 2E000000 00010001 00010000 
*..................m.............* 
0080 C7F2F3D1 F2C14040 00057E40 0121068F 000AFC80 0121068F 00001001 00001001 
*G23J2A ..= ....................* 
00A0 1090D300 01F47B00 0000AC40 C1C4C3C4 D7D34040 40A9F1F0 F9F0C1A7 A7A4D7C4 
*..L..4#.... ADCDPL z1090AxxuPD* 
00C0 E3F10000 00000000 00C00000 C9C2D440 40404040 40404040 40404040 F1F0F9F0 
*T1..........IBM 1090* 
00E0 F3F0F640 40404040 40404040 40404040 F0F0F0F0 F0F0F0F0 F0F0F0F0 C6F4F7C2 
*306 000000000000F47B* 
0100 F0F24040 0000AC40 00030000 00E000E0 00000000 00000000 00000000 00000000 
*02 ... ........................* 
0120 00000000 00000000 0000C9C2 D4E2E8E2 F1400000 00123C80 00000000 00000040 
*..........IBMSYS1 ............. * 
0140 00000000 00000100 00000100 0001C9C2 D440C3D6 D9D74040 40404040 4040A961 
*..............IBM CORP z/* 
0160 D6E24040 40404040 40404040 4040F0F2 4BF0F34B F0F0E3E2 D661C540 4040F5F6 
*OS 02.03.00TSO/E 56* 
0180 F4F560F0 F0F1432A 80000000 0000423E 00000000 000000C0 00000000 00000000 
*45-001..........................* 
01A0 00000000 00000000 0000C9C2 D440C3D6 D9D74040 40404040 4040A961 D6E24040 
*..........IBM CORP z/OS * 
01C0 40404040 40404040 4040F0F2 4BF0F34B F0F0E3E2 D661C540 4040F5F6 F4F560F0 * 
02.03.00TSO/E 5645-0* 
01E0 F0F1E396 958540E2 9686A3A6 81998540 C396D6A4 99D79996 84A483A3 40404040 
*01Tone Software CoOurProduct * 
0200 4040E5F3 D9F2D4F0 4040D1E2 E9404040 4040C4E8 E2F3F2F0 40406800 00000000 * 
V3R2M0 JSZ DYS320 ......* 
0220 00000000 00000000 00000000 00000000 0000C9C2 D440C3D6 D9D74040 40404040 
*..................IBM CORP * 
0240 4040A961 D6E24040 40404040 40404040 4040F0F2 4BF0F34B F0F0E3E2 D661C540 * 
z/OS 02.03.00TSO/E * 
0260 4040F5F6 F4F560F0 F0F1E396 958540E2 9686A3A6 81998540 C396D6A4 99D79996 * 
5645-001Tone Software CoOurPro* 
0280 84A483A3 40404040 4040E5F3 D9F2D4F0 4040D1E2 E9F14040 4040C4E8 E2F3F2F0 
*duct V3R2M0 JSZ1 DYS320* 
02A0 40402800 00000000 00000000 00000000 00000000 00000000 0000C9C2 D440C3D6 * 
........................IBM CO* 
02C0 D9D74040 40404040 4040A961 D6E24040 40404040 40404040 4040F0F2 4BF0F34B 
*RP z/OS 02.03.* 
02E0 F0F0E3E2 D661C540 4040F5F6 F4F560F0 F0F1E396 958540E2 9686A3A6 81998540 
*00TSO/E 5645-001Tone Software * 
0300 C396D6A4 99D79996 84A483A3 40404040 4040E5F3 D9F2D4F0 4040D1E2 E9F14040 
*CoOurProduct V3R2M0 JSZ1 * 
0320 4040C4E8 E2F3F2F0 40406800 00000000 00000000 00000000 00000000 00000000 * 
DYS320 ......................* 
0340 0000 *.. * 

But when I use the following as SYSIN to IFAURP I get only IBM records being 
reported: 

* 
* CUSTOMER NAME AND ADDRESS 
* 
CUSTOMER(NAME('JOHN SZURA ENTERPRISES')) 
* 
* VENDOR NAME AND ADDRESS 
* (SAMPLE ONLY - IBM REP WILL SUPPLY TO EACH CUSTOMER) 
* 
VENDOR(PRODOWNER('Tone Software Co') 
NAME('TONESOFT') 
CODE(1234567)) 
* 
* PROCESSOR DEFINITION AND PRODUCTS 
* 
PROCESSOR((1090,L03,0F47B) 
PRODUCT (PRODOWNER('Tone Software Co') 
PRODNAME('OurProduct') 
PRODFUNC('JSZ ') 
* 
PROCESSOR((1090,Axx,0F47B) 
PRODUCT (PRODOWNER('Tone Software Co') 
PRODNAME('OurProduct') 
PRODFUNC('JSZ ') 
START(20210101))) 
* 
PROCESSOR((1090,306,0F47B) 
PRODUCT (PRODOWNER('Tone Software Co') 
PRODNAME('OurProduct') 
PRODFUNC('JSZ ') 
START(20210101))) 

---------------------------------------------------------------------- 
For IBM-MAIN subscribe / signoff / archive access instructions, 
send email to [email protected] with the message: INFO IBM-MAIN   

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to