UTIL - Utility Management

APIs For This Group

ADHUTIL - Add Utility Header Entry

BOTH            K3SOBJ            'K3S Object library'            10A
BOTH            COMP              'Company'                        1A
BOTH            COMPCOD           'Company code'                   3A
BOTH            USER              'User calling the program'      10A
BOTH            ERRORS            'Error indicator'                1A
BOTH            ERRMSG            'Error message'                100A
BOTH            ERRFIELD          'Field in error'                20A
BOTH            SBVAL             'Value'                         10A
BOTH            SBSEQUENC         'Sequence Number'                3A
BOTH            SBDESC            'Description'                   50A
BOTH            SBPROTECT         'Protect'                        1A
BOTH            SBUSERN1          'View Authority'                 5 0
BOTH            SBUSERN2          'Edit Authority'                 5 0
BOTH            SBUSERN3          'Upload Authority'               5 0

UPHUTIL - Update Utility Header Entry

BOTH            K3SOBJ            'K3S Object library'            10A
BOTH            COMP              'Company'                        1A
BOTH            COMPCOD           'Company code'                   3A
BOTH            USER              'User calling the program'      10A
BOTH            ERRORS            'Error indicator'                1A
BOTH            ERRMSG            'Error message'                100A
BOTH            ERRFIELD          'Field in error'                20A
BOTH            IDULID            'Utility ID'                     8 0
BOTH            SBDESC            'Description'                   50A
BOTH            SBPROTECT         'Protect'                        1A
BOTH            SBUSERN1          'View Authority'                 5 0
BOTH            SBUSERN2          'Edit Authority'                 5 0
BOTH            SBUSERN3          'Upload Authority'               5 0

DEHUTIL - Delete Utility Header Entry

BOTH            K3SOBJ            'K3S Object library'            10A
BOTH            COMP              'Company'                        1A
BOTH            COMPCOD           'Company code'                   3A
BOTH            USER              'User calling the program'      10A
BOTH            ERRORS            'Error indicator'                1A
BOTH            ERRMSG            'Error message'                100A
BOTH            ERRFIELD          'Field in error'                20A
BOTH            IDULID            'Utility ID'                     8 0
BOTH            IDDELREC          'Delete Record'                  1A

ADDUTIL - Add Utility Entry

BOTH            K3SOBJ            'K3S Object library'            10A
BOTH            COMP              'Company'                        1A
BOTH            COMPCOD           'Company code'                   3A
BOTH            USER              'User calling the program'      10A
BOTH            ERRORS            'Error indicator'                1A
BOTH            ERRMSG            'Error message'                100A
BOTH            ERRFIELD          'Field in error'                20A
BOTH            SBLOCN            'Location ID'                    5A
BOTH            SBTYPE            'Type'                           10A
BOTH            SBVAL             'Value'                          10A
BOTH            SBSEQUENC         'Sequence'                       3A
BOTH            SBDESC            'Description'                   50A
BOTH            SBPROTECT         'Protect'                        1A
BOTH            SBUSER            'User Field'                    10A
BOTH            SBPROGRAM         'Program'                       10A
BOTH            SBULID            'Unique ID'                      8 0
BOTH            SBBUYR            'Buyer ID'                      10A
BOTH            SBSUPL            'Supplier ID'                   10A
BOTH            SBSUPLSUB         'Supplier Sub Code'             10A
BOTH            SBPROD            'Product ID'                    25A
BOTH            SBPONUM           'Purchase Order Number'         10A
BOTH            SBUSERA1          'User defined alpha 1'           1A
BOTH            SBUSERA2          'User defined alpha 2'           3A
BOTH            SBUSERA3          'User defined alpha 3'           3A
BOTH            SBUSERA4          'User defined alpha 4'          10A
BOTH            SBUSERA5          'User defined alpha 5'          10A
BOTH            SBUSERA6          'User defined alpha 6'          25A
BOTH            SBUSERA7          'User defined alpha 7'          25A
BOTH            SBUSERA8          'User defined alpha 8'          50A
BOTH            SBUSERA9          'User defined alpha 9'          50A
BOTH            SBUSERN1          'User defined number 1'          5 0
BOTH            SBUSERN2          'User defined number 2'          5 0
BOTH            SBUSERN3          'User defined number 3'          5 0
BOTH            SBUSERN4          'User defined number 4'          7 2
BOTH            SBUSERN5          'User defined number 5'          7 2
BOTH            SBUSERN6          'User defined number 6'          7 2
BOTH            SBUSERN7          'User defined number 7'         11 4
BOTH            SBUSERN8          'User defined number 8'         11 4
BOTH            SBUSERN9          'User defined number 9'         11 4

PROUTIL - Toggle Utility Protect Flag

BOTH            K3SOBJ            'K3S Object library'            10A
BOTH            COMP              'Company'                        1A
BOTH            COMPCOD           'Company code'                   3A
BOTH            USER              'User calling the program'      10A
BOTH            ERRORS            'Error indicator'                1A
BOTH            ERRMSG            'Error message'                100A
BOTH            ERRFIELD          'Field in error'                20A
BOTH            IDULID            'Utility ID'                     8 0
BOTH            SBUSER            'User or Pgm Calling'            1A

UPDUTIL - Update Utility Entry

