. * * For more information, contact Colosa Inc, 2566 Le Jeune Rd., * Coral Gables, FL, 33134, USA, or email info@colosa.com. * */ class App { function ForceLogin() { global $G_MAIN_MENU; global $G_SUB_MENU; if( $_SESSION['LOGGED_IN'] == false) { header( "location: /sys/" . SYS_LANG . "/" . SYS_SKIN . "/login/login.html" ); die(); } else { $cmptype = $_SESSION['USER_TYPE']; switch( $cmptype ) { case 'BUYER': $G_MAIN_MENU = "buyer"; $G_SUB_MENU = ""; break; case 'PROVIDER': $G_MAIN_MENU = "provider"; $G_SUB_MENU = ""; break; case 'REINSURANCE': $G_MAIN_MENU = "reinsurance"; $G_SUB_MENU = ""; break; case 'ADMIN': $G_MAIN_MENU = "admin"; $G_SUB_MENU = ""; break; case '': header( "location: /sys/" . SYS_LANG . "/" . SYS_SKIN . "/login/login.html" ); die(); break; default: $G_MAIN_MENU = "default"; $G_SUB_MENU = ""; break; } } } function GetPartnerStatus() { $slipid = $_SESSION['CURRENT_SLIP']; $partnerid = $_SESSION['CURRENT_PARTNER']; $mdbc = new DBConnection(); $slip = new Slip; $slip->SetTo( $mdbc ); $slip->Load( $slipid ); $partner = $slip->GetPartner( $partnerid ); $res = $partner->Fields['SLP_PARTNER_STATUS']; unset( $partner ); unset( $slip ); unset( $mdbc ); return $res; } function SetPartnerStatus( $intStatus = 0 ) { $slipid = $_SESSION['CURRENT_SLIP']; $partnerid = $_SESSION['CURRENT_PARTNER']; $mdbc = new DBConnection(); $slip = new Slip; $slip->SetTo( $mdbc ); $slip->Load( $slipid ); $partner = $slip->GetPartner( $partnerid ); $partner->Fields = NULL; $partner->Fields['UID_SLIP'] = $slipid; $partner->Fields['UID_REINSURANCE'] = $partnerid; $partner->Fields['SLP_PARTNER_STATUS'] = $intStatus; $partner->Fields['SLP_PARTNER_UPDATED'] = G::CurDate(); $partner->Save(); unset( $partner ); unset( $slip ); unset( $mdbc ); } } ?>