error within error trapping itself $ec=,Z150377778,Z150377778, $j=1379147%YDB-E-DBPREMATEOF, Premature end of file with database file !AD 1 %SetMJB+3^uosjm : i PDstatus d q ecode= 1 %SetMJB+3^uosjm : i PDstatus d q ecode= 0 %EntryJ+6^uwww : d %SetMJB^uosjm(1,"web") ecode=