{
    "header": {
        "version": 1,
        "type": "record"
    },
    "body": {
        "record1": {
            "<1>": "declare function rowexists, msg, recipe_comm\r\ndeclare subroutine forward_event, record_lock, create_note\r\n\r\n$insert quote_sigs_equ\r\n$insert recipe_equ\r\n$INSERT NOTIFICATION_EQU\r\n\r\nif @@window->savewarn then\r\n\tModArray = .mod_info->array\r\n\tModArray = insert( ModArray, 1, 1, 0, @user4 )\r\n\tModArray = insert( ModArray, 2, 1, 0, oconv( @user4, '[XLATE_CONV,LSL_USERS*FIRST_LAST]' ) )\r\n\tModArray = insert( ModArray, 3, 1, 0, oconv( date(), 'D2/' ) )\r\n\t.mod_info->array = ModArray\r\n\tRecipeNo = .recipe_no->text\t\r\n\t\r\n\tif RecipeNo <> '' then\r\n\t        \r\n\t    SendTo = XLATE('NOTIFICATION','RECIPE_CHANGE',NOTIFICATION_USER_ID$,'X')\r\n\t    \r\n\t\tif rowexists( 'RECIPE', RecipeNo ) then\r\n\t\t   create_note( SendTo, 'System', 'Recipe Modification', 'This recipe was modified by ':oconv( @user4, '[XLATE_CONV,LSL_USERS*FIRST_LAST]' ):' on ':oconv( date(), 'D2/' ):' at ':oconv( time(), 'MTH' ):'.', 'RECIPE', .recipe_no->text )\t        \t\r\n\t\tend else\r\n\t\t   .entry_id->text = @user4\r\n\t\t   create_note( SendTo, 'System', 'New Recipe', 'This recipe was entered by ':oconv( @user4, '[XLATE_CONV,LSL_USERS*FIRST_LAST]' ):' on ':oconv( date(), 'D2/' ):' at ':oconv( time(), 'MTH' ):'.', 'RECIPE', .recipe_no->text )\t        \r\n\t\tend\r\n    end\r\n    Void = recipe_comm( 'WRITE_STAMP' )\r\nend  \r\nreturn 1\r\n"
        }
    }
}