Open Prefixes,
A^ia,
""^iaPLN,
DO{+&IA[ia]PFX[iaPLN]^iaPLN "got one",
   IF{"M"=&IA[ia]PFX[iaPLN]|1;
      "VMAGIC"'=&IA[ia]PFX[iaPLN]|3;
      "otherwise",
         iaPLN^FN,
         &IA[ia]PFX[iaPLN]|0^PFX,
         /(.PK).HCIS^HCIS,
         IF{ia="MIS" ia;
            ia_"."_/(.PK).DB}^DB,
         *(HU)HUTH[HCIS]D[DB]F[FN]^SVC.NAME,
         IF{SVC.NAME_.=. "can be a ref to something thats not there, just ignore";
            "otherwise",
               SVC.NAME|0@Ni_.2989N_D(31)_SVC.NAME|1_":"_SVC.NAME|2^ADDR,
               V("O("_PFX_",ADDR)")_0=0 N("Cannot open",PFX,"to",ADDR:0X)^#}}},
EXIT;
