DB2 Sample SQL

gistfile1.txt

```sql
SELECT PART, SUPPLIER, PRODNUM, PRODUCT
FROM (SELECT PART, PROD# AS PRODNUM, SUPPLIER
FROM PARTS
WHERE PROD# < 200) AS PARTX
LEFT OUTER JOIN PRODUCTS
ON PRODNUM = PROD#;
```

SELECT;
WHEN SQLSTATE = '00000';
Dummy = 0;
WHEN SQLSTATE = '02000';
ErrorMsg = 'MATCH NOT FOUND';
Phone 9999999999;
NEXTCDATE = D'9999-09-09';
LDCalled D'9999-09-09';
SlsNumber = -999 ;
WHEN %Subst (SQLState :1:2) = '01';
ErrorMsg = 'Warning Occurred';
NEXTCDATE = D'9999-09-09';
I
LDCalled = D'9999-09-09';
SlsNumber = -999;
OTHER;
ErrorMsg = 'Error Occurred';
NEXTCDATE = D'9999-09-09';
LDCalled D'9999-09-09';
SlsNumber = -999 ;
ENDSL;
IF INDLDCalled = -1;
ErrorMsg = 'UNKNOWN DATE';
NEXTCDATE = D'9999-09-09';
LDCalled D'9999-09-09';
ELSE;
IF INDLDCalled <> 0;