Native Inspect Manual (H06.13+, J06.03+)

NAME = "Bellini "
WORKS = (
TITLE = "Semiramide "
LISTING-INFO =
CONDUCTOR = "Davis "
PRICE = "$34,597.00"
TITLE = "Norma "
LISTING-INFO =
CONDUCTOR = "Rudel "
PRICE = "$34,602.00"
(eInspect 3,1012): print title(1,2)
Reference to TITLE is not unique.
Add more qualification to disambiguate the reference.
(eInspect 3,1012): print title of works of who of recording-data (1,2)
$5 = "Boheme "
(eInspect 3,1012): print recording-data.who.works.title (1,2)
$7 = "Boheme "
eInspect 3,1012): print works of who of recording-data (1)
$6 = (
TITLE = "Sigfried "
LISTING-INFO =
CONDUCTOR = "Solti "
PRICE = "$34,567.00"
DEALERS-CODE = 34572,
TITLE = "Boheme "
LISTING-INFO =
CONDUCTOR = "Walter "
PRICE = "$34,572.00"
DEALERS-CODE = 34577)
(eInspect 1,301): ptype rec5
type = RECORD
R51 RECORD OCCURS 2 TIMES
R511 PIC X(16)
R512 PIC X(16)
R513 RECORD OCCURS 3 TIMES
R5131 PIC XXX
R5132 PIC XXX
(eInspect 1,301): p rec5
$40 =
R51 = (
R511 = "REC5.R51[1].R511"
R512 = "REC5.R51[1].R512"
R513 = (
R5131 = "111"
R5132 = "112",
R5131 = "111"
R5132 = "112",
R5131 = "111"
R5132 = "112"),
R511 = "REC5.R51[1].R511"
R512 = "REC5.R51[1].R512"
R513 = (
R5131 = "211"
R5132 = "212",
R5131 = "211"
R5132 = "212",
R5131 = "211"
R5132 = "212"))
(eInspect 1,301): p r513(2)
$43 = (
R5131 = "211"
R5132 = "212",
R5131 = "211"
R5132 = "212",
R5131 = "211"
44 Using Native Inspect