cataloged-procedure public under subroutine 23 List Picture As a command %3 n0 cataloged-procedure n1 subroutine n1->n0