ADD / DUP Function — Add Record / Duplicate Record logic flow diagram. Handles both new record addition and duplicate key detection, with multi-stage editing, calculation, and add-to-database processing. The business rule RULPROC pertaining to any of the MMP's elements from its primary Data Class is inserted immediately after the %CALC logic. It could set the ERROR-FOUND condition, causing the program to take the error path and bypass the add to the database. Entry into the ADD/DUP Function (SFUNCT = xxxADD or xxxDUP). Check function code and perform pre-initialization processing. Earliest developer intercept point — runs for every transaction and every function. AA100-CHECK-FUNCTION insert_main.htm#insert001029 MAIN Narrative for ADD function. https://www.magec.com/DOC/genmmp_main.htm#genmmp002003 MAIN Narrative for DUP function. https://www.magec.com/DOC/genmmp_main.htm#genmmp002013 MAIN Initialize working storage areas. Runs for all maintenance functions. BA100-INIT-STORAGE insert_main.htm#insert001016 MAIN Mainline logic for all maintenance functions. https://www.magec.com/DOC/genmmp_main.htm#genmmp004057 MAIN Maintenance mainline processing; handles PF key detection. insert_main.htm#insert001028 MAIN AAM200-MAINTENANCE-MAINLINE First 10-bytes of Mask Area give Mask ID, Cursor position, Entry key detection (ENTER, CLEAR, PF1, PA1, etc.). TWA-MSK-AREA https://www.magec.com/DOC/genmmp_main.htm#genmmp004025 MAIN Initialize screen attributes and table processing. BA210-MAINT-SCREEN insert_main.htm#insert001017 MAIN list of 3270 attributes and their meanings. 3270 Attributes https://www.magec.com/DOC/magref_main.htm#MAGREF001001 MAIN Normalize the key value entered by the operator — reformat and validate it. insert_main.htm#insert001026 MAIN BA400-NORMALIZE-MAINT-KEY Determines the path after key normalization. An invalid key routes to the error path. If this is the DUP function and TEST-KEY equals TWA-LAST-KEY (duplicating the previously displayed record), the flow reads that record by key to get the data to be duplicated. Otherwise (new ADD), the flow proceeds directly toward the screen edit / build steps. Dthis is the DUP function and TEST-KEY equals TWA-LAST-KEY (duplicating the previously displayed record), the flow reads that record by key to get data to be duplicated. Otherwise (new ADD), the flow proceeds directly toward the screen edit / build steps. Read the record by key — used by the DUP function to retrieve the source record being duplicated.insert_main.htm#insert001031MAINAAM410-READ-BY-KEY Perform logical join validation across related data classes after the duplicate-check read. JA100-LOGICAL-JOIN insert_main.htm#insert001018 MAIN Evaluates the result of the duplicate-check read and join. NOT FOUND in New Transaction Mode blanks the screen (key is available for use). REC FOUND means a duplicate already exists on file — fill the screen to show it to the operator. NOT FOUND in Continuation Mode means the key is confirmed available — proceed to screen edit and build the new record. Evaluates the result of the duplicate-check read and join. NOT FOUND in New Transaction Mode blanks the screen (key is available for use). REC FOUND means a duplicate already exists on file — fill the screen to show it to the operator. NOT FOUND in Continuation Mode means the key is confirmed available — proceed to screen edit and build the new record. NOT FOUND in New Transaction Mode blanks the screen (key is available for use). REC FOUND means a duplicate already exists on file — fill the screen to show it to the operator. NOT FOUND in Continuation Mode means the key is confirmed available — proceed to screen edit and build the new record. Blank the screen — reached when the key was not found in New Transaction Mode, meaning the key is available to use. BB100-BLANK-SCREEN insert_main.htm#insert001003 MAIN Fill screen with data when a duplicate record is found on file — shown to the operator as a conflict. BB200-FILL-SCREEN insert_main.htm#insert001005 MAIN Perform first-pass screen editing for the new record being added. BB500-SCREEN-EDIT insert_main.htm#insert001009 MAIN Perform second-pass screen editing. BB500-SCREEN-EDIT insert_main.htm#insert001010 MAIN Perform second-pass screen editing. BB500-SCREEN-EDIT insert_main.htm#insert001010 MAIN Perform second-pass screen editing. BB500-SCREEN-EDIT-2 insert_main.htm#insert001010 MAIN Initialize the new record area before building it from screen data. BB600-BUILD-REC insert_main.htm#insert001001 MAIN Build the new record from screen data and perform calculations. Note: the RULPROC business rule is inserted immediately after %CALC; it may set the ERROR-FOUND condition, bypassing the add to the database. BB600-BUILD-REC insert_main.htm#insert001004 MAIN Build the new record from screen data and perform calculations. Note: the RULPROC business rule is inserted immediately after %CALC; it may set the ERROR-FOUND condition, bypassing the add to the database. BB600-BUILD-REC insert_main.htm#insert001004 MAIN Add the new record to the database. AAM710-ADD-TO-DATABASE insert_main.htm#insert001002 MAIN Tests the result of the add. Rec-Added means the add succeeded (no conflicting record was found). Not Rec-Added means the add failed (probably) because a record already exists — route to the update error path. Process successful add completion. Routes to AA800-SEND-SCREEN (GO TO TOP OF SEE FUNCTION). AAM753-GOODADD insert_main.htm#insert001013 MAIN Process successful add completion. Routes to AA800-SEND-SCREEN (GO TO TOP OF SEE FUNCTION). AAM753-GOODADD insert_main.htm#insert001013 MAIN Handle update error condition — the add failed because a conflicting record was found. AAM751-UPDERR insert_main.htm#insert001044 MAIN Send the resulting screen back to the terminal. SCOMPL usually contains a "completion message" telling what the results were, Send the resulting screen back to the terminal. SCOMPL usually contains a "completion message" telling what the results were, Send the resulting screen back to the terminal. All paths converge here: blank screen, fill screen, good add, and update error. AA800-SEND-SCREEN insert_main.htm#insert001039 MAIN Return control to the caller (GOBACK). AA900-GOBACK insert_main.htm#insert001012 MAIN ADD/DUP Function processing complete. Figure 06 - ADD/DUP