Bastardoperaatori Päevaraamat

Alljärgnev pseudokood iseloomustab teatud arendajate lähenemist andmebaasidele. Näide on loodud kunstlikult 3 peamise antipatterni baasil:
1. tee alati select * ja viska mittevajalik minema
2. Enne iga päringut ava andmebaasiühendus, peale iga päringut sulge AB ühendus
3. for tsükkel on parim vahend query_stringi parsimiseks
Kõigi 3 “metoodikaga” on õnnestunud korudvalt kokku puutuda otsides vastust küsimusele, mida äripool ikka sysadminile esitab: “MIKS ON AEGLANE?!?”

SUB SQLQuery(QueryString)
   MyConnection = OpenSQLConnection(MyHugeSeveralTensofGigsDatabase)
   MyResult = MyLocalConnection.Query(QueryString)
   MyConnection.close
END SUB

' Define nice interface for that stupid SQL thing
SUB GetFromTable(Index, Table)
   TmpResult = SQLQuery("SELECT * FROM " + Table)
   TmpResult[Index]
END SUB

SUB CountTable(Table)
   SQLQuery("SELECT COUNT(*) FROM " + Table)
END SUB

' FIND USER
SUB FindUser(Name)
   FOR (I = 0; I < COUNT("USERS"); ++I)
      IF GetFromTable(I, "USERS").USERNAME = Name THEN
          RETURN GetFromTable(I, "USERS")
      END IF
   END FOR
END SUB

FindUser("DumbAss")

Ja siis imestatakse:"MIKS ei performi"

Pseudokoodi aitas kirjutada qwr (qwr _at_ linux jee jee)