22 lines
906 B
SQL
Executable File
22 lines
906 B
SQL
Executable File
|
|
/* label Cobol = 100301
|
|
Update tabella tipi card per interfaccia con Pms 04/04/19 A.B.
|
|
Iserto operatore per money interface 15/04/19 A.B.
|
|
*/
|
|
connect to 'SYSMONEY' 'SYSADM' '';
|
|
|
|
ALTER TABLE DEFAULT_TIPCARD ADD (TPC_TIP_UTI CHAR(1));
|
|
ALTER TABLE DEFAULT_TIPCARD ADD (TPC_FL_GEST_PMS SMALLINT);
|
|
ALTER TABLE DEFAULT_TIPCARD ADD (TPC_LIM_MONTH_SPE DECIMAL(10,2));
|
|
ALTER TABLE DEFAULT_TIPCARD ADD (TPC_FL_SCO_ART SMALLINT);
|
|
ALTER TABLE DEFAULT_TIPCARD ADD (TPC_FL_SALDO_DEBITO SMALLINT);
|
|
UPDATE DEFAULT_TIPCARD SET TPC_TIP_UTI = 'C';
|
|
UPDATE DEFAULT_TIPCARD SET TPC_FL_GEST_PMS = 1;
|
|
UPDATE DEFAULT_TIPCARD SET TPC_LIM_MONTH_SPE = 0;
|
|
UPDATE DEFAULT_TIPCARD SET TPC_FL_SCO_ART = 0;
|
|
UPDATE DEFAULT_TIPCARD SET TPC_FL_SALDO_DEBITO = 0;
|
|
INSERT INTO MENUOP VALUES('MSCK', 'Money Interface', 'MSCKMSCK', 'DEFAULT', '', '', '', '', '', '', '', '', '', 'DEFAULT', '', '', '');
|
|
disconnect;
|
|
quit;
|
|
|