Top level interactive function calling other interactive functions

[Heime]

I have a top level interactive function, from which I want to call a number
of commands interactively.

(defun avus-stix (seltr)
  (interactive
    (let ( (csel '("Integ-Upright"  "Integ-Small"
                   "Integ-Smallsl"  "Integ-Smallup"
                   "Integ-Slanted") ))
      (list
        (completing-read "Selector: " csel nil t nil) )) )

  (pcase seltr
    ("Integ-Slanted"  (avus-stix-integ-slanted))
    ("Integ-Upright"  (avus-stix-integ-upright))
    ("Integ-Small"    (avus-stix-integ-small))
    ("Integ-Smallsl"  (avus-stix-integ-smallsl))
    ("Integ-Smallup"  (avus-stix-integ-smallup))) )