UserForm
FirstName Robson
LastName Silva
OrganisationName MEFES
OrganisationURL http://www.mefes.dcc.ufba.br/
Profession Student
Country Brazil
State Salvador
Address

Location

Telephone

VoIP

InstantMessaging (IM) robsonsilva@hotmail.com
Email robson.rss@gmail.com
HomePage www.dcc.ufba.br/~robsonsilva
Comment

Edit personal data

My Links

  • ATasteOfTWiki - view a short introductory presentation on TWiki for beginners
  • WelcomeGuest - starting points on TWiki
  • TWikiUsersGuide - complete TWiki documentation, Quick Start to Reference
  • Sandbox? - try out TWiki on your own
  • RobsonSilvaSandbox? - just for me

My Personal Data

Note: if personal data is being stored using a secret database, then it is only visible to the user and to administrators.

E-mail  

My Personal Preferences

Uncomment preferences variables to activate them (remove the #-sign). Help and details on preferences variables are available in TWikiPreferences.

  • Show tool-tip topic info on mouse-over of WikiWord links, on or off:
    • #Set LINKTOOLTIPINFO = off

Related Topics

procedure QMatriculaBeforePost? (DataSet? : TDataSet? );
var sMatricula: string;
begin
QCurso.close;
QCurso.open;
QSicadSetup? .Open;
if QMatricula.State in [dsInsert] then
begin
ProximoNumero? .parambyname('@mat').AsString :=
IntToStr? (FieldByName? ('AnoIngresso').AsInteger) +
IntToStr? (FieldByName? ('SemestreAtual').ASInteger) +
Copy(FieldByName? ('ID_Curso').AsString,2,2);
ProximoNumero? .Open;
sMatricula:=
IntToStr? (FieldByName? ('AnoIngresso').AsInteger) +
IntToStr? (FieldByName? ('SemestreAtual').ASInteger) +
Copy(FieldByName? ('ID_Curso').AsString,2,2)+
StringZero? (FieldByName? ('proximo').AsInteger, 3);
FieldByName? ('Matricula').AsString:=sMatricula;
ProximoNumero? .close;
end
else
QMatriculaData? _Matricula.Value:=date;
QsicadSetup? .close;
end;

Topic revision: r2 - 30 Sep 2008 - 10:52:42 - RobsonSilva
 
This site is powered by the TWiki collaboration platformCopyright &© by the contributing authors. All material on this collaboration platform is the property of the contributing authors.
Ideas, requests, problems regarding TWiki? Send feedback