diff --git a/lib/qra/qra65/qra65_subs.c b/lib/qra/qra65/qra65_subs.c
index a0100f8da..e5c7f2a06 100644
--- a/lib/qra/qra65/qra65_subs.c
+++ b/lib/qra/qra65/qra65_subs.c
@@ -22,8 +22,8 @@ void qra65_dec_(float r[], int xdec[], int* rc)
 //   rc=4    [CALL ?     ] AP45
 //   rc=5    [CALL CALL ?] AP57
 
-  //  int ncall=0xf70c238;                          //K1ABC
-  int ncall=0x890c60c;                          //KA1ABC
+  int ncall=0xf70c238;                          //K1ABC
+  //  int ncall=0x890c60c;                          //KA1ABC
   int i;
   qra65codec *codec = qra65_init(1,ncall);	//codec for ncall
   *rc = qra65_decode(codec,xdec,r);
diff --git a/lib/qra65code.f90 b/lib/qra65code.f90
index bbcca3fe9..d9718a900 100644
--- a/lib/qra65code.f90
+++ b/lib/qra65code.f90
@@ -96,7 +96,7 @@ program QRA65code
         ii=imsg
         if(nrpt.gt.1) ii=nn
         write(*,1020) ii,msg0,decoded,itype,msgtype,irc
-1020    format(i3,2x,a22,2x,a22,4x,i3,": ",a13,i3)
+1020    format(i4,1x,a22,2x,a22,4x,i3,": ",a13,i3)
      enddo
 
      if(nmsg.eq.1 .and.nrpt.eq.1) then
@@ -113,7 +113,7 @@ program QRA65code
 
   if(nrpt.gt.1) then
      write(*,1060) ngood,nrpt,nbad
-1060 format('Decoded messages: ',i3,'/',i3,'   Undetected errors:',i4)
+1060 format('Decoded messages:',i5,'/',i4,'   Undetected errors:',i5)
   endif
 
 999 end program QRA65code