! This example shows how you can update data in a Pre Process of a Field ! and have that data redisplayed in a View. ! This example uses the UT library, which comes with IDOL-IV. ! 8INPUT PRE/POST SCRIPT - Pre/Post processing for 8INPUT API. See 8INPUT ! API documentation for more details in the ! Dictionary-IV Reference Manual. ! ! This script serves as a before or after input procedure used for ! IDOL-IV file maintenance (pre- or post-processing) and 8INPUT API. ! It is not designed to be executed from another script. ! ! The following is a list of the Call/Enter variables that are compiled ! into this type script: ! ! VAV3$ - String passed into public from format (same as S8$). ! SPARM$[ALL] - Screen array (see on-line help for 8INPUT). ! FPARM$[ALL] - Format array (see on-line help for 8INPUT). ! FD$ - Entire data record (before field edit). ! ]7$ - System variable (DO NOT ALTER). ! W1$ - Field entry (contains data entered). ! SE - Field control value. ! W$ - Internal use (DO NOT ALTER). ! MAINLINE FORMAT INCLUDE #UTCUST,OPT="NONE" LET #UTCUST = FD$ LET #UTCUST.OPEN-AR-BALANCE = UTCUST.OPEN-AR-BALANCE * 2 LET FD$ = #UTCUST ENDSCRIPT !NOTE: This example will only work as a Pre Process type P script. ! The Only other way to do this is with OPENWorkshop in a ! CONNECT METHOD with the "PRINT ROW" method directive.