LRURG ; IHS/DIR/AAB - TRANSFER ROUTINES 5/30/96 13:22 ; [ 07/22/2002 1:55 PM ]
Source file <LRURG.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PR | ;;F I=1:1 S X=$T(+I) Q:X="" W !,X
|
|
| X | ||
| EN | ||
| L | ;;W:I ! W !,A S S=0 F LC=1:1 S S=S+$L($T(+LC)) I $T(+LC)="" S LC=LC-1 Q
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("RSEL" | LRURG+4 |
| ^DD("DD" | EN |
| Name | Line Occurrences |
|---|---|
| L | EN+1 |
| PR | EN+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %DT | EN*, EN+2 |
| A | EN+1*, X+1! |
| I | X+1! |
| L | EN+1*, X+1! |
| LC | X+1! |
| PR | EN+1*, X+1! |
| S | X+1! |
| U | EN* |
| X | EN*, X+1! |
| Y | EN, X+1! |
| Name | Field # of Occurrence |
|---|---|
| $T(L | EN+1 |
| $T(PR | EN+1 |