# File: fix_cbdpc.src
#

program "@(#) MODULE: fix_str31.src RELEASE: %R%.%L% CREATED: %G% %U%"
source "/mdisw/cfl/dev/src/fix_cbdpc.src"
descr "fix_cbdpc - Correct cb DPC"

display "Executing procedure fix_cbdpc."

tcblock mbipldin 0x01B2 0x0730 0x0002 0x0001 0x4000
tcblock mbipldin 0x01B2 0x0737 0x0002 0x43C2 0x9105
#
tcblock mbipldin 0x01B2 0x073a 0x0002 0x0001 0x4000
tcblock mbipldin 0x01B2 0x0741 0x0002 0x47C5 0x9107

display "Finished procedure fix_cbdpc: %s" !TIME

return

