" "" " | " "", The_ClassForm[Gbl.Prefs.Theme], Txt_Institution); if (!PrintView && Gbl.Usrs.Me.LoggedRole == Rol_SYS_ADM) // Only system admins can move a centre to another institution { /* Get list of institutions of the current country */ Ins_GetListInstitutions (Gbl.CurrentCty.Cty.CtyCod,Ins_GET_BASIC_DATA); /* Put form to select institution */ Act_FormStart (ActChgCtrInsCfg); fprintf (Gbl.F.Out,""); Act_FormEnd (); /* Free list of institutions */ Ins_FreeListInstitutions (); } else // I can not move centre to another institution fprintf (Gbl.F.Out,"%s",Gbl.CurrentIns.Ins.FullName); fprintf (Gbl.F.Out," | " "
" "" " | " "", The_ClassForm[Gbl.Prefs.Theme], Txt_Centre); if (!PrintView && Gbl.Usrs.Me.LoggedRole >= Rol_INS_ADM) // Only institution admins and system admins can edit centre full name { /* Form to change centre full name */ Act_FormStart (ActRenCtrFulCfg); fprintf (Gbl.F.Out,"", Hie_MAX_CHARS_FULL_NAME, Gbl.CurrentCtr.Ctr.FullName, Gbl.Form.Id); Act_FormEnd (); } else // I can not edit centre full name fprintf (Gbl.F.Out,"%s",Gbl.CurrentCtr.Ctr.FullName); fprintf (Gbl.F.Out," | " "
" "" " | " "", The_ClassForm[Gbl.Prefs.Theme], Txt_Short_name); if (!PrintView && Gbl.Usrs.Me.LoggedRole >= Rol_INS_ADM) // Only institution admins and system admins can edit centre short name { /* Form to change centre short name */ Act_FormStart (ActRenCtrShoCfg); fprintf (Gbl.F.Out,"", Hie_MAX_CHARS_SHRT_NAME, Gbl.CurrentCtr.Ctr.ShrtName, Gbl.Form.Id); Act_FormEnd (); } else // I can not edit centre short name fprintf (Gbl.F.Out,"%s",Gbl.CurrentCtr.Ctr.ShrtName); fprintf (Gbl.F.Out," | " "
" "" " | " "",
The_ClassForm[Gbl.Prefs.Theme],
Txt_Web);
if (!PrintView &&
Gbl.Usrs.Me.LoggedRole >= Rol_CTR_ADM)
// Only centre admins, institution admins and system admins
// can change centre WWW
{
/* Form to change centre WWW */
Act_FormStart (ActChgCtrWWWCfg);
fprintf (Gbl.F.Out,"",
Cns_MAX_CHARS_WWW,
Gbl.CurrentCtr.Ctr.WWW,
Gbl.Form.Id);
Act_FormEnd ();
}
else // I can not change centre WWW
fprintf (Gbl.F.Out," "
""
"%s"
""
" ",
Gbl.CurrentCtr.Ctr.WWW,
Gbl.CurrentCtr.Ctr.WWW);
fprintf (Gbl.F.Out," | "
"
" "%s:" " | " "" "" "%s/%s?ctr=%ld" "" " | " "
" "%s:" " | " "", The_ClassForm[Gbl.Prefs.Theme], Txt_QR_code); QR_LinkTo (250,"ctr",Gbl.CurrentCtr.Ctr.CtrCod); fprintf (Gbl.F.Out," | " "
" "%s:" " | " "" "%s" " | " "
" "%s:" " | " "" "%u" " | " "
" "%s:" " | " "", The_ClassForm[Gbl.Prefs.Theme], Txt_Degrees); /* Form to go to see degrees of this centre */ Act_FormGoToStart (ActSeeDeg); Ctr_PutParamCtrCod (Gbl.CurrentCtr.Ctr.CtrCod); sprintf (Gbl.Title,Txt_Degrees_of_CENTRE_X, Gbl.CurrentCtr.Ctr.ShrtName); Act_LinkFormSubmit (Gbl.Title,"DAT",NULL); fprintf (Gbl.F.Out,"%u", Deg_GetNumDegsInCtr (Gbl.CurrentCtr.Ctr.CtrCod)); Act_FormEnd (); fprintf (Gbl.F.Out," | " "
" "%s:" " | " "" "%u" " | " "
" "%s:" " | " "" "%u" " | " "
" "%s:" " | " "" "%u" " | " "
" "%s + %s:" " | " "" "%u" " | " "
"); if (Ctr->Degs.Num || Ctr->NumUsrsWhoClaimToBelongToCtr || Ctr->NumUsrs || // Centre has degrees or users ==> deletion forbidden !ICanEdit) Lay_PutIconRemovalNotAllowed (); else { Act_FormStart (ActRemCtr); Ctr_PutParamOtherCtrCod (Ctr->CtrCod); Lay_PutIconRemove (); Act_FormEnd (); } fprintf (Gbl.F.Out," | "); /* Centre code */ fprintf (Gbl.F.Out,"" "%ld" " | ", Ctr->CtrCod); /* Centre logo */ fprintf (Gbl.F.Out,"", Ctr->FullName); Log_DrawLogo (Sco_SCOPE_CTR,Ctr->CtrCod,Ctr->ShrtName,20,NULL,true); fprintf (Gbl.F.Out," | "); /* Place */ fprintf (Gbl.F.Out,""); if (ICanEdit) { Act_FormStart (ActChgCtrPlc); Ctr_PutParamOtherCtrCod (Ctr->CtrCod); fprintf (Gbl.F.Out,""); Act_FormEnd (); } else for (NumPlc = 0; NumPlc < Gbl.Plcs.Num; NumPlc++) if (Gbl.Plcs.Lst[NumPlc].PlcCod == Ctr->PlcCod) fprintf (Gbl.F.Out,"%s",Gbl.Plcs.Lst[NumPlc].ShrtName); fprintf (Gbl.F.Out," | "); /* Centre short name */ fprintf (Gbl.F.Out,""); if (ICanEdit) { Act_FormStart (ActRenCtrSho); Ctr_PutParamOtherCtrCod (Ctr->CtrCod); fprintf (Gbl.F.Out,"", Hie_MAX_CHARS_SHRT_NAME,Ctr->ShrtName,Gbl.Form.Id); Act_FormEnd (); fprintf (Gbl.F.Out," | "); } else fprintf (Gbl.F.Out,"%s",Ctr->ShrtName); fprintf (Gbl.F.Out,""); /* Centre full name */ fprintf (Gbl.F.Out,""); if (ICanEdit) { Act_FormStart (ActRenCtrFul); Ctr_PutParamOtherCtrCod (Ctr->CtrCod); fprintf (Gbl.F.Out,"", Hie_MAX_CHARS_FULL_NAME,Ctr->FullName,Gbl.Form.Id); Act_FormEnd (); fprintf (Gbl.F.Out," | "); } else fprintf (Gbl.F.Out,"%s",Ctr->FullName); fprintf (Gbl.F.Out,""); /* Centre WWW */ fprintf (Gbl.F.Out,"");
if (ICanEdit)
{
Act_FormStart (ActChgCtrWWW);
Ctr_PutParamOtherCtrCod (Ctr->CtrCod);
fprintf (Gbl.F.Out,"",
Cns_MAX_CHARS_WWW,Ctr->WWW,Gbl.Form.Id);
Act_FormEnd ();
}
else
{
Str_Copy (WWW,Ctr->WWW,
Cns_MAX_BYTES_WWW);
fprintf (Gbl.F.Out," "
""
"%s"
""
" ",
Ctr->WWW,Ctr->WWW,WWW);
}
fprintf (Gbl.F.Out," | ");
/* Number of users who claim to belong to this centre */
fprintf (Gbl.F.Out,"" "%u" " | ", Ctr->NumUsrsWhoClaimToBelongToCtr); /* Number of degrees */ fprintf (Gbl.F.Out,"" "%u" " | ", Ctr->Degs.Num); /* Number of users in courses of this centre */ fprintf (Gbl.F.Out,"" "%u" " | ", Ctr->NumUsrs); /* Centre requester */ UsrDat.UsrCod = Ctr->RequesterUsrCod; Usr_ChkUsrCodAndGetAllUsrDataFromUsrCod (&UsrDat); fprintf (Gbl.F.Out,""
" | ");
/* Centre status */
StatusTxt = Ctr_GetStatusTxtFromStatusBits (Ctr->Status);
fprintf (Gbl.F.Out,""); if (Gbl.Usrs.Me.LoggedRole >= Rol_INS_ADM && StatusTxt == Ctr_STATUS_PENDING) { Act_FormStart (ActChgCtrSta); Ctr_PutParamOtherCtrCod (Ctr->CtrCod); fprintf (Gbl.F.Out,"", Gbl.Form.Id, (unsigned) Ctr_GetStatusBitsFromStatusTxt (Ctr_STATUS_PENDING), Txt_CENTRE_STATUS[Ctr_STATUS_PENDING], (unsigned) Ctr_GetStatusBitsFromStatusTxt (Ctr_STATUS_ACTIVE), Txt_CENTRE_STATUS[Ctr_STATUS_ACTIVE]); Act_FormEnd (); } else if (StatusTxt != Ctr_STATUS_ACTIVE) // If active ==> do not show anything fprintf (Gbl.F.Out,"%s",Txt_CENTRE_STATUS[StatusTxt]); fprintf (Gbl.F.Out," | " "