diff --git a/ha/ha1300.cpp b/ha/ha1300.cpp
index 70cd25dd2..c6d3479a0 100755
--- a/ha/ha1300.cpp
+++ b/ha/ha1300.cpp
@@ -1105,6 +1105,7 @@ void TUpload2Campo::elabora_TF(THardy_upload_recordset& recset, TLog_report& log
     case 'O': 
       rigadoc.put(RDOC_TIPORIGA, "09");
       rigadoc.put(RDOC_ADDIVA, "X");
+      rigadoc.put(RDOC_CAUSMAG, "OMA");
       break;
     case 'R': break;
     case 'S': break;