ADPR - Add Product(s) To Order

APIs For This Group

CPYADPR - Copy Product From Another Supplier

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            IDBUYR            'Buyer ID'                       5A 
BOTH            IDLOCN            'Location ID'                    5A
BOTH            IDSUPL            'Supplier ID'                   10A
BOTH            IDSUPLSUB         'Sub supplier ID'               10A
BOTH            IDSOQSEQN         'Sequence Number'                5 0
BOTH            SBBUYR            'Selected Buyer ID'              5A
BOTH            SBLOCN            'Selected Location ID'           5A
BOTH            SBSUPL            'Selected Supplier ID'          10A
BOTH            SBSUPLSUB         'Selected Sub supplier ID'      10A
BOTH            SBPROD            'Selected Product ID'           25A

GETADPR - Get Product From Host System

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            IDBUYR            'Buyer ID'                       5A 
BOTH            IDLOCN            'Location ID'                    5A
BOTH            IDSUPL            'Supplier ID'                   10A
BOTH            IDSUPLSUB         'Sub supplier ID'               10A
BOTH            IDPROD            'PROD ID'                       25A
BOTH            IDSOQSEQN         'Sequence number'                5 0

ADDADPR - Add Nonstock Product

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            IDBUYR            'Buyer ID'                       5A 
BOTH            IDLOCN            'Location ID'                    5A
BOTH            IDSUPL            'Supplier ID'                   10A
BOTH            IDSUPLSUB         'Sub supplier ID'               10A
BOTH            IDSOQSEQN         'Sequence Number'                5 0
BOTH            SBPROD            'Product Number'                25A
BOTH            SBDESC1           'Description 1'                 40A
BOTH            SBDESC2           'Description 2'                 40A
BOTH            SBPRODSEQ         'Product Sequence'              40A
BOTH            SBMANUF           'Manufacturer'                  25A
BOTH            SBNDCUPC          'NDC/UPC'                       25A
BOTH            SBPACKSZ          'Pack Size'                     10A
BOTH            SBUOM             'Unit of Measure'                3A
BOTH            SBREGCOST         'Regular Cost'                  11 4
BOTH            SBCSTDIV          'Cost Divisor'                   5 0
BOTH            SBTIHI            'Ti/Hi'                         10A
BOTH            SBWGHT            'Weight'                         7 3
BOTH            SBWGTDIV          'Weight Divisor'                 5 0
BOTH            SBWHSLOC          'Warehouse Location'            10A
BOTH            SBVOLUM           'Volume'                         7 3  
BOTH            SBVOLDIV          'Volume Divisor'                 5 0
BOTH            SBGRP1            'Group 1'                       10A
BOTH            SBGRP2            'Group 2'                       10A
BOTH            SBGRP3            'Group 3'                       10A
BOTH            SBGRP4            'Group 4'                       10A
BOTH            SBGRP5            'Group 5'                       10A
BOTH            SBPURINC          'Purchase Increment'             5 0
BOTH            SBCNVPACK         'Convenience Pack'               7 0
BOTH            SBREBFCT          'Rebate by Factor'               3 1
BOTH            SBFORTYP          'Forecast Type'                  1 0
BOTH            SBSTAT            'Status '                        1A
BOTH            SBMINQTY          'Minimum Quantity'               7 0
BOTH            SBBUYMULT         'Buy Multiple'                   7 0
BOTH            SBCONTR           'Contract Exists'                1 0
BOTH            SBMFOUT           'Manufacture out of Stock'       1 0
BOTH            SBALTSRC          'Alternate Source Flag'          1 0 

ADSADPR - Add Product From Another Supplier

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            IDBUYR            'Buyer ID'                       5A 
BOTH            IDLOCN            'Location ID'                    5A
BOTH            IDSUPL            'Supplier ID'                   10A
BOTH            IDSUPLSUB         'Sub supplier ID'               10A
BOTH            IDSOQSEQN         'Sequence Number'                5 0
BOTH            SBBUYR            'Buyer ID'                       5A 
BOTH            SBLOCN            'Location ID'                    5A
BOTH            SBSUPL            'Supplier ID'                   10A
BOTH            SBSUPLSUB         'Sub supplier ID'               10A
BOTH            SBPROD            'Selected Product ID'           25A
BOTH            SBQTYOR           'Quantity Ordered'               7 0
BOTH            SBORDCST          'Order Cost'                    11 4
BOTH            SBCSTDIV          'Cost Divisor'                   5 0

CPAADPR - Copy All Products from another Supplier

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            IDBUYR            'Buyer ID'                       5A 
BOTH            IDLOCN            'Location ID'                    5A
BOTH            IDSUPL            'Supplier ID'                   10A
BOTH            IDSUPLSUB         'Sub supplier ID'               10A
BOTH            IDSOQSEQN         'Sequence Number'                5 0
BOTH            SBBUYR            'Selected Buyer ID'              5A
BOTH            SBLOCN            'Selected Location ID'           5A
BOTH            SBSUPL            'Selected Supplier ID'          10A
BOTH            SBSUPLSUB         'Selected Sub supplier ID'      10A