I inherited some legacy MUMPS / ObjectScript code. A code review identified an exclusive NEW and that is not allowed per our coding standards.
The original code contains:
RUN(CALL,DRVNAME) S $EC="" S ^TMP($J,"RMPV","DRVNAME")=DRVNAME N TMPFILE,OLDIO S OLDIO=$IO I $G(^TMP("RMPV","SILENT"),1) S IOP="NULL",%ZIS=0 D ^%ZIS I '$G(POP,1) U IO D INIT^@DRVNAME D ; scope variables .N (DUZ,CALL) ; Protect %response .S IOF="""""",IOM=80,U="^" .D @CALL U OLDIO Q