Example #1
0
        case "Identify":
            print headXML($verb);
            print identify();
            $error = false;
            break;
        case "ListIdentifiers":
            if ($error == false) {
                $dataModel = new $methodology();
                listRecords($metadataPrefix, $methodology);
            }
            break;
        case "ListSets":
            listRecords($metadataPrefix, $methodology);
            break;
        case "ListMetadataFormats":
            print headXML($verb);
            print listMetadataFormats();
            $error = false;
            break;
        default:
            $verb = "";
            $errorMsg = "Illegal OAI verb";
            $errorCode = "badVerb";
    }
}
//If have errors, show message
if ($errorMsg && $error == true) {
    print verbError($verb, $errorMsg, $errorCode);
}
?>
			
Example #2
0
function verbError($verb, $errorMsg, $errorCode)
{
    $envelop = headXML($verb);
    $result = "<error code=\"" . $errorCode . "\">" . $errorMsg . "</error>\n";
    $envelop .= $result;
    $envelop .= "</OAI-PMH>\n";
    print $envelop;
}