BOTH            K3SOBJ            'K3S Object library'            10A
BOTH            COMP              'Company'                        1A
BOTH            COMPCOD           'Company code'                   3A
BOTH            USER              'User calling the program'      10A
BOTH            ERRORS            'Error indicator'                1A
BOTH            ERRMSG            'Error message'                100A
BOTH            ERRFIELD          'Field in error'                20A
BOTH            IDID              'Utility ID'                     8 0
BOTH            SBLOCN            'Location ID'                    5A
BOTH            SBVAL             'Value'                         10A
BOTH            SBSEQUENC         'Sequence'                       3A
BOTH            SBDESC            'Description'                   50A
BOTH            SBPROTECT         'Protect'                        1A
BOTH            SBUSER            'User Field'                    10A
BOTH            SBPROGRAM         'Program'                       10A
BOTH            SBULID            'Unique ID'                      8 0
BOTH            SBBUYR            'Buyer ID'                      10A
BOTH            SBSUPL            'Supplier ID'                   10A
BOTH            SBSUPLSUB         'Supplier Sub Code'             10A
BOTH            SBPROD            'Product ID'                    25A
BOTH            SBPONUM           'Purchase Order Number'         10A
BOTH            SBUSERA1          'User defined alpha 1'           1A
BOTH            SBUSERA2          'User defined alpha 2'           3A
BOTH            SBUSERA3          'User defined alpha 3'           3A
BOTH            SBUSERA4          'User defined alpha 4'          10A
BOTH            SBUSERA5          'User defined alpha 5'          10A
BOTH            SBUSERA6          'User defined alpha 6'          25A
BOTH            SBUSERA7          'User defined alpha 7'          25A
BOTH            SBUSERA8          'User defined alpha 8'          50A
BOTH            SBUSERA9          'User defined alpha 9'          50A
BOTH            SBUSERN1          'User defined number 1'          5 0
BOTH            SBUSERN2          'User defined number 2'          5 0
BOTH            SBUSERN3          'User defined number 3'          5 0
BOTH            SBUSERN4          'User defined number 4'          7 2
BOTH            SBUSERN5          'User defined number 5'          7 2
BOTH            SBUSERN6          'User defined number 6'          7 2
BOTH            SBUSERN7          'User defined number 7'         11 4
BOTH            SBUSERN8          'User defined number 8'         11 4
BOTH            SBUSERN9          'User defined number 9'         11 4
BOTH            SBUSRCALL         'User: 1; Program: 0'            1A

DELUTIL - Delete Utility Entry

BOTH            K3SOBJ            'K3S Object library'            10A
BOTH            COMP              'Company'                        1A
BOTH            COMPCOD           'Company code'                   3A
BOTH            USER              'User calling the program'      10A
BOTH            ERRORS            'Error indicator'                1A
BOTH            ERRMSG            'Error message'                100A
BOTH            ERRFIELD          'Field in error'                20A
BOTH            IDULID            'Utility ID'                     8 0
BOTH            SBUSRCALL         'User: 1; Program: 0'            1A

UPCUTIL - Update Column Settings

BOTH            K3SOBJ            'K3S Object library'            10A
BOTH            COMP              'Company'                        1A
BOTH            COMPCOD           'Company code'                   3A
BOTH            USER              'User calling the program'      10A
BOTH            ERRORS            'Error indicator'                1A
BOTH            ERRMSG            'Error message'                100A
BOTH            ERRFIELD          'Field in error'                20A
BOTH            IDULID            'Utility ID'                     8 0
BOTH            SBUSERA1          'User defined alpha 1'          15A
BOTH            SBUSERA2          'User defined alpha 2'          15A
BOTH            SBUSERA3          'User defined alpha 3'          15A
BOTH            SBUSERA4          'User defined alpha 4'          15A
BOTH            SBUSERA5          'User defined alpha 5'          15A
BOTH            SBUSERA6          'User defined alpha 6'          15A
BOTH            SBUSERA7          'User defined alpha 7'          15A
BOTH            SBUSERA8          'User defined alpha 8'          15A
BOTH            SBUSERA9          'User defined alpha 9'          15A
BOTH            SBUSERN1          'User defined number 1'         15A
BOTH            SBUSERN2          'User defined number 2'         15A
BOTH            SBUSERN3          'User defined number 3'         15A
BOTH            SBUSERN4          'User defined number 4'         15A
BOTH            SBUSERN5          'User defined number 5'         15A
BOTH            SBUSERN6          'User defined number 6'         15A
BOTH            SBUSERN7          'User defined number 7'         15A
BOTH            SBUSERN8          'User defined number 8'         15A
BOTH            SBUSERN9          'User defined number 9'         15A
BOTH            SBUSERA1D         'User defined alpha 1 display'   1A
BOTH            SBUSERA2D         'User defined alpha 2 display'   1A
BOTH            SBUSERA3D         'User defined alpha 3 display'   1A
BOTH            SBUSERA4D         'User defined alpha 4 display'   1A
BOTH            SBUSERA5D         'User defined alpha 5 display'   1A
BOTH            SBUSERA6D         'User defined alpha 6 display'   1A
BOTH            SBUSERA7D         'User defined alpha 7 display'   1A
BOTH            SBUSERA8D         'User defined alpha 8 display'   1A
BOTH            SBUSERA9D         'User defined alpha 9 display'   1A
BOTH            SBUSERN1D         'User defined number 1 display'  1A
BOTH            SBUSERN2D         'User defined number 2 display'  1A
BOTH            SBUSERN3D         'User defined number 3 display'  1A
BOTH            SBUSERN4D         'User defined number 4 display'  1A
BOTH            SBUSERN5D         'User defined number 5 display'  1A
BOTH            SBUSERN6D         'User defined number 6 display'  1A
BOTH            SBUSERN7D         'User defined number 7 display'  1A
BOTH            SBUSERN8D         'User defined number 8 display'  1A
BOTH            SBUSERN9D         'User defined number 9 display'  1A