锘??xml version="1.0" encoding="utf-8" standalone="yes"?>
聽(tīng)
SELECT myNum, SUM(myValue) FROM anotherTable GROUP BY myNum WHERE myNUM <= 100;
---------------------------
return [#CurrentVersion, #CurrentList];
---------------------------
if (typeof(conPeek(packedClass,1)) != Types::INTEGER)
---------------------------
new MenuFunction(menuItemDisplayStr(SalesTable), MenuItemType::Display).run(args);
---------------------------
Query querySalesTable;
聽(tīng)聽(tīng)聽(tīng) querySalesTable.dataSourceTable(tableNum(SalesTable)).addRange(fieldNum(SalesTable, InterCompanyOrder)).value(queryValue(NoYes::Yes));
---------------------------
Common聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) common;
聽(tīng)聽(tīng)聽(tīng) ;
聽(tīng)聽(tīng)聽(tīng) this.handleDeleteActions(sysDictTable);
聽(tīng)聽(tīng)聽(tīng) common = sysDictTable.makeRecord();
聽(tīng)聽(tīng)聽(tīng) common.skipDatabaseLog(true);
聽(tīng)聽(tīng)聽(tīng) common.skipDataMethods(true);
聽(tīng)聽(tīng)聽(tīng) common.skipDeleteActions(true);
聽(tīng)聽(tīng)聽(tīng) delete_from common;
----------------------------
Dictionary聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) dictionary = new Dictionary();
tableId = dictionary.tableNext(tableId);
----------------------------
tableNum(SalesTable):
----------------------------
MyTable myTable;
RecordInsertList insertList = new RecordInsertList(myTable.TableId, True);
int i;
for ( i = 1; i <=聽(tīng) 100; i++ )
{
myTable.value = i;
insertList.add(myTable);
}
insertList.insertDatabase();
}
-----------------------------
int p2 = strFind(line,' ',p1,strLen(line));
return subStr(line,p1,p2-p1);
----------------------------------
聽(tīng)if (o && (o.handle() == classIdGet(fr))
--------------------------------
return (dictFeatureKey.rights() != AccessType::NoAccess) ? true : false;
-------------------------------
kmQuestion.answerInputType聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) = KMQuestionAnswerInputType::CheckBox;
kmQuestion.answerInputType聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) = KMQuestionAnswerInputType::ComboBox;
kmQuestion.answerInputType聽(tīng) = KMQuestionAnswerInputType::RadioButton;
kmQuestion.answerInputType聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) = str2Int(kmQuestion.DEL_answerModeSelection);
--------------------------------
select sum(correctAnswer) from KMVirtualNetworkAnswerLine
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) group by kmVirtualNetworkAnswerTableId, kmQuestionResultGroupId
--------------------------------
kmConnectionType.refFieldId = fieldNum(HRMCourseTable, description);
--------------------------------
segment += ':' + date2str(_date,321,2,0,2,0,4)+ subStr(time2str(_time,1,1),1,2) +
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) subStr(time2str(_time,1,1),4,2) + subStr(time2str(_time,1,1),7,2);
--------------------------------
Dialog聽(tīng)聽(tīng) dialog聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) = new Dialog("@SYS73363");
DialogField聽(tīng)聽(tīng)聽(tīng)聽(tīng) dlgClassTypeName聽(tīng) = dialog.addField(typeId(className));
Editor editor
--------------------------------
聽(tīng)filename = WinAPI::getSaveFileName(0, ['Text','*.txt'], '', "@SYS56237", 'txt', defaultName );
聽(tīng)聽(tīng)聽(tīng) if (filename)
聽(tīng)聽(tīng)聽(tīng) {
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) io = new AsciiIo(filename, 'W');
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) io.write(EditorScripts::getSelectedText(e));
聽(tīng)聽(tīng)聽(tīng) }
---------------------------------
switch (version)
聽(tīng)聽(tīng)聽(tīng) {
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) case(#CurrentVersion) :
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) [version,#CurrentList,packedQuery] = packedClass;
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) if (packedQuery)
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) qr = new QueryRun(packedQuery);
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) break;
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) default :
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) return false;
聽(tīng)聽(tīng)聽(tīng) }
--------------------------------
select workCalendarDateLine
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) index CalendarDateFromIdx
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) where workCalendarDateLine.calendarId聽(tīng)聽(tīng) == calendarId
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) && workCalendarDateLine.transDate聽(tīng)聽(tīng)聽(tīng) == transDate
---------------------------------
#define.dateFormat('DD/MM/YYYY hh:mm:ss')
default:
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) warning(strFmt("@SYS24561",classIdGet(gantt)));
--------------------------------
聽(tīng)AsciiIo logFile = new AsciiIo(#VTHeapLog, 'a');
聽(tīng)聽(tīng)聽(tīng) ;
聽(tīng)聽(tīng)聽(tīng) logFile.write(this.prompt('聽(tīng) Unfreed object'), conPeek(data,2));
--------------------------------
select firstonly ledgerPeriod
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) order by periodStart desc
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) where ledgerPeriod.periodStart聽(tīng) <= _transDate聽(tīng)聽(tīng) &&
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) ledgerPeriod.periodCode聽(tīng)聽(tīng) == _periodCode;
---------------------------------
client server static boolean checkFailed(SysInfoLogStr txt, URL helpURL = '', SysInfoAction _sysInfoAction = null)
{
聽(tīng)聽(tīng)聽(tīng) if (BMMainControl::inAction())
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) appl.BMaddInfo(Exception::Info,txt);
聽(tīng)聽(tīng)聽(tīng) else
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) infolog.add(Exception::Warning, getprefix()+txt, helpURL, _sysInfoAction, false);
聽(tīng)聽(tīng)聽(tīng) return false;
}
------------------------------------
switch(itemCode)
聽(tīng)聽(tīng)聽(tīng) {
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) case TableGroupAll::Table聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) :聽(tīng)聽(tīng) return item;
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) case TableGroupAll::GroupId聽(tīng)聽(tīng)聽(tīng)聽(tīng) :聽(tīng)聽(tīng) return groupId;
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) case TableGroupAll::All聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) :聽(tīng)聽(tīng) return '';
聽(tīng)聽(tīng)聽(tīng) }
TableGroupAll::Table//鏄釜鏋氫婦綾誨瀷錛坆ase enum錛?br />------------------------------------
void聽(tīng) new(CurrencyCode聽(tīng) _currencyCode)
{;
聽(tīng)聽(tīng)聽(tīng) currencyCode聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) = _currencyCode;
聽(tīng)聽(tīng)聽(tīng) exchRate聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) = 0;
聽(tīng)聽(tīng)聽(tīng) exchrateSecondary聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) = 0;
聽(tīng)聽(tīng)聽(tīng) exchRatesTriangulation聽(tīng) = UnknownNoYes::Unknown;
}
//褰撳緩绔嬩竴涓璞$殑鏃跺欎細(xì)璋冪敤姝ゆ柟娉?br />------------------------------------
// Create a list iterator
it = new listIterator (il);
聽(tīng)聽(tīng) print it.definitionString(); // prints 鈥渋nt list iterator鈥?br />聽(tīng)聽(tīng) print it.toString(); // prints 鈥?begin)[4]鈥?br />// Go on for as long as elements are found in the list...
while (it.more())
聽(tīng)聽(tīng) {
// fetch the next element
print it.value(); // prints 4 2 1
it.next();
聽(tīng)聽(tīng) }
print it.toString();聽(tīng)聽(tīng)聽(tīng) // prints (end)
pause;
聽(tīng)聽(tīng)聽(tīng) int i=0;
聽(tīng)聽(tīng)聽(tīng) str name="XMDDL369";
聽(tīng)聽(tīng)聽(tīng) real r_i=23.789;
聽(tīng)聽(tīng)聽(tīng) boolean b=false;
聽(tīng)聽(tīng)聽(tīng) date d1=11\11\2000;
聽(tīng)聽(tīng)聽(tīng) date d3 = 21\11\1998;
聽(tīng)聽(tīng)聽(tīng) Integer s=90;
聽(tīng)聽(tīng)聽(tīng) int a_i[3];
聽(tīng)聽(tīng)聽(tīng) a_i[0]=1;
聽(tīng)聽(tīng)聽(tīng) //驢錄虜茅祿霉鹵戮碌脛脢媒戮脻脌脿脨脥攏盧錄爐潞脧脌脿脨脥
聽(tīng)聽(tīng)聽(tīng) //脠莽潞脦脥簍鹿媒脌脿脠隆碌脙脢媒戮脻驢芒碌脛脕盧陸脫攏盧路碌祿脴?shù)浢嚸備涗洜t潞
聽(tīng)聽(tīng)聽(tīng) //脪矛魯攏碌脛虜露脳陸潞脥麓婁脌鉚
聽(tīng)聽(tīng)聽(tīng) //鹵盲脕驢碌脛脳梅脫脙脫貌
聽(tīng)聽(tīng)聽(tīng) //int a_j[3]={1,2,3};
聽(tīng)聽(tīng)聽(tīng) //*********************
聽(tīng)聽(tīng)聽(tīng) print hw.sayHello()+" XMDDL369";
聽(tīng)聽(tīng)聽(tīng) while(i<10){
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) print i;
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) i++;
聽(tīng)聽(tīng)聽(tīng) }
聽(tīng)聽(tīng)聽(tīng) print name;
聽(tīng)聽(tīng)聽(tīng) print r_i;
聽(tīng)聽(tīng)聽(tīng) //print any2str("90.9")+name;
聽(tīng)聽(tīng)聽(tīng) if(b==true)
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) print "b is true";
聽(tīng)聽(tīng)聽(tīng) else
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) print "b is not true";
聽(tīng)聽(tīng)聽(tīng) print d3;
聽(tīng)聽(tīng)聽(tīng) print dayofmth(d3);
聽(tīng)聽(tīng)聽(tīng) print dayofwk(d3);
聽(tīng)聽(tīng)聽(tīng) print dayofyr(d3);
聽(tīng)聽(tīng)聽(tīng) print s;
聽(tīng)聽(tīng)聽(tīng) hw.sayWorld();
聽(tīng)聽(tīng)聽(tīng) try
聽(tīng)聽(tīng)聽(tīng) {
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) print i/0.9;
聽(tīng)聽(tīng)聽(tīng) }
聽(tīng)聽(tīng)聽(tīng) catch (exception::error)
聽(tīng)聽(tīng)聽(tīng) {
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) print "鹵祿 0 魯媒";
聽(tīng)聽(tīng)聽(tīng) }
聽(tīng)聽(tīng)聽(tīng) ///////////////////////////
聽(tīng)聽(tīng)聽(tīng) ////////脢媒戮脻驢芒虜脵脳梅//////////
聽(tīng)聽(tīng)聽(tīng) ////////////////////////////
聽(tīng)聽(tīng)聽(tīng) //hw.find();//虜茅脩爐脢媒戮脻驢芒脠隆碌脙錄脟脗錄
聽(tīng)聽(tīng)聽(tīng) //hw.insert();聽(tīng) //脭枚隆壟脡戮隆壟賂脛隆壟虜茅攏簍CRUD攏漏
聽(tīng)聽(tīng)聽(tīng) //hw.update();
聽(tīng)聽(tīng)聽(tīng) //hw.delete();
聽(tīng)聽(tīng)聽(tīng) hw.executeBySQL(sql);
}
錛?錛塵ethod find錛堬級(jí)錛?br />void find()
{
聽(tīng)聽(tīng)聽(tīng) UserInfo ui;
聽(tīng)聽(tīng)聽(tīng) select ui where聽(tīng) ui.name=="xmddl";
聽(tīng)聽(tīng)聽(tīng) print ui.password;
聽(tīng)聽(tīng)聽(tīng) while select ui
聽(tīng)聽(tīng)聽(tīng) {聽(tīng)聽(tīng) //虜茅脩爐脣霉脫脨碌脛錄脟脗錄
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) print ui.name+"聽(tīng) "+ui.Id;
聽(tīng)聽(tīng)聽(tīng) }
}
錛?錛夈乵ethod delete錛堬級(jí)錛?br />void delete()
{
聽(tīng)聽(tīng)聽(tīng) Userinfo ui;
聽(tīng)聽(tīng)聽(tīng) ttsbegin;
聽(tīng)聽(tīng)聽(tīng) select forupdate ui where ui.Id=="new";
聽(tīng)聽(tīng)聽(tīng) //ui.Id="new";
聽(tīng)聽(tīng)聽(tīng) ui.delete();
聽(tīng)聽(tīng)聽(tīng) //ui.doDelete();
聽(tīng)聽(tīng)聽(tīng) ttscommit;
}
錛?錛夈乵ethod update錛堬級(jí)錛?br />void update()
{
聽(tīng)聽(tīng)聽(tīng) Userinfo ui;
聽(tīng)聽(tīng)聽(tīng) ttsbegin;
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) select forupdate ui where ui.id=="new";
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) ui.name="xmddl369";
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) ui.password="hello new";
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) ui.update();
聽(tīng)聽(tīng)聽(tīng) ttscommit;
}
錛?錛夈乵ethod insert錛堬級(jí)錛?br />void insert()
{
聽(tīng)聽(tīng) Userinfo ui;
聽(tīng)聽(tīng) ttsbegin;
聽(tīng)聽(tīng) ui.Id="new";
聽(tīng)聽(tīng) ui.name="xmddl";
聽(tīng)聽(tīng) ui.insert();
聽(tīng)聽(tīng) ttscommit;
聽(tīng)聽(tīng)聽(tīng) /* 脜煤脕驢賂眉脨脗
聽(tīng)聽(tīng)聽(tīng) MyTable myTable;
聽(tīng)聽(tīng)聽(tīng) RecordInsertList insertList = new RecordInsertList(myTable.TableId, True);
聽(tīng)聽(tīng)聽(tīng) int i;
聽(tīng)聽(tīng)聽(tīng) for ( i = 1; i <=聽(tīng) 100; i++ )
聽(tīng)聽(tīng)聽(tīng) {
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) myTable.value = i;
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) insertList.add(myTable);
聽(tīng)聽(tīng)聽(tīng) }
聽(tīng)聽(tīng)聽(tīng) insertList.insertDatabase();//<-----this is
聽(tīng)聽(tīng)聽(tīng) */
}
錛?錛塵ethod executeBySQL錛堬級(jí)錛?br />void executeBySQL(Str sql)
{
聽(tīng)聽(tīng)聽(tīng) Connection con=new Connection();
聽(tīng)聽(tīng)聽(tīng) Statement stmt=con.createStatement();
聽(tīng)聽(tīng)聽(tīng) ResultSet rs=stmt.executeQuery(sql);
聽(tīng)聽(tīng)聽(tīng) //stmt.executeUpdate(sql);
聽(tīng)聽(tīng)聽(tīng) while(rs.next()){
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) print "SQL "+rs.getString(1);
聽(tīng)聽(tīng)聽(tīng) }
}
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)for(m=0;m<10;m++){//can not define int m=0 in this
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)print m;
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)}
4銆佸紑鍙戠幆澧冩瑙堬細(xì)
int main(){
聽(tīng)cout<<"Hello World\n";
聽(tīng)return 0;
}聽(tīng)
錛?錛夊熀鏈暟鎹被鍨?63涓叧閿瓧
char聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) 1b
wchar-1聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) 2b
int(16bit)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) 2b
int(32bit)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) 4b
float聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) 4b
double聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) 8b
bool聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) N/A
void聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)N/A
錛?錛夋敞閲婄被浼糲
錛?錛夎漿涔夊瓧絎?br />\b閫鏍?br />\f鎹㈤〉
\n鎹㈣
\r鍥炶濺
\t姘村鉤鍒惰〃
\"鍙屽紩鍙?br />\'鍗曞紩鍙?br />\\鐮存姌鍙?br />
\v鍨傜洿鍒惰〃絎﹀彿
\a鍠囧彮鍡¢福
\?闂彿
\N鍏繘鍒跺父閲?br />\xN鍗佸叚榪涘埗甯擱噺
錛?錛夎繍綆楃錛岀被浼糲
錛?錛夌▼搴忔帶鍒惰鍙ワ紝綾諱技c
錛?錛夊瓧絎︿覆鍜屾暟緇?br />錛?錛夋寚閽?br />錛?錛夊嚱鏁幫紝寮曠敤銆侀噸杞姐侀粯璁ゅ弬鏁?br />錛?0錛夋洿澶氱殑鏁版嵁綾誨瀷錛岀粨鏋勫拰鑱斿悎錛堢被浼糲錛?br />--------------------
錛?1錛夌被
聽(tīng)聽(tīng)聽(tīng)i錛夋瀯閫犲嚱鏁板拰鏋愭瀯鍑芥暟
聽(tīng)聽(tīng)聽(tīng)ii錛夎闂檺瀹氱
聽(tīng)聽(tīng)聽(tīng)iii錛夊弸鍛樺嚱鏁?br />聽(tīng)聽(tīng)聽(tīng)iiii錛夎繍綆楃閲嶈澆
聽(tīng)聽(tīng)聽(tīng)iiiii錛夌戶鎵褲佸皝瑁呫佸鎬?br />錛?2錛夋ā鏉?br />錛?3錛塩++鐨処O緋葷粺
錛?4錛夊悕瀛楃┖闂?br />錛?5錛夋爣鍑嗘ā鏉垮簱
錛?6錛塩++棰勫鐞嗗櫒
real ii_s[2,4]={1,1,1,1,2,2,2,2}
string s_s[2,3,4]
dec{2} fj
dec jj,ii
double d
/*
榪欓噷涓哄琛屾敞閲?br />fdsfsdfds
*/
time mytime
date mydate=2006-07-07
datetime mydatetime
char c='w'
string hello="it~'s a dog"http://it's a dog
any my,you,he
blob bk
boolean b
long l
int iss
ResultSet rs
resultsets rss //涓嶅尯鍒嗗ぇ灝忓啓
//榪愮畻絎?br />/*
1銆佺畻鏈繍綆楃:*銆?銆?銆?銆乛
2銆侀昏緫榪愮畻絎?NOT銆丄ND銆丱R
3銆佸叧緋昏繍綆楃:=銆?gt;=銆?gt;銆?lt;銆?lt;=銆?lt;>
4銆佽繛鎺ヨ繍綆楃:&
*/
jj+=jj+ii
jj=jj/ii
jj=jj*ii
jj -=ii
jj +=ii
//紼嬪簭鎺у埗璇彞錛氶夋嫨銆佸驚鐜佸叾浠栬鍙?br />if jj>ii then
聽(tīng)//todo......
end if聽(tīng)
if jj>ii then
聽(tīng)//todo...
elseif jj=ii then
聽(tīng)//todo...
end if
string sss_s
sss_s = create using "string"
transaction DBTrans
DBTrans=create transaction
DBTrans.autocommit=false
DESTROY DBTrans//閿姣乧reate鍒涘緩鐨勫璞★紝open鍒涘緩鍙鍖栧璞?/font>
CHOOSE CASE jj
聽(tīng)CASE 1
聽(tīng)聽(tīng)//TODO...
聽(tīng)CASE 2
聽(tīng)聽(tīng)//TODO...
聽(tīng)CASE ELSE
聽(tīng)聽(tīng)//TODO...
END CHOOSE
/*(寰幆鍒ゆ柇)
.... DO UNTIL condition 鈥OOP
.... DO WHILE condition 鈥?LOOP
.... DO 鈥?LOOP UNTIL condition
.... DO 鈥?LOOP WHILE condition
FOR varname = start TO end [STEP increment]
statementblock
NEXT
*/
SQLCA.dbms="localhost"
//SQLCode=0鎴愬姛錛孲QLCode錛?1澶辮觸錛孲QLCode=100SQL璇彞娌℃湁榪斿洖鏁版嵁
CONNECT USING SQLCA;
DECLARE EMP_cur CURSOR FOR
select employee.fname
from employee
where employee.job_id =:i;
OPEN EMP_cur;
FETCH EMP_cur INTO :sss_s;
CLOSE EMP_cur;
select employee.fname into :sss_s //宓屽叆sql緙栫▼錛宲b鐨勭壒鑹?br />from employee
where employee.job_id =:i
using DBTrans;
if DBTrans.sqlcode=0 then
聽(tīng)//todo...
聽(tīng)COMMIT USING DBTrans;//浜嬪姟鎻愪氦
else
聽(tīng)//toto...
聽(tīng)ROLLBACK USING DBTrans;//浜嬪姟鍥炴粴
end if
DISCONNECT USING SQLCA;
(1)銆丠ALT銆丠ALT(CLOSE)
(2)銆丷ETURN
(3)銆丆REATE
(4)銆丏ESTROY
璇彞涓嶄互鍒嗗彿緇撴潫