Source position: nl_typesh.inc line 14
function catopen(
__cat_name: Pchar;
__flag: LongInt
):nl_catd;