&uf('+1W2#',v1009) &uf('+1W3#',v2226), &uf('+1W4#',v2221), &uf('+1W5#',&uf('+3E',v2225)), &uf('+1W6#',v3331), &uf('+1W88#'), if &uf('+1R5') = '4444' then &uf('+1W89#dbn_web_test.mnu') else &uf('+1W89#dbn_web.mnu') fi (if &uf('+5T',&uf('+1R89'))<>'' then if &uf('+1R6')= &uf('+5T',&uf('+1R89')) then '', else if &uf('+1R6')=&uf('G1_',&uf('+1R4')) then &uf('+1W1#',&uf('+5T',&uf('+1R89'))),&uf('+1W3#'),&uf('+1W2#'), else if (&uf('G1_',&uf('+1R4'))='_EX') or (&uf('G1_',&uf('+1R4'))='_PROF') or (&uf('G1_',&uf('+1R4'))='_DESCR') then &uf('+1W1#',S(&uf('+5T',&uf('+1R89')),&uf('G1_',&uf('+1R4')))),&uf('+1W3#'),&uf('+1W2#'), else &uf('+1W1#',&uf('G1_',&uf('+1R4'))), fi, fi, if &uf('+5T',&uf('+1R89'))='ZJIN' then ''/, else '','?C21COM=F&I21DBN=',&uf('+1R1'),'&P21DBN=',&uf('+5T',&uf('+1R89')),'&S21FMT=', &uf('+1R2') '&S21ALL=',&uf('+1R3'),'&Z21ID=',&uf('+1R5'),&uf('+1R8'),'">', fi, ''/, ''/, fi else break fi), &uf('+1W1#') &uf('+1W2#') &uf('+1W3#'), &uf('+1W4#'), &uf('+1W5#'), &uf('+1W6#'),