Lotus Notes常用的Toolbar设定:查询及修改Notes当前文书全部Field及其值
2013-07-30 10:49
330 查看
下记内容需在Toolbar中新建Button的Formula内实现,新建Button方法参见这里
1.查询Notes当前文书全部Field,及被选定Field的值的方法:
List := @DocFields;
DataTypes := "Text" : "Date" : "Number" ;
EditField := @Prompt( [OkCancelList] ;"フィールドの選択" ; "表示したいフィールドを選んでください:" ;Null ; List ) ;
Edit := @Prompt( [YesNo] ; "確認" ; "このフィールドの現在の値を表示しますか \"" + EditField + "\"." );
REM { 選択されたフィールド値を取得する};
value := @Implode(@Text(@GetField(@Text(EditField)));",");
RawValue := @If( Edit = 1 ; @Prompt( [OkCancelEdit] ;"値" ; "値の確認." ; value) ;
@Return(NULL) );
@True
2.查询Notes当前文书全部Field,及修改被选定Field的值的方法:
List := @DocFields;
DataTypes := "Text" : "Date" : "Number" ;
EditField := @Prompt( [OkCancelList] ;"変更するフィールドの選択" ; "変更したいフィールドを選んでください:" ;Null ; List ) ;
Edit := @Prompt( [YesNo] ; "確認" ; "このフィールドの現在の値を変更しても良いですか \"" + EditField + "\"." );
REM { 選択されたフィールド値を取得する};
value := @Implode(@Text(@GetField(@Text(EditField)));",");
RawValue := @If( Edit = 1 ; @Prompt( [OkCancelEdit] ;"新しい値" ; "新しく変更したい値を入力してください." ; value) ;@Return(NULL) );
DataType := @Prompt( [OkCancelList] ; "データタイプ" ;"データタイプを選択してください" ; "Text" ; DataTypes );
@If( DataType = "Date" ; @SetField( EditField ; @TextToTime( RawValue )) ;
DataType = "Number" ; @SetField( EditField ; @TextToNumber( RawValue )) ;
@SetField( EditField ; RawValue ) )
1.查询Notes当前文书全部Field,及被选定Field的值的方法:
List := @DocFields;
DataTypes := "Text" : "Date" : "Number" ;
EditField := @Prompt( [OkCancelList] ;"フィールドの選択" ; "表示したいフィールドを選んでください:" ;Null ; List ) ;
Edit := @Prompt( [YesNo] ; "確認" ; "このフィールドの現在の値を表示しますか \"" + EditField + "\"." );
REM { 選択されたフィールド値を取得する};
value := @Implode(@Text(@GetField(@Text(EditField)));",");
RawValue := @If( Edit = 1 ; @Prompt( [OkCancelEdit] ;"値" ; "値の確認." ; value) ;
@Return(NULL) );
@True
2.查询Notes当前文书全部Field,及修改被选定Field的值的方法:
List := @DocFields;
DataTypes := "Text" : "Date" : "Number" ;
EditField := @Prompt( [OkCancelList] ;"変更するフィールドの選択" ; "変更したいフィールドを選んでください:" ;Null ; List ) ;
Edit := @Prompt( [YesNo] ; "確認" ; "このフィールドの現在の値を変更しても良いですか \"" + EditField + "\"." );
REM { 選択されたフィールド値を取得する};
value := @Implode(@Text(@GetField(@Text(EditField)));",");
RawValue := @If( Edit = 1 ; @Prompt( [OkCancelEdit] ;"新しい値" ; "新しく変更したい値を入力してください." ; value) ;@Return(NULL) );
DataType := @Prompt( [OkCancelList] ; "データタイプ" ;"データタイプを選択してください" ; "Text" ; DataTypes );
@If( DataType = "Date" ; @SetField( EditField ; @TextToTime( RawValue )) ;
DataType = "Number" ; @SetField( EditField ; @TextToNumber( RawValue )) ;
@SetField( EditField ; RawValue ) )
相关文章推荐
- Lotus Notes常用的Toolbar设定:获取当前Notes DB的信息
- Lotus Notes常用的Toolbar设定:一键修改字体、字号、文字颜色
- Thinkphp3.2.3 IP管理查询当前时间,并修改状态为已到期
- Direct Load Data时当前session无法查询与修改的原因
- oracle数据库修改并查询当前最大连接数
- AngularJS 用户名查询、年龄查询、性别查询、全部删除、批量删除、添加用户、修改密码
- SQL 单表查询的一些常用语句和函数及单表的插入修改删除操作
- Oracle 用户常用信息查询与设定
- Java 删除当前文件夹及其文件夹下的全部文件
- 用户信息的增删改查:非空验证添加,模糊查询,修改密码,批量和全部删除
- com.microsoft.sqlserver.jdbc.SQLServerException: 此查询使用的不是 ANSI 外部联接运算符("*=" 或 "=*")。若要不进行修改即运行此查询,请使用存储过程 sp_dbcmptlevel 将当前数据库的
- hive-2 常用函数及其查询
- java常用类练习05(用户注册、查询、修改、删除)
- Dedecms当前位置{dede:field name='position'/}修改
- dedecms织梦修改当前位置{dede:field name=“position”/}标签
- AngularJS 查询、全选、反选、全部删除、批量删除、添加、修改
- 初学Html5+CSS之表格添加用户+删除用户+修改数据+删除全部+批量删除+查询数据+内容判断
- 详述mysql的子查询及其常用使用方法
- 织梦系统“当前位置”{dede:field.position}的修改方法
- (angularjs) 数据的增删改查(添加用户,查询年龄,批量删除,全部删除,修改密码) 类似题