Write proposalID to TASP data files

2017-02-27 09:56:00 +01:00
parent ae3b909dca
commit 58a8bd00b0
1 changed files with 5 additions and 0 deletions
--- a/tasscan.c
+++ b/tasscan.c
@ -272,6 +272,11 @@ static int TASHeader(pScanData self)
          pTAS->tasPar[BX]->fVal, pTAS->tasPar[BY]->fVal,
          pTAS->tasPar[BZ]->fVal);

+  sVar = FindCommandData(pServ->pSics, "ProposalID", "SicsVariable");
+  if (sVar != NULL) {
+    fprintf(self->fd,"PARAM: ProposalID=%s\n",sVar->text);
+  }
+
  /*
   * write mupad stuff if available
   */