z platobneho pride odpoved void WriteOK(EPTAnswer *answer, long tag) a my potrebujeme vytiahnut *EPurseAnswer z *EPTAnswer, v EBlAppCardRcv je na to metoda ktora prechadza kolekciu EPTAnswer
EPurseAnswer *purseAnswer = EBlAppCardRcv::GetPurseAnsferFromAnsfer(answer); if (purseAnswer == NULL) { GetVyd()->GetOwner()->GetErrMsg()->SysErr(EBL_ERR_PURSE_ANSWER); return ; }