Re: How to model searchable properties of an entity
Date: 30 Aug 2004 10:00:28 -0700
Message-ID: <4b45d3ad.0408300900.4ab3ba53_at_posting.google.com>
> There are two simple solutions; nulls and sub-entities.
This XDb2 example (www.xdb2.com/Example/Ex109.asp) represents the following things with variable number of properties and values:
wig1's color is red. wig2's color is red, green AND texture is soft AND material is nylon. wig3's texture is soft AND material is jute. coat1's color is red.
coat2's texture is soft AND material is cotton. coat3's color is green AND texture is smooth, supple.
/*****************************************************Below code shows how to create and query above things, including finding all things that are red.
For the sake of comparision,
please show RM's equivalent schema/data
and code/query to find all things that are red.
******************************************************/
// Create wig class
int* pWig = T_create();
T_Name_relate(&pWig, _T("wig"));
T_relate(&pWig, &pReCls_g, &pThing_g);
// Create coat class
int* pCoat = T_create();
T_Name_relate(&pCoat, _T("coat"));
T_relate(&pCoat, &pReCls_g, &pThing_g);
// Create color class
int* pColor = T_create();
T_Name_relate(&pColor, _T("color"));
T_relate(&pColor, &pReCls_g, &pThing_g);
// Create texture class
int* pTexture = T_create();
T_Name_relate(&pTexture, _T("texture"));
T_relate(&pTexture, &pReCls_g, &pThing_g);
// Create material class
int* pMaterial = T_create();
T_Name_relate(&pMaterial, _T("material"));
T_relate(&pMaterial, &pReCls_g, &pThing_g);
// Create wig1
// Its color is red.
int* pWig1 = T_create();
T_Name_relate(&pWig1, _T("wig1")); T_relate(&pWig1, &pReCls_g, &pWig); T_Val_relate(&pWig1, &pColor, _T("red"));
// Create wig2
// Its color is red, green AND texture is soft AND material is nylon.
int* pWig2 = T_create();
T_Name_relate(&pWig2, _T("wig2")); T_relate(&pWig2, &pReCls_g, &pWig); T_Val_relate(&pWig2, &pColor, _T("red")); T_Val_relate(&pWig2, &pColor, _T("green")); T_Val_relate(&pWig2, &pTexture, _T("soft")); T_Val_relate(&pWig2, &pMaterial, _T("nylon"));
// Create wig3
// Its texture is soft AND material is jute.
int* pWig3 = T_create();
T_Name_relate(&pWig3, _T("wig3")); T_relate(&pWig3, &pReCls_g, &pWig); T_Val_relate(&pWig3, &pTexture, _T("soft")); T_Val_relate(&pWig3, &pMaterial, _T("jute"));
// Create coat1
// Its color is red.
int* pCoat1 = T_create();
T_Name_relate(&pCoat1, _T("coat1")); T_relate(&pCoat1, &pReCls_g, &pCoat); T_Val_relate(&pCoat1, &pColor, _T("red"));
// Create coat2
// Its texture is soft AND material is cotton.
int* pCoat2 = T_create();
T_Name_relate(&pCoat2, _T("coat2")); T_relate(&pCoat2, &pReCls_g, &pCoat); T_Val_relate(&pCoat2, &pTexture, _T("soft")); T_Val_relate(&pCoat2, &pMaterial, _T("cotton"));
// Create coat3
// Its color is green AND texture is smooth, supple.
int* pCoat3 = T_create();
T_Name_relate(&pCoat3, _T("coat3")); T_relate(&pCoat3, &pReCls_g, &pCoat); T_Val_relate(&pCoat3, &pColor, _T("green")); T_Val_relate(&pCoat3, &pTexture, _T("smooth")); T_Val_relate(&pCoat3, &pTexture, _T("supple"));
// Find wigs related to color AND texture.
// The loop below prints:
// "((wig))(wig2)(((color))(red))(((color))(green))(((texture))(soft))
(((material))(nylon))"
#define aSz 255
int* pExpr1[aSz+1] = {NULL};
if (Z_parse_r(_T("(wig) ((color)) ((texture))"), pExpr1, aSz))
{return;}
while (int* pT=Z(pExpr1, TRUE)){
TCHAR sName[kStrSz_g+1] = _T(""); T_Name_get(pT, sName, kStrSz_g, TRUE); TRACE(_T("%s\n"), sName);
}
// Find coats related to color AND texture.
// The loop below prints:
// "((coat))(coat3)(((color))(green))(((texture))(smooth))(((texture))(supple))"
int* pExpr2[aSz+1] = {NULL};
if (Z_parse_r(_T("(coat) ((color)) ((texture))"), pExpr2, aSz))
{return;}
while (int* pT=Z(pExpr2, TRUE)){
TCHAR sName[kStrSz_g+1] = _T(""); T_Name_get(pT, sName, kStrSz_g, TRUE); TRACE(_T("%s\n"), sName);
}
// Find all things that are red.
// The loop below prints:
// "(wig1)((wig))(((color))(red))"
// "(wig2)((wig))(((color))(red))(((color))(green))(((texture))(soft))
(((material))(nylon))"
// "(coat1)((coat))(((color))(red))"
int* pRed = AStr_getDefT(_T("red"));
int* pE1[32];
if (Expr_xVO_get_r(pColor, pRed, pE1)){return;}
while (int* pT=X2(pE1)){
TCHAR sName[kStrSz_g+1] = _T(""); T_Name_get(pT, sName, kStrSz_g, TRUE); TRACE(_T("%s\n"), sName);
}
// Given wig1, print its info.
// Prints: "((wig))(wig1)(((color))(red))"
TCHAR sName[kStrSz_g+1] = _T("");
T_Name_get(pWig1, sName, kStrSz_g, TRUE);
TRACE(_T("%s\n"), sName);
// Given wig2, print its info.
// Prints: "((wig))(wig2)(((color))(red))(((color))(green))(((texture))(soft))
(((material))(nylon))"
_tcscpy(sName, _T(""));
T_Name_get(pWig2, sName, kStrSz_g, TRUE);
TRACE(_T("%s\n"), sName);
// Given wig3, print its properties/values using alternate method
// "wig3's cls is wig."
// "wig3's name is wig3."
// "wig3's texture is soft."
// "wig3's material is jute."
// Loop thru wig3's properties and values
int* pE2[32];
Expr_S_getN_r(pWig3, pE2);
while (int* pN = X2(pE2)){
// Get property int* pProp = N_getV(pN); // Get value int* pVal = N_getO(pN); // Print "thingX's propY is valX." TCHAR sThing[kStrSz_g+1] = _T(""); T_Name_get(pWig3, sThing, kStrSz_g); TCHAR sProp[kStrSz_g+1] = _T(""); T_Name_get(pProp, sProp, kStrSz_g); TCHAR sVal[kStrSz_g+1] = _T(""); T_Name_get(pVal, sVal, kStrSz_g); TCHAR sSent[3*kStrSz_g+1] = _T(""); _stprintf(sSent, _T("%s's %s is %s."), sThing, sProp, sVal); TRACE(_T("%s\n"), sSent);
} Received on Mon Aug 30 2004 - 19:00:28 CEST