- AEFIN002 ; ; 27-FEB-2004
- ;;1.0;ANNETEST;;FEB 27, 2004
- Q:'DIFQR(1991212) F I=1:2 S X=$T(Q+I) Q:X="" S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,999) S:$A(Y)=61 Y=$E(Y,2,999) X NO E S @X=Y
- Q Q
- ;;^UTILITY(U,$J,1991212)
- ;;=^DIZ(1991212,
- ;;^UTILITY(U,$J,1991212,0)
- ;;=AEF EMPLOYEE^1991212I^34^34
- ;;^UTILITY(U,$J,1991212,1,0)
- ;;=ANNE^890098890^2541231^F
- ;;^UTILITY(U,$J,1991212,1,1,0)
- ;;=^^2^2^3040105^
- ;;^UTILITY(U,$J,1991212,1,1,1,0)
- ;;=This is a nice lady. She is married and lives with her husband and
- ;;^UTILITY(U,$J,1991212,1,1,2,0)
- ;;=3 cats.
- ;;^UTILITY(U,$J,1991212,1,2)
- ;;=123 Wherever Ave^3^1;DIZ(1991214,
- ;;^UTILITY(U,$J,1991212,1,3,0)
- ;;=^1991212.09^3^3
- ;;^UTILITY(U,$J,1991212,1,3,1,0)
- ;;=PHOTOGRAPHY^4
- ;;^UTILITY(U,$J,1991212,1,3,2,0)
- ;;=TRAVEL^3
- ;;^UTILITY(U,$J,1991212,1,3,3,0)
- ;;=GARDENING^4
- ;;^UTILITY(U,$J,1991212,1,4)
- ;;=TEACHER^9999998.99
- ;;^UTILITY(U,$J,1991212,2,0)
- ;;=JOHN^234543456^2491205^M
- ;;^UTILITY(U,$J,1991212,2,1,0)
- ;;=^^3^3^3040105^
- ;;^UTILITY(U,$J,1991212,2,1,1,0)
- ;;=This man has lived in Phoenix most of his life. He looks forward to
- ;;^UTILITY(U,$J,1991212,2,1,2,0)
- ;;=retiring soon and expects to travel the country, boldly going where no
- ;;^UTILITY(U,$J,1991212,2,1,3,0)
- ;;=man has gone before.
- ;;^UTILITY(U,$J,1991212,2,2)
- ;;=989 West Bananaboat Circle^3^4;DIZ(1991214,
- ;;^UTILITY(U,$J,1991212,2,3,0)
- ;;=^1991212.09^3^3
- ;;^UTILITY(U,$J,1991212,2,3,1,0)
- ;;=CAMPING^5
- ;;^UTILITY(U,$J,1991212,2,3,2,0)
- ;;=FISHING^4
- ;;^UTILITY(U,$J,1991212,2,3,3,0)
- ;;=HUNTING^3
- ;;^UTILITY(U,$J,1991212,2,4)
- ;;=POPE^33333
- ;;^UTILITY(U,$J,1991212,3,0)
- ;;=CARRIE^768787678^^F
- ;;^UTILITY(U,$J,1991212,3,4)
- ;;=PILL PUSHER^9898989
- ;;^UTILITY(U,$J,1991212,4,0)
- ;;=PAM^124345676^2610825^F
- ;;^UTILITY(U,$J,1991212,4,1,0)
- ;;=^1991212.05^1^1^3040122^
- ;;^UTILITY(U,$J,1991212,4,1,1,0)
- ;;=This is a test to see how the COMMENTS field works.
- ;;^UTILITY(U,$J,1991212,4,2)
- ;;=1432 Sleepy Hollow Road^11
- ;;^UTILITY(U,$J,1991212,4,3,0)
- ;;=^1991212.09^1^1
- ;;^UTILITY(U,$J,1991212,4,3,1,0)
- ;;=SHOPPING^5
- ;;^UTILITY(U,$J,1991212,4,4)
- ;;=PILOT^8990987
- ;;^UTILITY(U,$J,1991212,5,0)
- ;;=DEANN^123432123^2491207^F
- ;;^UTILITY(U,$J,1991212,5,1,0)
- ;;=^^2^2^3040122^
- ;;^UTILITY(U,$J,1991212,5,1,1,0)
- ;;=Enjoys small town life in the Colorado Rockies. She is an excellent
- ;;^UTILITY(U,$J,1991212,5,1,2,0)
- ;;=artist specializing in colored pencil and watercolor.
- ;;^UTILITY(U,$J,1991212,5,2)
- ;;=111 7th Street^6
- ;;^UTILITY(U,$J,1991212,5,3,0)
- ;;=^1991212.09^4^4
- ;;^UTILITY(U,$J,1991212,5,3,1,0)
- ;;=ART^5
- ;;^UTILITY(U,$J,1991212,5,3,2,0)
- ;;=HIKING^4
- ;;^UTILITY(U,$J,1991212,5,3,3,0)
- ;;=SKIING^3
- ;;^UTILITY(U,$J,1991212,5,3,4,0)
- ;;=KAYAKING^5
- ;;^UTILITY(U,$J,1991212,5,4)
- ;;=ARTIST^4567890
- ;;^UTILITY(U,$J,1991212,6,0)
- ;;=MICHAEL^787890989^2781003^M
- ;;^UTILITY(U,$J,1991212,6,1,0)
- ;;=^^2^2^3040122^
- ;;^UTILITY(U,$J,1991212,6,1,1,0)
- ;;=Michael is a very likeable young man. He is very tall coming in at
- ;;^UTILITY(U,$J,1991212,6,1,2,0)
- ;;=6'4". He is very knowledgable in the area of aviation.
- ;;^UTILITY(U,$J,1991212,6,2)
- ;;=546 Spring Flower Trail^3^4;DIZ(1991214,
- ;;^UTILITY(U,$J,1991212,6,3,0)
- ;;=^1991212.09^2^2
- ;;^UTILITY(U,$J,1991212,6,3,1,0)
- ;;=HUNTING^2
- ;;^UTILITY(U,$J,1991212,6,3,2,0)
- ;;=AUTO RACING^5
- ;;^UTILITY(U,$J,1991212,6,4)
- ;;=ZOOKEEPER^43567
- ;;^UTILITY(U,$J,1991212,7,0)
- ;;=CAROLYN^^2780330^F
- ;;^UTILITY(U,$J,1991212,7,2)
- ;;=1554 Aztec Road^3^4;DIZ(1991214,
- ;;^UTILITY(U,$J,1991212,7,3,0)
- ;;=^1991212.09^2^2
- ;;^UTILITY(U,$J,1991212,7,3,1,0)
- ;;=DANCING^5
- ;;^UTILITY(U,$J,1991212,7,3,2,0)
- ;;=SHOPPING^5
- ;;^UTILITY(U,$J,1991212,7,4)
- ;;=STUDENT^12345
- ;;^UTILITY(U,$J,1991212,8,0)
- ;;=BETTY
- ;;^UTILITY(U,$J,1991212,8,2)
- ;;=^5
- ;;^UTILITY(U,$J,1991212,8,4)
- ;;=QUEEN^
- ;;^UTILITY(U,$J,1991212,9,0)
- ;;=GEORGE^768787890^2530313^M
- ;;^UTILITY(U,$J,1991212,9,1,0)
- ;;=^^2^2^3040130^
- ;;^UTILITY(U,$J,1991212,9,1,1,0)
- ;;=This employee has been with us for many years. He is a very valuable
- ;;^UTILITY(U,$J,1991212,9,1,2,0)
- ;;=asset to the company.
- ;;^UTILITY(U,$J,1991212,9,2)
- ;;=444 April Shower Lane^5^2;DIZ(1991216,
- ;;^UTILITY(U,$J,1991212,9,3,0)
- ;;=^1991212.09^3^3
- ;;^UTILITY(U,$J,1991212,9,3,1,0)
- ;;=WOODWORKING^5
- ;;^UTILITY(U,$J,1991212,9,3,2,0)
- ;;=SKATEBOARDING^0
- ;;^UTILITY(U,$J,1991212,9,3,3,0)
- ;;=GARDENING^2
- ;;^UTILITY(U,$J,1991212,9,4)
- ;;=ENGINEER^78909
- ;;^UTILITY(U,$J,1991212,10,0)
- ;;=JIM^656545434^2560501^M
- ;;^UTILITY(U,$J,1991212,10,1,0)
- ;;=^^2^2^3040130^
- ;;^UTILITY(U,$J,1991212,10,1,1,0)
- ;;=Jim is a very hard worker and our company would be hard-pressed to
- ;;^UTILITY(U,$J,1991212,10,1,2,0)
- ;;=replace him. We should pay him more.
- ;;^UTILITY(U,$J,1991212,10,2)
- ;;=678 Honeysuckle Lane^5^1;DIZ(1991214,
- ;;^UTILITY(U,$J,1991212,10,3,0)
- ;;=^1991212.09^2^2
- ;;^UTILITY(U,$J,1991212,10,3,1,0)
- ;;=COMPUTERS^5
- ;;^UTILITY(U,$J,1991212,10,3,2,0)
- ;;=WELDING^1
- ;;^UTILITY(U,$J,1991212,10,4)
- ;;=WELDER^78909
- ;;^UTILITY(U,$J,1991212,11,0)
- ;;=MARTHA^565454378^2481215^F
- ;;^UTILITY(U,$J,1991212,11,1,0)
- ;;=^^3^3^3040130^
- ;;^UTILITY(U,$J,1991212,11,1,1,0)
- ;;=Martha came to us from our parent organization. She has possesses
- ;;^UTILITY(U,$J,1991212,11,1,2,0)
- ;;=valuable skills needed by our branch office. We should pay her more
- ;;^UTILITY(U,$J,1991212,11,1,3,0)
- ;;=money too.
- ;;^UTILITY(U,$J,1991212,11,2)
- ;;=7890 Maple Dr.^29^2;DIZ(1991216,
- ;;^UTILITY(U,$J,1991212,11,3,0)
- ;;=^1991212.09^3^3
- ;;^UTILITY(U,$J,1991212,11,3,1,0)
- ;;=KNITTING
- ;;^UTILITY(U,$J,1991212,11,3,2,0)
- ;;=SEWING
- ;;^UTILITY(U,$J,1991212,11,3,3,0)
- ;;=HORSES^5
- ;;^UTILITY(U,$J,1991212,11,4)
- ;;=PAPER SHUFFLER^87678
- ;;^UTILITY(U,$J,1991212,12,0)
- ;;=JERRY^878965678^2770913^M
- ;;^UTILITY(U,$J,1991212,12,1,0)
- ;;=^^2^2^3040130^
- ;;^UTILITY(U,$J,1991212,12,1,1,0)
- ;;=Jerry is one of our younger employees. He shows great potential and
- ;;^UTILITY(U,$J,1991212,12,1,2,0)
- ;;=should advance quickly.
- ;;^UTILITY(U,$J,1991212,12,2)
- ;;=9887 Waterlily Dr.^29^1;DIZ(1991214,
- ;;^UTILITY(U,$J,1991212,12,3,0)
- ;;=^1991212.09^4^4
- ;;^UTILITY(U,$J,1991212,12,3,1,0)
- ;;=SKIING
- ;;^UTILITY(U,$J,1991212,12,3,2,0)
- ;;=MOUNTAIN CLIMBING
- ;;^UTILITY(U,$J,1991212,12,3,3,0)
- ;;=KAYAKING
- ;;^UTILITY(U,$J,1991212,12,3,4,0)
- ;;=SNOWBOARDING^3
- ;;^UTILITY(U,$J,1991212,12,4)
- ;;=DAREDEVIL^56653
- ;;^UTILITY(U,$J,1991212,13,0)
- ;;=JUNE^343212345^2680218^F
- ;;^UTILITY(U,$J,1991212,13,1,0)
- ;;=^^2^2^3040130^
- ;;^UTILITY(U,$J,1991212,13,1,1,0)
- ;;=June shows a great aptitude for working with numbers and is always bright
- ;;^UTILITY(U,$J,1991212,13,1,2,0)
- ;;=and cheery. She frequently comes in early and works late.
- ;;^UTILITY(U,$J,1991212,13,2)
- ;;=8742 Mockingbird Lane^29^1;DIZ(1991216,
- ;;^UTILITY(U,$J,1991212,13,3,0)
- ;;=^1991212.09^2^2
- ;;^UTILITY(U,$J,1991212,13,3,1,0)
- ;;=SAND PAINTING^2
- ;;^UTILITY(U,$J,1991212,13,3,2,0)
- ;;=POTTERY^1
- ;;^UTILITY(U,$J,1991212,13,4)
- ;;=JR ACCOUNTANT^45890
- ;;^UTILITY(U,$J,1991212,14,0)
- ;;=ALLISON^676765654^2500812^F
- ;;^UTILITY(U,$J,1991212,14,1,0)
- ;;=^^2^2^3040130^
- ;;^UTILITY(U,$J,1991212,14,1,1,0)
- ;;=This employee is one of our company's greatest assets. She deserves a
- ;;^UTILITY(U,$J,1991212,14,1,2,0)
- ;;=pay raise and a big promotion.
- ;;^UTILITY(U,$J,1991212,14,2)
- ;;=678 Bluebird Road^3^1;DIZ(1991214,
- ;;^UTILITY(U,$J,1991212,14,3,0)
- ;;=^1991212.09^2^2
- ;;^UTILITY(U,$J,1991212,14,3,1,0)
- ;;=ARCHITECTURE^4
- ;;^UTILITY(U,$J,1991212,14,3,2,0)
- ;;=READING^5
- ;;^UTILITY(U,$J,1991212,14,4)
- ;;=JUNIOR CEO^89009
- ;;^UTILITY(U,$J,1991212,15,0)
- ;;=JENNIFER^676565456^2600329^F
- ;;^UTILITY(U,$J,1991212,15,1,0)
- ;;=^^2^2^3040130^
- ;;^UTILITY(U,$J,1991212,15,1,1,0)
- ;;=Jenn is new to our company having started just under a year ago. She is
- ;;^UTILITY(U,$J,1991212,15,1,2,0)
- ;;=a fast learner and I believe she will fit in fine.
- ;;^UTILITY(U,$J,1991212,15,2)
- ;;=8900 8th St^3^1;DIZ(1991214,