/* SQL Library File used via the Perl Module SQL::Library Refer to the SQL::Library documentation before modifying this file */ [Get_Client_Master_Limits_Brief] /* gets the master limits given a client id */ SELECT C.CLIENT_ID, C.CLIENT_NAME, C.CLIENT_SHORTCODE, M.MASTER_ID, M.MASTER_NAME, CT.COMFIN_TYPE_ID, CT.COMFIN_TYPE_NAME, ML.MASTER_LIMIT_AMOUNT, CU.CURRENCY_CODE FROM TBL_CLIENT C,TBL_MASTER M, TBL_MASTER_LIMITS ML, TBL_COMFIN_TYPE CT, TBL_CURRENCY CU WHERE ML.MASTER_LIMIT_COMFIN_TYPE_ID=CT.COMFIN_TYPE_ID AND ML.MASTER_LIMIT_MASTER_ID = M.MASTER_ID AND ML.MASTER_LIMIT_CURRENCY_ID = CU.CURRENCY_ID AND M.MASTER_ID=C.CLIENT_MASTER_ID AND C.CLIENT_ID=? [Client_Contact_Save] /* add a contact to the trade */ INSERT INTO TBL_TRADE_CLI_CON (TRADE_CLI_CON_TRADE_ID, TRADE_CLI_CON_CC_ID) VALUES (?,?) [User_Update_Password] /* updates tbl_users with a password change */ UPDATE TBL_USERS SET USERS_CURRENT_PWD = ?, USERS_LAST_PWD_CHG_DATE = ?, USERS_LOGIN_EXPIRE_DATE = ?, USERS_GRACE_LOGIN = ? WHERE USERS_ID = ?