Leptospira Home Page - Lepto Library

%s

\n", $ERRMSG); fatal(""); } if (msqlSelectDB($sock,"leptospira") < 0) { printf("

%s

\n", $ERRMSG); fatal(""); } if (msqlQuery($sock, "select * from leptospira WHERE UI=$ui")<0) { printf("

%s

\n", $ERRMSG); fatal(""); } $res=msqlStoreResult(); $row=msqlFetchRow($res); echo("Leptospira Home page - Lepto Library\n"); if (#$row > 0) { $datum=$row[2]; $source=$row[3]; $uid=$row[0]; printf("

Title:
\n

%s

\n", $row[1]); } else { printf("
Requested data not found in database!!! UI=%s\n", $ui); exit(0); } msqlFreeResult($res); if (msqlQuery($sock, "select AU from author WHERE UI=$ui")<0) { printf("

%s

\n", $ERRMSG); fatal(""); } $res=msqlStoreResult(); $row=msqlFetchRow($res); if (#$row > 0) { echo("Author:
\n"); $ln=""; while(#$row>0) { if ($ln=="") { $ln=$row[0]; } else { $ln=$ln + ", " + $row[0]; } $row=msqlFetchRow($res); } printf("%s
\n", $ln); } msqlFreeResult($res); if (msqlQuery($sock, "select AD from address WHERE UI=$ui")<0) { printf("

%s

\n", $ERRMSG); fatal(""); } $res=msqlStoreResult(); $row=msqlFetchRow($res); if (#$row > 0) { $ln=""; echo("Address:
\n"); while(#$row>0) { if ($ln=="") { $ln=$row[0]; } else { $ln=$ln + ", " + $row[0]; } $row=msqlFetchRow($res); } printf("%s
\n", $ln); } msqlFreeResult($res); printf("Source:
\n %s
\n", $source); printf("Abstract:
\n"); $fnm="/usr/local/leptospira/" + $uid; $in=open($fnm, "<"); if ($in<0) { echo("Error: $ERRMSG\n"); fatal(); } $ln=readln($in); close($in); printf("

%s

\n", $ln); printf("Unique Identifier:
\n %s
\n", $uid); >