[fcl-passrc][patch] PasWrite discardes begin-end block in if-then-begin statement when no else
<h3><details><summary>Original Reporter info from Mantis: <small>jc99</small></summary><small>
- **Reporter name:** Joe care
</small></details></h3>
## Description:
If DoBeginEnd is not triggered but the begin end block is present the block is omitted resulting in a faulty program.
## Steps to reproduce:
tcPasWriteStatements ( u.o. TestIfBlock-Test)
## Additional information:
Patch provided:
## Mantis conversion info:
- **Mantis ID:** 37881
- **OS:** Win64
- **OS Build:** 10
- **Build:** latest
- **Platform:** x86-64
- **Version:** 3.3.1
issue