Тема: Ошибка в тиражном макросе "ФИО"
Ошибка в тиражном макросе "ФИО", проигнорирован параметр "пол" (SEX) при выборе.
строки 25,26
вот исправленный текст:
LOCAL nKodKli := _aFEVParameters[1]
LOCAL nPadeg := _aFEVParameters[2]
LOCAL cFirstName
LOCAL cLastName
LOCAL cSecondName
LOCAL nSex
LOCAL Language := 'UK'
LOCAL oSQL
LOCAL aDCC := GetSpID('DOCLIST','DIC_CASES')
LOCAL cReturn
oSQL:=SpSQL():new():create()
oSQL:executeDirect("SELECT * FROM dc000060 WHERE priznak=523 AND worker="+STR(nKodKli))
cFirstName := UPPER(oSQL:dataArea:name)
cLastName := UPPER(oSQL:dataArea:family)
cSecondName := UPPER(oSQL:dataArea:father)
nSex := oSQL:dataArea:sexual
oSQL:executeDirect("SELECT dc1._"+STR(nPadeg,1)+" AS first, dc3._"+STR(nPadeg,1)+" AS last, "+;
" HR.GetSecondNameCase('"+cSecondName+"', "+STR(nSex)+", "+STR(nPadeg)+", '"+Language+"') AS second "+;
"FROM system.iota dc "+;
"LEFT JOIN dc"+STRZERO(aDCC[1],6)+" dc1 ON dc1.priznak="+STR(aDCC[2])+" AND dc1._1 =UPPER(TRIM('"+cFirstName+"')) AND dc1.type=1 AND dc1.langid='"+UPPER(Language)+"' and dc1.sex="+STR(nSex)+;
"LEFT JOIN dc"+STRZERO(aDCC[1],6)+" dc3 ON dc3.priznak="+STR(aDCC[2])+" AND dc3._1 =UPPER(TRIM('"+cLastName+"')) AND dc3.type=2 AND dc3.langid='"+UPPER(Language)+"' and dc3.sex="+STR(nSex))
IF oSQL:eof()
RETURN ''
ENDIF
cReturn := UpCase(LOWER(oSQL:dataArea:last))+' '+UpCase(LOWER(oSQL:dataArea:first))+' '+UpCase(LOWER(oSQL:dataArea:second))
IF LEN(_aFEVParameters)>2
EVAL(_aFEVParameters[3], oSQL)
ENDIF
oSQL:destroy()
RETURN cReturn