960 likes | 1.09k Vues
This document outlines a procedure named JOI that dynamically alters configuration based on user input. It implements a Boolean mechanism to allow for incrementing or decrementing configuration values. The procedure ensures the integrity of operations by checking token counts and parameters to prevent incorrect usage. The JOI function updates configuration values based on user commands ("PLUS" for increment and "MINUS" for decrement) and verifies successful operations through confirmation checks. The implementation is robust, handling erroneous conditions to maintain stability.
E N D
IF (TOKCOUNT()=0) END ' we don't want any shit happening with wrong usage ...
IF (CREMENT=0) END ' we don't want any shit happening with wrong parameters.
IF (CONFINFO(cnf+CREMENT, 2)=TRUE) THEN
IF ( CONFREG(CNF+CREMENT) |(CONFREG(CNF+CREMENT)&CONFEXP(CNF+CREMENT))) THEN