aVars := ARRAY(6)
aVars[5] := "STR(NNOPER_,7,0)+TYPE+UPPER(GRUP+NNUM)"
aVars[6] := "STR(SH_OP->NNOPER_,7,0)+SH_OP->TYPE+UPPER(SH_OP->GRUP)"
SORTMAKER("SH_OP",aVars[5],"OnlyMaker(aVars[5]).AND.!EMPTY(GRUP)")
aVars[2] := SumMaker("SH_OP",aVars[5],"SUMMA_ACZ")
aVars[3] := SumMaker("SH_OP",aVars[5],"KOL")
aVars[4] := SumMaker("SH_OP",aVars[5],"SUMMA")
aVars[1] := PADR(ALLTRIM(NA),34,CHR(255))+CHR(179)
aVars[1] := aVars[1]+PADC(ALLTRIM(Okd),10,CHR(255))+CHR(179)
aVars[1] := aVars[1]+PADC(ALLTRIM(Ed),5,CHR(255))+CHR(179)
aVars[1] := aVars[1]+PADR(STR(aVars[3],10,FinGet(cSelGrup,"KOL_")),10,CHR(255))+CHR(179)
aVars[1] := aVars[1]+PADR(STR(DIV(aVars[4],aVars[3]),11,CURR_MAIN),11,CHR(255))+CHR(179)
aVars[1] := aVars[1]+PADR(STR(DIV(aVars[2],aVars[3]),10,CURR_MAIN),10,CHR(255))+CHR(179)
aVars[1] := aVars[1]+PADR(STR(aVars[4],12,CURR_MAIN),12,CHR(255))+CHR(179)
aVars[1] := aVars[1]+PADR(STR(aVars[2],11,CURR_MAIN),11,CHR(255))+CHR(179)
aVars[1] := aVars[1]+PADR(STR(PROCNDS,3,0),3,CHR(255))+CHR(179)
aVars[1] := aVars[1]+PADR(STR(SumMaker("SH_OP",aVars[5],"SUMMA_NDS"),11,CURR_MAIN),11,CHR(255))+CHR(179)
aVars[1] := aVars[1]+PADR(STR(SumMaker("SH_OP",aVars[5],"SUMMA_FACT"),12,CURR_MAIN),12,CHR(255))
aVars[1] := HeadMaker("SH_OP",aVars[6],PADC("- "+ALLTRIM(NaGr)+" -",LEN(aVars[1]),CHR(255))+" ")+aVars[1]
SORTMAKER("SH_OP")
aVars[1]
