Write out ADP Diagnostics Returns: None

Return TypeFunction nameArguments
voidhdbADP::Report(hzChain&,)

Declared in file: hzDatabase.h
Defined in file : hdbADP.cpp

Function Logic:

0:START 1:items items items 2:unknown 3:pDT 4:unknown 5:items 6:items 7:unknown 8:pDT 9:unknown 10:pSlct items 11:items 12:unknown 13:pClass items 14:unknown 15:pMbr items 16:items 17:unknown 18:y pClass items 19: No text

Function body:

void hdbADP::Report (hzChain& Z)
{
   //  Write out ADP
   //  
   //  Diagnostics
   //  
   //  Argument: Z Output chain
   //  
   //  Returns: None
   _hzfunc("hdbADP::Report") ;
   const hdbDatatype*  pDT ;       //  Data type
   const hdbClass*     pClass ;    //  Data class
   const hdbMember*    pMbr ;      //  Data class member
   hdbEnum*            pSlct ;     //  Data enum
   uint32_t    x ;         //  General iterator
   uint32_t    y ;         //  General iterator
   Z.Printf("APPLICATION DELTA PROFILE\n") ;
   //  Z.Printf("User Categories\n") ;
   //  for (x = 0 ; x < m_UserTypes.Count() ; x++)
   //   { ut = m_UserTypes.GetObj(x) ; Z.Printf(" -- %s\n", *ut.m_Refname) ; }
   Z.Printf("Data types\n") ;
   Z.Printf(" -- Validation formats\n") ;
   for (x = 0; x < m_mapDatatypes.Count() ; x++)
   {
       pDT = m_mapDatatypes.GetObj(x) ;
       if (pDT->Basetype() != BASETYPE_APPDEF)
           continue ;
       Z.Printf("\t -- %s\n", pDT->txtType()) ;
   }
   Z.Printf(" -- Selectors\n") ;
   for (x = 0; x < m_mapDatatypes.Count() ; x++)
   {
       pDT = m_mapDatatypes.GetObj(x) ;
       if (pDT->Basetype() != BASETYPE_ENUM)
           continue ;
       pSlct = (hdbEnum*) pDT ;
       Z.Printf("\t -- %s\n", pSlct->txtType()) ;
   }
   Z.Printf(" -- Clases\n") ;
   for (x = 0; x < m_mapClasses.Count() ; x++)
   {
       pClass = m_mapClasses.GetObj(x) ;
       Z.Printf("\t -- %s\n", pClass->txtType()) ;
       for (y = 0; y < pClass->MbrCount() ; y++)
       {
           pMbr = pClass->GetMember(y) ;
           Z.Printf("\t\t -- %s [%s]\n", pMbr->txtName(), Basetype2Txt(pMbr->Basetype())) ;
       }
   }
   Z.Printf(" -- Class Delta ID assignments\n") ;
   for (x = 0; x < m_mapClsCtxDtId.Count() ; x++)
   {
       y = m_mapClsCtxDtId.GetKey(x) ;
       pClass = m_mapClsCtxDtId.GetObj(x) ;
       Z.Printf("\t\t -- [%d] %s\n", y, pClass->txtType()) ;
   }
}