/* ───────────────────────────────────────────────────────────────────────────
   проходим весь список pdcbHead
   и если находим в нем струку с указателем на PTDA равному поданому
   - то обнуляем его
   ─────────────────────────────────────────────────────────────────────────── */
void
DbgRemovePTDAptr(
    ptda_t *pPTDA)
{
    for (DCB_t *pdcb = pdcbHead; pdcb != NULL; pdcb = pdcb->pdcbNext)
    {
        if (pdcb->pptdaDbgee == pPTDA)
        {
            KernPrintf("DbgRemovePTDAptr pPTDA 0x%08X\n",pPTDA);
            pdcb->pptdaDbgee = 0;
        }
    }
}