[NotesAP] 變更角色,指定簽核人員
讓駁回也可以變更的片段程式
ForAll x In doc.GTApprSignedFlowPerList
ReDim Preserve UF(ufc)
tempSTR$="@word(""" & X & """;""^"";3)"'取角色名稱
t_step_name = Evaluate(tempSTR$)
If t_step_name(0)="檢驗人員" Then'角色名稱為「檢驗人員」就進行置換
tempSTR_Ename$="@word(""" & X & """;""^"";61)"'取原英文名
t_Ename = Evaluate(tempSTR_Ename$)
tempSTR_Cname$="@word(""" & X & """;""^"";62)"'取原中文名
t_Cname = Evaluate(tempSTR_Cname$)
tempSTR_Replace1$=|@ReplaceSubstring("| & X & |";"| & t_Ename(0) & |";"| & doc.new_Esigner(0) & |")|'把檢驗人員那行的英文名置換
t_Replace1 = Evaluate(tempSTR_Replace1$)
tempSTR_Replace2$=|@ReplaceSubstring("| & t_Replace1(0) & |";"| & t_Cname(0) & |";"| & doc.new_Csigner(0) & |")|'把檢驗人員那行的中文名置換
t_Replace2 = Evaluate(tempSTR_Replace2$)
X=t_Replace2(0)'整行換掉
End If
UF(ufc)=X
ufc=ufc+1
End ForAll
doc.GTApprSignedFlowPerList=UF '重組過的放回GTApprSignedFlowPerList
'// =========================================
最終結果:
原GTApprSignedFlowPerList:
"1^1^申請者^簽核中^申請者^^1^^^^^>^^^^1^GTApprMemo^GTApprMemoTemp^2^^^^^^^1^^1^1^GTApprRoleList^1^GTApprNameList^1:2^1^1^GTApprSignList^1^GTApprActionList^^^^^^^^^^^^^^^^^^2>0>1>核准>>(CheckRCV)>(SendMail1)>>1>6^^^^^cine liu/OGXXX^呂坤信^1184^5210^營運企劃處/物料暨進出口管理部/倉儲管理課^P232^董事長/總經理>總經理室>營運企劃處>營運企劃處/物料暨進出口管理部^G200>G202>P200>P230^專案副理^0^^^1^2024/9/9^1899/12/30 08:30:00^2024/9/9^1899/12/30 17:30:00^營運企劃處/物料暨進出口管理部/倉儲管理課 資深管理師: 彭漢銓 (hanquan peng/OGXXX)^物料暨進出口管理部/倉儲管理課 課經理: 江宏龍 (mark chiang/OGXXX)^物料暨進出口管理部/倉儲管理課 課經理: 江宏龍 (mark chiang/OGXXX)"
"1^6^檢驗人員^簽核中^被指定人員^^1^^^^^>^^^^1^GTApprMemo^GTApprMemoTemp^2^^^^^^^1^^1^1^GTApprRoleList^1^GTApprNameList^1:2^1^1^GTApprSignList^1^GTApprActionList^^^^^^^^^^^^^^^^^^2>0>1>核准>>(CheckAll)>(SendMail3)>>1>6:3>0>1>駁回>>>($MailReject)>1>1>6:8>>>>>>>>>^^^^^terry liu/OGXXX^劉鎮彰^211252^6732^廠務部/水氣化二課^F162^董事長/總經理>晶圓製造中心>晶圓製造中心/廠務處>廠務處/廠務部^G200>M010>F100>F160^副理^0^^^1^2024/9/9^1899/12/30 08:30:00^2024/9/9^1899/12/30 09:30:00^廠務部/水氣化二課 課經理: 鍾朝全 (cc chung/OGXXX)^^"
"1^8^檢驗單位主管一^簽核中^被指定人員^^1^^^^^>^^^^1^GTApprMemo^GTApprMemoTemp^2^^^^^^^1^^1^1^GTApprRoleList^1^GTApprNameList^1:2^1^1^GTApprSignList^1^GTApprActionList^^^^^^^^^^^^^^^^^^2>0>1>核准>>(CheckAll)>($MailNext)>>1>6:3>0>1>駁回>>>($MailReject)>6>1>6^^^^^cc chung/OGXXX^鍾朝全^211048^6733^廠務部/水氣化二課^F162^董事長/總經理>晶圓製造中心>晶圓製造中心/廠務處>廠務處/廠務部^G200>M010>F100>F160^課經理^1^5^^1^2024/8/5^1899/12/30 08:30:00^2024/8/5^1899/12/30 17:30:00^廠務部/水氣化二課 資深副理: 吳怡良 (williamye wu/OGXXX)^^"
新GTApprSignedFlowPerList:
"1^1^申請者^簽核中^申請者^^1^^^^^>^^^^1^GTApprMemo^GTApprMemoTemp^2^^^^^^^1^^1^1^GTApprRoleList^1^GTApprNameList^1:2^1^1^GTApprSignList^1^GTApprActionList^^^^^^^^^^^^^^^^^^2>0>1>核准>>(CheckRCV)>(SendMail1)>>1>6^^^^^cine liu/OGXXX^呂坤信^1184^5210^營運企劃處/物料暨進出口管理部/倉儲管理課^P232^董事長/總經理>總經理室>營運企劃處>營運企劃處/物料暨進出口管理部^G200>G202>P200>P230^專案副理^0^^^1^2024/9/9^1899/12/30 08:30:00^2024/9/9^1899/12/30 17:30:00^營運企劃處/物料暨進出口管理部/倉儲管理課 資深管理師: 彭漢銓 (hanquan peng/OGXXX)^物料暨進出口管理部/倉儲管理課 課經理: 江宏龍 (mark chiang/OGXXX)^物料暨進出口管理部/倉儲管理課 課經理: 江宏龍 (mark chiang/OGXXX)"
"1^6^檢驗人員^簽核中^被指定人員^^1^^^^^>^^^^1^GTApprMemo^GTApprMemoTemp^2^^^^^^^1^^1^1^GTApprRoleList^1^GTApprNameList^1:2^1^1^GTApprSignList^1^GTApprActionList^^^^^^^^^^^^^^^^^^2>0>1>核准>>(CheckAll)>(SendMail3)>>1>6:3>0>1>駁回>>>($MailReject)>1>1>6:8>>>>>>>>>^^^^^cc ou/OGXXX^歐金昌^211252^6732^廠務部/水氣化二課^F162^董事長/總經理>晶圓製造中心>晶圓製造中心/廠務處>廠務處/廠務部^G200>M010>F100>F160^副理^0^^^1^2024/9/9^1899/12/30 08:30:00^2024/9/9^1899/12/30 09:30:00^廠務部/水氣化二課 課經理: 鍾朝全 (cc chung/OGXXX)^^"
"1^8^檢驗單位主管一^簽核中^被指定人員^^1^^^^^>^^^^1^GTApprMemo^GTApprMemoTemp^2^^^^^^^1^^1^1^GTApprRoleList^1^GTApprNameList^1:2^1^1^GTApprSignList^1^GTApprActionList^^^^^^^^^^^^^^^^^^2>0>1>核准>>(CheckAll)>($MailNext)>>1>6:3>0>1>駁回>>>($MailReject)>6>1>6^^^^^cc chung/OGXXX^鍾朝全^211048^6733^廠務部/水氣化二課^F162^董事長/總經理>晶圓製造中心>晶圓製造中心/廠務處>廠務處/廠務部^G200>M010>F100>F160^課經理^1^5^^1^2024/8/5^1899/12/30 08:30:00^2024/8/5^1899/12/30 17:30:00^廠務部/水氣化二課 資深副理: 吳怡良 (williamye wu/OGXXX)^^"
沒有留言:
張貼留言