• Replies 2 replies
  • Subscribers 16 subscribers
  • Views 69 views
  • Users 0 members are here
Options
Related

Macro for detecting missing pipes or gaps

mEhul_patel
 
Parents
  • hello friends,

    i found new Macro for detecting missing pipes or gaps.

    ----------------------------------------------------------------------------------------
    -Macro for detecting missing pipes or gaps
    -By Mehmet Wagner  [email]Mehmet.wagner@gmail.com[/email]
    -date 16.04.2019
    ----------------------------------------------------------------------------------------
    onerror continue
    savework
    getwork

    var !a coll all bran member with type neq 'TUBI' and type neq 'ATTA' for site
    do !aa index !a
    $!a[$!aa]
    var !name name
    var !dist constr dist pl to pa of next
    handle any
    skip
    endhandle
    if $!dist lt 1 then
    skip
    endif
    var !texist Texist
    var !usermod usermod pos
    if'$!Texist' eq 'false' then
    $P
    $P Check missing tubi of: $!name Usermod: $!usermod
    $p $name add ce auto ce
    $!a[$!aa]
    endif
    enddo
    site
    --------------------------------------------------
  • in reply to mEhul_patel

    Thanks for this macro guys. 

    ----------------------------------------------------------------------------------------
    -Macro for detecting missing pipes or gaps
    -By Mehmet Wagner  [email]Mehmet.wagner@gmail.com[/email]
    -date 16.04.2019
    ----------------------------------------------------------------------------------------
    onerror continue
    savework
    getwork

    var !a coll all bran member with type neq 'TUBI' and type neq 'ATTA' for site
    do !aa index !a
    $!a[$!aa]
    var !name name
    var !dist constr dist pl to pa of next
    handle any
    skip
    endhandle
    if $!dist lt 1 then
    skip
    endif
    var !texist Texist
    var !usermod usermod pos
    if'$!Texist' eq 'false' then
    $P
    $P Check missing tubi of: $!name Usermod: $!usermod
    $p $name add ce auto ce
    $!a[$!aa]
    endif
    enddo
    site
    --------------------------------------------------

Reply
  • in reply to mEhul_patel

    Thanks for this macro guys. 

    ----------------------------------------------------------------------------------------
    -Macro for detecting missing pipes or gaps
    -By Mehmet Wagner  [email]Mehmet.wagner@gmail.com[/email]
    -date 16.04.2019
    ----------------------------------------------------------------------------------------
    onerror continue
    savework
    getwork

    var !a coll all bran member with type neq 'TUBI' and type neq 'ATTA' for site
    do !aa index !a
    $!a[$!aa]
    var !name name
    var !dist constr dist pl to pa of next
    handle any
    skip
    endhandle
    if $!dist lt 1 then
    skip
    endif
    var !texist Texist
    var !usermod usermod pos
    if'$!Texist' eq 'false' then
    $P
    $P Check missing tubi of: $!name Usermod: $!usermod
    $p $name add ce auto ce
    $!a[$!aa]
    endif
    enddo
    site
    --------------------------------------------------

Children
No Data