diff --git a/src/system/salv.313 b/src/system/salv.313
index 94785e91..844ec123 100644
--- a/src/system/salv.313
+++ b/src/system/salv.313
@@ -989,7 +989,8 @@ DC,	SETZM WXWDS+XWBWC
 	DPB B,[UNDSCP NUSRD+UNRNDM(A)]
 	MOVE B,MHDATE
 	MOVEM B,NUSRD+UNDATE(A)
-	SETOM NUSRD+UNREF(A)
+	HRROI B,777000		;NO REFERENCE DATE, NO AUTHOR, 36-BIT BYTES
+	MOVEM B,NUSRD+UNREF(A)
 	MOVE B,TUT+QPKNUM
 	DPB B,[UNPKN NUSRD+UNRNDM(A)]
 	MOVEI A,NUSRD+UNRNDM(A)