CHGP - Change Product Source

Apr 22, 2024

APIs For This Group

• ADDCHGP - Add Change Product Source Entry
• DELCHGP - Delete Change Product Source Entry
• UPDCHGP - Update Change Product Source Entry
• DLSCHGP - Delete All records specific to Old/New Supplier
• ADVCHGP - Add change product source (NO VALIDATION)

ADDCHGP - Add Change Product Source 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           IDBUYR            'Buyer ID'                          5A
BOTH           IDLOCN            'Location ID'                       5A
BOTH           IDRECTYP          'Type of Record'                    1A
BOTH           IDSUPL            'Supplier ID'                      10A
BOTH           IDSUPLSUB         'Sub supplier ID'                  10A
BOTH           IDPROD            'Product ID'                       25A
BOTH           PRDBUYR           'Product Buyer ID                   5A  
BOTH           NEWBUYR           'New Buyer ID'                      5A
BOTH           NEWSUPL           'Supplier ID'                      10A
BOTH           NEWSUB            'Sub supplier ID'                  10A

DELCHGP - Delete Change Product Source 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           IDLOCN            'Location ID'                       5A
BOTH           IDRECTYP          'Type of Record'                    1A
BOTH           IDSUPL            'Supplier ID'                      10A
BOTH           IDSUPLSUB         'Sub supplier ID'                  10A
BOTH           IDPROD            'Product ID'                       25A
BOTH           NEWSUPL           'Supplier ID'                      10A
BOTH           NEWSUB            'Sub supplier ID'                  10A

UPDCHGP - Update Change Product Source 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           IDBUYR            'Buyer ID'                           5A
BOTH           IDLOCN            'Location ID'                       5A
BOTH           IDRECTYP          'Type of Record'                    1A
BOTH           IDSUPL            'Supplier ID'                      10A
BOTH           IDSUPLSUB         'Sub supplier ID'                  10A
BOTH           IDPROD            'Product ID'                       25A
BOTH           NEWBUYR           'New Buyer ID'                      5A
BOTH           NEWSUPL           'Supplier ID'                      10A
BOTH           NEWSUB            'Sub supplier ID'                  10A

DLSCHGP - Delete All records specific to Old/New 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           IDLOCN            'Location ID'                       5A
BOTH           IDRECTYP          'Type of Record'                    1A
BOTH           IDSUPL            'Supplier ID'                      10A
BOTH           IDSUPLSUB         'Sub supplier ID'                  10A
BOTH           NEWSUPL           'Supplier ID'                      10A
BOTH           NEWSUB            'Sub supplier ID'                  10A

ADVCHGP - Add change product source (NO VALIDATION)

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           IDLOCN            'Location ID'                       5A
BOTH           IDRECTYP          'Type of Record'                    1A
BOTH           IDSUPL            'Supplier ID'                      10A
BOTH           IDSUPLSUB         'Sub supplier ID'                  10A
BOTH           IDPROD            'Product ID'                       25A
BOTH           NEWSUPL           'Supplier ID'                      10A
BOTH           NEWSUB            'Sub supplier ID'                  10A

---