| Server IP : 138.197.176.125 / Your IP : 216.73.217.122 Web Server : Apache/2.4.41 (Ubuntu) System : Linux SuiteCRM-8 5.4.0-216-generic #236-Ubuntu SMP Fri Apr 11 19:53:21 UTC 2025 x86_64 User : root ( 0) PHP Version : 8.3.19 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /var/www/eyeclinic/ |
Upload File : |
<?php
include_once('vtlib/Vtiger/Menu.php');
include_once('vtlib/Vtiger/Module.php');
// Create module instance and save it first
/*
$module = new Vtiger_Module();
$module->name = "Dispense";
$module->parent = 'PATIENT';
$module->save();
$module->initTables();
$module->initWebservice();
$block1 = new Vtiger_Block();
$block1->label = "LBL_DISPENSE_GLASSES";
$module->addBlock($block1);
$field1 = new Vtiger_Field();
$field1->name = 'dispense_no';
$field1->label= 'Dispense No';
$field1->uitype= 4;
$field1->column = $field1->name;
$field1->columntype = 'VARCHAR(255)';
$field1->typeofdata = 'V~M';
$block1->addField($field1);
$module->setEntityIdentifier($field1);
$field2 = new Vtiger_Field();
$field2->name = 'patient_detail';
$field2->label= 'Patient Detail';
$field2->uitype= 10;
$field2->column = $field2->name;
$field2->columntype = 'VARCHAR(100)';
$field2->table = $module->basetable;
$field2->typeofdata = 'V~O';
$block1->addField($field2);
$field3 = new Vtiger_Field();
$field3->name = 'dispense_date';
$field3->label= 'Date';
$field3->uitype= 5;
$field3->column = $field3->name;
$field3->columntype = 'Date';
$field3->table = $module->basetable;
$field3->typeofdata = 'D~O';
$block1->addField($field3);
$field30 = new Vtiger_Field();
$field30->name = 'lenstype';
$field30->label= 'Lens Type';
$field30->uitype= 15;
$field30->column = $field30->name;
$field30->table = $module->basetable;
$field30->typeofdata = 'V~O';
$block1->addField($field30);
$field30->setPicklistValues(array('Single Vision Distance','Single Vision Intermediate','Single Vision Reading','Bifocal','Varifocal'));
$mfield10 = new Vtiger_Field();
$mfield10->name = 'dispense_by';
$mfield10->label = 'Dispense by';
$mfield10->column = $mfield10->name;
$mfield10->uitype = 53;
$mfield10->table = $module->basetable;
$mfield10->typeofdata = 'V~O';
$block1->addField($mfield10);
$field8 = new Vtiger_Field();
$field8->name = 'dispense_number';
$field8->label= 'Dispense Number';
$field8->uitype= 2;
$field8->column = $field8->name;
$field8->table = $module->basetable;
$field8->columntype = 'INT(10)';
$field8->typeofdata = 'I~O';
$block1->addField($field8);
$field3 = new Vtiger_Field();
$field3->name = 'expected_due_date';
$field3->label= 'Expected Due Date';
$field3->uitype= 5;
$field3->column = $field3->name;
$field3->columntype = 'Date';
$field3->table = $module->basetable;
$field3->typeofdata = 'D~O';
$block1->addField($field3);
// Recommended common fields every Entity module should have (linked to core table)
$mfield1 = new Vtiger_Field();
$mfield1->name = 'assigned_user_id';
$mfield1->label = 'Assigned To';
$mfield1->table = 'vtiger_crmentity';
$mfield1->column = 'smownerid';
$mfield1->uitype = 53;
$mfield1->typeofdata = 'V~M';
$block1->addField($mfield1);
$mfield2 = new Vtiger_Field();
$mfield2->name = 'createdtime';
$mfield2->label= 'Created Time';
$mfield2->table = 'vtiger_crmentity';
$mfield2->column = 'createdtime';
$mfield2->uitype = 70;
$mfield2->typeofdata = 'DT~O';
$mfield2->displaytype= 2;
$block1->addField($mfield2);
$mfield3 = new Vtiger_Field();
$mfield3->name = 'modifiedtime';
$mfield3->label= 'Modified Time';
$mfield3->table = 'vtiger_crmentity';
$mfield3->column = 'modifiedtime';
$mfield3->uitype = 70;
$mfield3->typeofdata = 'DT~O';
$mfield3->displaytype= 2;
$block1->addField($mfield3);
$filter1 = new Vtiger_Filter();
$filter1->name = 'All';
$filter1->isdefault = true;
$module->addFilter($filter1);
// Add fields to the filter created
$filter1->addField($field2)
->addField($field1, 1)
->addField($field3, 2)
->addField($mfield10, 3)
->addField($field8, 4)
->addField($mfield1, 5)
->addField($mfield2, 6)
->addField($mfield3, 7);
// Set sharing access of this module /
//$module->setDefaultSharing('Private');
// Sharing Access Setup
$module->setDefaultSharing();
// Enable and Disable available tools
$module->enableTools(Array('Import', 'Export'));
//$module->disableTools('Merge');
*/
$module = new Vtiger_Module();
$module->name = 'Dispense';
$module = $module->getInstance('Dispense');
$block1 = new Vtiger_Block();
//$block1->label = 'LBL_DISPENSE_GLASSES';
$block1->label = 'LBL_GLASSSES_INFORMATION';
$block1 = $block1->getInstance($block1->label,$module);
/*$field2 = new Vtiger_Field();
$field2->name = 'repair_type';
$field2->label= 'Repair Type';
$field2->uitype= 15;
$field2->column = $field2->name;
$field2->columntype = 'VARCHAR(100)';
$field2->table = $module->basetable;
$field2->typeofdata = 'V~O';
$block1->addField($field2);
$field2->setPicklistValues(array('NHS/Private'));*/
$field3 = new Vtiger_Field();
$field3->name = 'cl_subscription_period';
$field3->label= 'CL Subscription Period';
$field3->uitype= 15;
$field3->column = $field3->name;
$field3->columntype = 'VARCHAR(100)';
$field3->table = 'vtiger_glasses_information';
$field3->typeofdata = 'V~O';
$block1->addField($field3);
$field3->setPicklistValues(array('1', '2', '3','4', '5', '6', '7', '8', '9', '10', '11', '12'));
echo "Done";exit;
// $field30 = new Vtiger_Field();
// $field30->name = 'lenstype';
// $field30->label= 'Lens Type';
// $field30->uitype= 15;
// $field30->column = $field30->name;
// $field30->table = $module->basetable;
// $field30->typeofdata = 'V~O';
// $block1->addField($field30);
// $field30->setPicklistValues(array('Single Vision Distance','Single Vision Intermediate','Single Vision Reading','Bifocal','Varifocal'));
// echo "Done";exit;*/
// $module = new Vtiger_Module();
// $module->name = 'Dispense';
// $module = $module->getInstance('Dispense');
// $block1 = new Vtiger_Block();
// $block1->label = 'LBL_INVENTORY_MATERIAL_INFORMATIONS';
// $block1 = $block1->getInstance($block1->label,$module);
/*
$field2 = new Vtiger_Field();
$field2->name = 'draft_record';
$field2->label= 'Draft Record';
$field2->uitype= 2;
$field2->displaytype=3;
$field2->column = $field2->name;
$field2->columntype = 'INT(10)';
$field2->table = $module->basetable;
$field2->typeofdata = 'V~O';
$block1->addField($field2);*/
/*$block1 = new Vtiger_Block();
$block1->label = "LBL_INVENTORY_MATERIAL_INFORMATIONS";
$module->addBlock($block1);
*/
/*$field10 = new Vtiger_Field();
$field10->label = 'Frame';
$field10->name = 'frame';
$field10->column =$field10->name;
$field10->uitype = 10;
$field10->typeofdata = 'V~O';
$block1->addField($field10);
$field10->setRelatedModules(Array('InventoryMaterial'));*/