예 내가이 전망이 : 트랜잭션 형태에서문서를 쿼리하고 필드 값을 가져 와서 LotusScript를 사용하여 양식 필드에 삽입하는 방법은 무엇입니까?
- 프로필
- 거래
을, 나는 (성과 이름을 사용)보기에서 문서를 검색 할 수있는 주소를 가져 와서 트랜잭션의 계산 된 주소 필드에 삽입하십시오.
postOpen 이벤트에 LotusScript를 삽입하려고합니다.
예제가 크게 도움이됩니다.
예 내가이 전망이 : 트랜잭션 형태에서문서를 쿼리하고 필드 값을 가져 와서 LotusScript를 사용하여 양식 필드에 삽입하는 방법은 무엇입니까?
을, 나는 (성과 이름을 사용)보기에서 문서를 검색 할 수있는 주소를 가져 와서 트랜잭션의 계산 된 주소 필드에 삽입하십시오.
postOpen 이벤트에 LotusScript를 삽입하려고합니다.
예제가 크게 도움이됩니다.
코딩 경험은 무엇입니까? 이 모든 것을 처음 사용하는 경우 수식 언어로 시작해야합니다. 우선 : 솔루션의 모양과 관계없이보기의 첫 번째 정렬 된 열에 검색 키가 있어야합니다.
보기의 디자인에 대한 사용자의 의도를 방해하지 않기 위해 별도의 숨겨진보기를 사용하는 것이 가장 좋습니다.
두 번째 열은 해당 열의 수식은 다음과 같을 수 특수 문자 (~ 아주 흔한 일이다) 로 구분하면 다른 문서에서 갖고 싶어 모든 정보와 계산 된 문자열을 포함합니다 :
_lkp := @DbLookup("":"NoCache";"";"NameOfHiddenView";"HereIsYourSearchKey";2)
@If(@IsError(_lkp); ""; _lkp)
당신은이 필드에 지정된 이름/키에서 모든 데이터를하고 다른 필드는 계산할 수 있습니다 :
City + "~" + Zip + "~" + StreetAddress + "~" + PhoneNumber
그런 다음 폼에 다음 코드를 사용하여 계산 된 필드 (예 : LookupData)를 생성 그것을 통해서. 예 : "시"라는 필드가 있습니다. 그 공식은 다음과 같습니다 그것 뿐이다
@Word(LookupData; "~"; 4)
:
@Word(LookupData; "~"; 1)
필드 "전화"는 공식을 할 것입니다. 이뿐만 아니라 LotusScript와 수행 할 수 있습니다 물론
...이합니다 (Postopen 이벤트에)과 같을 것이다 :이 코드에는 에러 처리가 없습니다
는Dim ses as New NotesSession
Dim db as NotesDatabase
Dim view as NotesView
Dim strKey as String
Dim docLkp as NotesDocument
Dim doc as NotesDocument
Set doc = Source.document
Set db = ses.CurrentDatabase
Set view = db.getView("NameOfHiddenView")
StrKey = "HereIsYourSearchKey"
Set docLkp = view.GetDocumentByKey(strKey, True)
Call doc.ReplaceItemvalue("City", docLkp.GetItemValue("City")
Call doc.ReplaceItemvalue("Phone", docLkp.GetItemValue("PhoneNumber")
, 어떤 검사는 문서가 실제로 존재하지 않는 경우 등등 ... 그냥 시작 지점으로 사용하십시오 ...
저는 연꽃 도미노의 초보자입니다. 그래, 포뮬러 랭귀지도 그 일을 훨씬 쉽게 해줬 어. 감사! – Jigs