Python表单插件实现单据体上移下移

Python表单插件实现单据体上移下移的源码

def EntryBarItemClick(e):
    if e.BarItemKey == "tbMoveUp":
        upMoveDown();
    elif e.BarItemKey == "tbMoveDown":
        upMoveDown(False);
def upMoveDown(isMoveUp=True,entryKey='FEntity'):
	entryEntity = this.View.BusinessInfo.GetEntryEntity(entryKey);
	entityDataObject = this.View.Model.GetEntityDataObject(entryEntity);
	rowIndex = this.View.Model.GetEntryCurrentRowIndex(entryKey);
	length=len(entityDataObject);
	if isMoveUp:
		if (rowIndex==0):
			return;
		else:
			movindex=rowIndex-1;
	else:
		if (rowIndex==length-1):
			return;
		else:
			movindex=rowIndex+1;
	this.View.SetEntityFocusRow(entryKey, movindex);
	this.View.Model.CopyEntryRow(entryKey,rowIndex,-1);
	this.View.Model.CopyEntryRow(entryKey,movindex,-1);
	Entity = this.View.BusinessInfo.GetEntryEntity(entryKey);
	Object = this.View.Model.GetEntityDataObject(Entity);
	lgt=len(Object);
	initDir=["Seq","BeginInit","DataEntityState","EndInit","Equals","Events","GetDataEntityType","GetHashCode","GetType","Initialized","IsInitialized","MemberwiseClone","OnInitialized","OnPropertyChanged","OnPropertyChanging","Parent","PropertyChanged","PropertyChanging","ReferenceEquals","ToString","__class__","__delattr__","__doc__","__format__","__getattribute__","__hash__","__init__","__new__","__re