En este grupo En todos

Grupo de Programación e Informática



lenguaje de programacion scil, para scada

pablo
Ingenieria electrica universidad tecno...
Escrito por Pablo Cardozo
el 19/03/2011

Requiero analizar el siguiente codigo. Si alguien me puede colaborar se lo agradezco de antemano.

;---------------------------------------
@IX="18"
@PT="3"
@level="40"
@obj="KD"
;---------------------------------------
#init_query "A" (ln=="PAV40L%%%%" and IX=='IX' and PT=='PT')
;#init_query "A" (ox=="%%%40L%%% DISP 86")
@a=prod_query(5000) ;Database and list functions
#loop_with i = 1.. Length(a:vln) ;program execution command
@registro(%i)=a:vln(%i)
@listado=%registro(%i)
; @ox(%i)='listado':pox'IX'
@file="U_TEST. Txt"
@DUMMY=WRITE_TEXT(%file,%registro,0)
#loop_end


#pause 3
@file=("U_TEST. Txt")
@file2=read_text(%file,1,500)
#loop_with var=1.. Length(%file2)
@lnn=%file2(%var)
@ln=SUBSTR(%lnn,1,8)
@sub=SUBSTR(%ln,1,3)
@campo=SUBSTR(%ln,4,5)
; #error ignore
#modify 'ln''obj':P'IX' = list (OX="'sub''campo''obj' CAMPO EQUIVALENTE")
; #modify 'ln''obj':P'IX' = list (IU=0)

#loop_end