Before Zoom hook
Use this hook to instruct the zoom session to adapt its behavior. For example, the index the session should use or the record that should be shown as the first one. In the latter case, you must specify the key of that record. Note that standard sessions may not always show the desired behavior because of specific implementations.
Examples:
function extern void tcibd001.cdf_prbp.before.zoom()
{
attr.zoomindex = 2
}
function extern void tcibd001.cdf_prbp.before.zoom()
{
tccom100.bpid = tcibd001.cdf_prbp
}
function extern void tcibd001.cdf_prbp.before.zoom()
{
on case tcibd001.cdf_bunt
case txbunt.cons:
attr.zoomsession$ = "txcpr0501m000"
attr.zoomreturn$ = "txcpr001.prid"
break
case txbunt.b2b:
attr.zoomsession$ = "txcpr0502m000"
attr.zoomreturn$ = "txcpr002.prid"
break
default:
attr.zoomcode = 0
endcase
}