X3开发扫盲知识-期待大家跟帖

扶程星云

就是X3开发中的基础知识，我先写，抛砖引玉！

[F:YMJ]YNUM             注释：表YMJ(缩写)的YNUM字段

[M:YMJ]YNUM            注释：屏幕YMJ(缩写)的YNUM字段

**************************************END****************

命名规则：X开头的为CN Addons而创建。Y开头的为技术服务而创建。Z为客户而创建。

**************************************END*********************************

本地菜单和杂项表
下列本地菜单范围必须按照下列规则被使用：
。为CN Addons创建的新本地菜单使用：8000-8099
。为技术服务修改而创建的新本地菜单使用 1500-1599
。为客户修改而创建的新本地菜单使用：1600-1699
下列杂项表范围必须按照下列规则被使用：
。为CN Addons而创建的新杂项表使用：1000-1099
。为技术服务修改而创建的新杂项表使用：1100-1499
。为客户修改而创建的新杂项表使用：1500-1999

**********************************END***********

程序默认空代码

# 掩码管理 代码名称 (特定的)

######################################################################################
## 由超级管理员加入的标签 (对象 YSH) 2008-11-26 23:25:00 (ADMIN)
######################################################################################
$ACTION
Case ACTION
 When default
Endcase
Return
######################################################################################

**********************************END***********************

扶程星云

自动序列号定义：
定义序列号： 参数->基本参数->序列号定义
  When "INICRE"       :  Gosub INICRE

$INICRE
Local Integer STAT
Call NUMERO ('MMP',"",date$,"",[M:YBH]PNUM,STAT) From SUBANM
Affzo [M:YBH]PNUM
[F:YBH]PNUM=[M:YBH]PNUM
Return
注：[M:YBH]PNUM 屏幕=YBH字段PNUM    [F:YBH]PNUM,表YBH字段PNUM  MMP序列号定义的名称  表名和屏幕名用缩写
    自动生成的字段为显示和非必填字段 

扶程星云

窗口查询方法：
通过对象等其他方法反查窗口名。通过菜单代码在(开发>程序>功能)中得到对象代码，通过对象代码在窗口里面查询。

扶程星云

下拉式列表定义：
开发>程序>对象创建一个对象 例：YMN
开发>数据和参数>数据类型为YMN

扶程星云

F7保存加编译

SPE,执行系统中代码再执行自定义代码
SPX,覆盖系统中代码

打开某个屏幕
[Local] Mask <Screen_Name>

Clalev 知道该表是否打开
if clavev([])>0 已经打开

 

dannis

不错,希望大家一起来完善,谢谢扶程星云

dannis

开发水晶报表时经常要用到的语句：fficeffice" />

SELECT ATABLE.ABRFIC_0 AS 表缩写,ATABLE.CODFIC_0 AS 数据表,ATABIND.CODIND_0 AS 表索引,ATABIND.DESCRIPT_0 AS 索引描述 FROM GJERP.ATABLE LEFT OUTER JOIN GJERP.ATABIND ON ATABLE.CODFIC_0=ATABIND.CODFIC_0 ORDER BY ATABLE.ABRFIC_0;

dannis

修改Admin密码语句（Oracle数据库）：fficeffice" />

UPDATE DEMOCHI.AUTILIS SET AUTILIS.PASSE_0='BAABAA' WHERE AUTILIS.USR_0='ADMIN';

UPDATE DEMOCHI.AUTILIS SET AUTILIS.NEWPAS_0 = (SELECT NEWPAS_0 FROM AUTILIS WHERE AUTILIS.USR_0='ADMIN') WHERE AUTILIS.USR_0='ADMIN';

扶程星云

主从表关系

表：
子表屏幕创建需知：
开发>程序>屏幕部分：块类型=表格 选项=KARID 参数=NBLIG 代表=字符
屏幕字段添加NBLIG类型为ABS并添加下面类型,才会自动添加行号
添加类型  活动            描述                描述        值
    控制  DIVLINCONT        行插入控制        LIG         "POPLIN"
    线后  DIVLINNUM         分配行号

子表添加以下字段
POPLIN类型为L，隐藏
添加UPDFLG字段(更新)类型M
添加CREFLG字段(创建标识)类型C
索引YSD0=RNUM+POPLIN

 

代码：
主窗口
  When "INICRE_LIG"   :  Gosub INI_LIG
  When "INIMOD_LIG"   :  Gosub INI_LIG
$INI_LIG   //插入行和修改行
  [F:YSD]RNUM =  [F:YSH]RNUM //给明细表[YSD]的RNUM字段赋值，值是父表[YSH]的RNUM字段
Return

Allen

现在还不了解X3开发，先顶一下！