Mumps Class 20

From VistApedia
Revision as of 13:51, 24 April 2011 by Shabiel (talk | contribs)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search
sam@sam-desktop:~/pocn-moh$ mumps -dir

GTM>zp ^KBANJOBBED
KBANJOBBED ; jobbed process ; 4/3/11 1:30pm
 ;
 ; Goes through the drug file and prints stuff
 NEW I SET I=0
 FOR  SET I=$O(^PSDRUG(I)) QUIT:'I  HANG .1 WRITE $P(^(I,0),"^"),!
 QUIT

GTM>ZP ^KBANJOB
KBANJOB ; Routine to start a KBANJOBBED ; 4/3/11 1:44pm
 ;;
 ; Start ^KBANJOBBED with ERROR file /tmp/samerr.txt and OUTPUT /tmp/samjobb
ed.txt
 JOB ^KBANJOBBED:(ERROR="/tmp/samerr.txt":OUTPUT="/tmp/samjobbed.txt"):5
 ; Job Parameters
 ; DEFAULT (directory)
 ; ERROR (stderr output)
 ; INPUT (stdin)
 ; OUTPUT (stdout)
 ; GBLDIR (Name of DB to use)
 ; STARTUP (optional shell script)
 ;
 ; Can pass value parameters to job, but not reference parameters
 QUIT


GTM>D ^KBANJOB

GTM>H
sam@sam-desktop:~/pocn-moh$ tail -f /tmp/samjobbed.txt
PROMETHAZINE 25MG/ML INJ
CEFACLOR 250MG CAP,ORAL
NEOSTIGMINE 0.5MG/ML (1:2000) INJ
FERROUS SULFATE 75MG/0.6ML DROPS,ORAL
DIGOXIN 0.05MG/ML SOLN,ORAL
PROPRANOLOL HCL 1MG/ML INJ
POTASSIUM CL 2MEQ/ML (10%) INJ 10ML
HYDROCHLOROTHIAZIDE 25MG TAB,ORAL
POVIDONE IODINE 10% SOLN,TOP
SILVER SULFADIAZINE 1% CRM,TOP JAR
GLYCERIN SUPP,RECTAL
TOBRAMYCIN 0.3% SOLN,OPHT
TOBRAMYCIN 0.3% OINT,OPHT
CAPTOPRIL 25MG TAB,ORAL
VERAPAMIL HCL 80MG TAB,ORAL
VERAPAMIL HCL INJ 2.5MG/ML INJ 2ML
FUROSEMIDE 40MG TAB,ORAL
TONGUE DEPRESSORS
MESALAMINE 1GM SUPP,RECTAL
CLONAZEPAM 0.5MG TAB,ORAL
CLONAZEPAM 2MG TAB,ORAL
PHENOBARBITAL 60MG TAB,ORAL
CEFOTAXIME SODIUM 1GM/VIAL INJ
FACE MASK
ALCOHOL PREP PADS
BECLOMETHASONE DIPROP 50MCG INH,NASAL
BROMOCRIPTINE MESYLATE 2.5MG TAB,ORAL
ALPRAZOLAM 0.5MG TAB,ORAL
DILTIAZEM HCL 60MG TAB,ORAL
HYDROGEN PEROXIDE 6% SOLN,TOP 1000ML
ACYCLOVIR 5% CREAM,TOP
TRETINOIN 0.05% CREAM,TOP
ATENOLOL 50MG TAB,ORAL
ATENOLOL 100MG TAB,ORAL
ERYTHROMYCIN ES 400MG TAB,ORAL
SULFAMETH 200MG/TRIMETH 40MG/5ML SUSP
CROTAMITON 10% CREAM,TOP
CROTAMITON 10% LOTION,TOP
SODIUM BICARBONATE 8.4% INJ
FLUOCINOLONE ACETONIDE 0.025% OINT,TOP
DOPAMINE HCL 40MG/ML INJ
LIDOCAINE HCL 2% INJ
HYDROCORTISONE ACETATE 1% CREAM,TOP
HYDROCORTISONE ACETATE 1% OINT,TOP
HYDROCORTISONE NA SUCC. 100MG/2ML INJ
FAMOTIDINE 40MG TAB,ORAL
VERAPAMIL HCL 240MG TAB,ORAL,SA
ISOSORBIDE DINITRATE 40MG TAB,ORAL,SA
IPRATROPIUM 20MCG/INH INHALER,ORAL
AZATHIOPRINE 50MG TAB,ORAL
AZTREONAM 1GM/VIAL INJ
MICONAZOLE NITRATE 2% CREAM,VAG 20GM
BLEOMYCIN SULFATE 15UNITS/VIAL INJ
CYCLOPHOSPHAMIDE 500MG/VIAL INJ
CIPROFLOXACIN HCL 500MG TAB,ORAL
PHENYTOIN NA 50MG/ML INJ
FLUOXETINE HCL 20MG CAP,ORAL
ENALAPRIL MALEATE 20MG TAB,ORAL
ENALAPRIL MALEATE 10MG TAB,ORAL
LISINOPRIL 10MG TAB,ORAL
RANITIDINE HCL 25MG/ML INJ
CARBAMAZEPINE 100MG/5ML SUSP,ORAL
PENICILLIN G PROCAINE 400,000 UNITS INJ
FUROSEMIDE 10MG/ML SOLN,ORAL 60ML
CEFUROXIME AXETIL 250MG TAB,ORAL
UREA 10% LOTION,TOP
MEBENDAZOLE 100MG TAB,CHEW
CILASTIN 500MG/IMIPENEM 500MG/VIAL INJ
DEXAMETHA 0.1%/TOBRAMYCIN 0.3% SUSP,OPHT
HEPARIN NA 1000UNIT/ML INJ 1ML
RANITIDINE HCL 150MG TAB,ORAL
DICLOFENAC SODIUM 50MG TAB,ORAL,EC
CIPROFLOXACIN HCL 250MG TAB,ORAL
CYCLOSPORINE 100MG/ML SOLN,ORAL
HALOPERIDOL DECANOATE 100MG/ML INJ
CHLORPHENIRAMINE 2.5MG/ML SYP,ORAL
AMOXICILLIN 50O/CLAVULANATE 125 TAB,ORAL
CYCLOPENTOLATE HCL 1% SOLN,OPHT
CALCIUM CARBONATE 500MG TAB,ORAL
TRETINOIN 0.025% GEL,TOP
CEFOPERAZONE 1GM/VIAL INJ
ATROPINE SULFATE 1MG/ML INJ
CEFUROXIME AXETIL 125MG/5ML SUSP,ORAL
PENTOXIFYLLINE 400MG TAB,ORAL,SA
ISOTRETINOIN 10MG CAP,ORAL
MORPHINE SULFATE 10MG/ML INJ
PENICILLIN G BENZATHINE 1.2 MIL UNIT INJ
AMOXICILLIN 250/CLAVULANATE 125 TAB,ORAL
ZINC OXIDE 10% OINT,TOP
AMOXICILLIN/CLAVULANATE 250MG/5ML SUSP
DIAZEPAM 10MG/2ML INJ
GRISEOFULVIN 125MG/5ML SUSP,ORAL
PHYTONADIONE 10MG/ML INJ
CEFTRIAXONE SODIUM 1GM/VIAL INJ
ACYCLOVIR 250MG/VIAL INJ
EPHEDRINE 30MG/ML INJ
MEPERIDINE HCL 50MG/ML INJ
MEPERIDINE HCL 100MG/ML INJ
FLUPHENAZINE DECANOATE 25MG/ML INJ
CEPHALEXIN 250MG/5ML SUSP,ORAL
DEXTROSE 5%/NACL 0.45% INJ 500ML
DEXTROSE 5%/NACL 0.9% INJ 500ML
BETAXOLOL HCL 0.5% SOLN,OPHT
GEMFIBROZIL 600MG TAB,ORAL
ENALAPRIL MALEATE 5MG TAB,ORAL
LEVOBUNOLOL HCL O.5% SOLN,OPHT
CLOBETASOL PROPIONATE 0.05% OINT,TOP
HALOPERIDOL DECANOATE 50MG/ML INJ
ACETAZOLAMIDE 250MG TAB,ORAL
AMIODARONE HCL 200MG TAB,ORAL
OMEPRAZOLE 20MG CAP,ORAL,EC
SODIUM CHLORIDE 0.45% INJ 500ML
IBUPROFEN 100MG/5ML SUSP,ORAL
CALCIUM CHLORIDE 100MG/10ML (10%) INJ
EPOETIN ALFA RECOMBINANT 4000U/ML INJ
CLOBETASOL PROPIONATE 0.05% CREAM,TOP
STREPTOKINASE 1.5MU/VIAL INJ
EPOETIN ALFA RECOMBINANT 2000U/ML INJ
CHLORDIAZEPOXIDE 5/CLIDINIUM 2.5 CAP
TERAZOSIN 5MG TAB,ORAL
FOSINOPRIL SODIUM 10MG TAB,ORAL
FENTANYL TRANSDERM 25MCG/HR PATCH,TOP
CLOZAPINE 25MG TAB,ORAL
CLOZAPINE 100MG TAB,ORAL
CLARITHROMYCIN 500MG TAB,ORAL
FENTANYL TRANSDERM 50MCG/HR PATCH,TOP
GOSERELIN ACETATE 3.6MG INJ,IMPLANT
AMLODIPINE BESYLATE 5MG TAB,ORAL
DEXAMETHA 0.1%/TOBRAMYCIN 0.3% OINT,OPHT
ASPIRIN 1100MF TAB,ORAL
ETOPOSIDE 50MG/VIAL INJ
RANITIDINE HCL 300MG TAB,ORAL
DICLOFENAC SODIUM 0.1% SOLN,OPHT
RISPERIDONE 1MG TAB,ORAL
CLOMIPRAMINE 25MG CAP,ORAL
CLARITHROMYCIN 250MG TAB,ORAL
RISPERIDONE 4MG TAB,ORAL
GABAPENTIN 300MG CAP,ORAL
SALMETEROL XINAFOATE 25MCG INH,ORAL
LODOXAMIDE TROMETHAMINE 0.1% SOLN,OPHT
INTERFERON ALFA 2B,RECOMB 3MU/VIAL INJ
LORATADINE 10MG TAB,ORAL
AMOXICILLIN 250/5ML SUSP,ORAL
ATORVASTATIN CALCIUM 20MG TAB,ORAL
CANDESARTAN CILEXETIL 16MG TAB,ORAL
CARVEDILOL 6.25MG TAB,ORAL
CARVEDILOL 25MG TAB,ORAL
CETIRIZINE HCL 10MG TAB,ORAL
CLOPIDOGREL BISULFATE 75MG TAB,ORAL
EPROSARTAN MESYLATE 600MG TAB,ORAL
FLUVASTATIN SODIUM 80MG TAB,ORAL,SA
GABAPENTIN 400MG CAP,ORAL
GLIPEPIRIDE 2MG TAB,ORAL
VALACYCLOVIR HCL 500MG TAB,ORAL
TOPIRAMATE 25MG TAB,ORAL
TOPIRAMATE 50MG TAB,ORAL
TOPIRAMATE 100MG TAB,ORAL
TOPIRAMATE 200MG TAB,ORAL
TAMSULOSIN HCL 0.4MG CAP,ORAL
TELMISARTAN 80MG TAB,ORAL
ROSUVASTATIN CALCIUM 10MG TAB,ORAL
QUETIAPINE FUMARATE 200MG TAB,ORAL
PERINDOPRIL ERBUMINE 4MG TAB,ORAL
OLANZAPINE 10MG TAB,ORAL
OLANZAPINE 5MG TAB,ORAL
METOPROLOL TARTRATE 5MG/5ML INJ
METFORMIN HCL 850MG TAB,ORAL
LOSARTAN POTASSIUM 50MG TAB,ORAL
LABETALOL HCL 5MG/ML INJ
LANSOPRAZOLE 30MG CAP,ORAL,EC
LATANOPROST 0.005% SOLN,OPHT
AMOXICILLIN/CLAVULANATE 125MG/5ML SUSP
METFORMIN HCL 500MG TAB,ORAL
HCTZ 12.5MG/VALSARTAN 160MG TAB,ORAL
BISOPROLOL FUMARATE 10MG TAB,ORAL
BISOPROLOL FUMARATE 5MG TAB,ORAL
HEPARIN NA 25,000 UNIT/ML INJ
HEPARIN NA 5000 UNIT/ML INJ SOLN
DALTEPARIN SUBCUTAN 5000 UNITS/0.2 ML
MOMETASONE FUROATE 0.1% CREAM,TOP
ACITRETIN 10MG CAP,ORAL
MICONAZOLE NITRATE 2% CREAM,VAG 50GM
MICONAZOLE NITRATE 400MG SUPP,VAG
OXYTOCIN 10 UNITS/ML INJ
CLOMIPHENE CITRATE 50MG TAB,ORAL
MEDROXYPROGESTERONE ACETATE 5MG TAB,ORAL
METHYLPREDNISOLONE NA SUCC. 500MG/VL INJ
DESMOPRESSIN ACETATE 0.1MG TAB,ORAL
DESMOPRESSIN ACETATE O.2MG TAB,ORAL
CALCITONIN,SALMON 50 UNITS/VIAL INJ
CALCITONIN,SALMON 200U/ML SOLN,NASAL
ALENDRONATE SODIUM 70MG TAB,ORAL
AMIKACIN 500MG/VIAL INJ
CLARITHROMYCIN 125MG/5ML SUSP,ORAL
GENTAMICIN SULF 10MG/ML INJ 2ML/VL
CEFUROXIME SODIUM 750MG/VIAL INJ
CEFACLOR 500MG CAP,ORAL
CEFACLOR 125MG/5ML SUSP,SUSP
CEFDINIR 250MG/5ML SUSP,ORAL
CEFIXIME 100MG/5ML SUSP,ORAL 60ML
PIPERACILLIN/TAZOBACTAM 4.5GM/VIAL INJ
METRONIDAZOLE 500MG TAB,ORAL
METRONIDAZOLE 500MG/VIAL INJ
LAMIVUDINE 100MG TAB,ORAL
PEGINTEFERON ALFA 2A 80MCG INJ
INTERFERON BETA 1A 30MCG/VIAL INJ
DICLOFENAC SODIUM TAB 100MG TAB,ORAL,SA
INDOMETHACIN 100MG SUPP,RECTAL
TIZANIDINE HCL 4MG TAB,ORAL
CLONAZEPAM 2.5MG/ML DROPS,ORAL
LAMOTRIGINE 25MG TAB,ORAL
LAMOTRIGINE 50MG TAB,ORAL
LAMOTIRGINE 100MG TAB,ORAL
LEVETIRACETAM 500MG TAB,ORAL
LITHIUM CARBONATE 400MG TAB,ORAL
FLUVOXAMINE MALEATE 100MG TAB,ORAL
CITALOPRAM HYDROBROMIDE 40MG TAB,ORAL
PHENOBARBITAL 30MG/ML INJ
GALANTAMINE HYDROBROMIDE 4MG TAB,ORAL
ATRACURIUM BESYLATE 10MG/ML INJ
PANCURONIUM BROMIDE 2MG/ML INJ
VECURONIUM BROMIDE 4MG/2ML INJ
ENFLURANE LIQUID INHALATION
SEVOFLURANE LIQUID INHALATION
KETAMINE HCL 50MG/ML INJ
FLUMAZENIL 0.5MG/5ML INJ
LIDOCAINE 2% JELLY,TOP
FLUTICASONE PROP 50MCG INH,NASAL
TIOTROPIUM BROMIDE 18MCG CAP,INH,ORAL
CETIRIZINE HCL 5MG/5ML SYRUP,ORAL
LORATADINE 5MG/5ML SYRUP,ORAL
ANTAZOLINE 0.5/NAPHAZOLINE 0.025 SOL,OPH
DORZOLAMIDE HCL 2% SOLN,OPHT
BRIMONIDINE TARTRATE 0.2% SOLN,OPHT
BIMATOPROST 0.3% SOLN,OPHT
CYCLOSPORINE 25MG CAP,ORAL
CYCLOSPORINE 50MG CAP,ORAL
CYCLOSPORINE 100MG CAP,ORAL
TACROLIMUS 1MG CAP,ORAL
SIROLIMEU 1MG CAP,ORAL
MYCOPHENOLATE MOFETIL 500MG TAB,ORAL
PREGESTIMIL MILK PWDR,ORAL
OSELTAMIVIR PHOSPHATE 75MG CAP,ORAL
OSELTAMIVIR PHOSPHATE 60MG/5ML SUSP,ORAL
ACETAZOLAMIDE NA 500MG/VIAL INJ
ACITRETIN 25MG CAP,ORAL
ACYCLOVIR 200MG TAB,ORAL
AL HYDROXIDE/MG HYDROXIDE TAB,ORAL
AMIODARONE 150MG/VIAL INJ
AMOXICILLIN 1GM TAB,ORAL
AZITHROMYCIN 200MG/5ML SUSP,ORAL
AZITHROMYCIN 300MG/7.5ML SUSP
AZITHROMYCIN 250MG CAP,ORAL
BIPERIDIN 4MG TAB,ORAL
BUDESONIDE 100MCG SPRAY,NASAL
CALCIPOTRIENE 0.005% CREAM,TOP
CALCIPOTRIENE 0.005% OINT,TOP
CALCIPOTRIENE 0.005% SOLN,TOP
BETAMETHASONE/CALCIPOTRIENE OINT,TOP
CALCITONIN,SALMON 50 UNITS/VIAL INJ
CARBAMAZEPINE 40OMG TAB,ORAL,SA
CEFEPIME 1GM/VIAL INJ
CEFIXIME 100MG/5ML SUSP,ORAL 30ML
CEFPROZIL 125MG/5ML SUSP,ORAL
CEFTAZIDIME 1GM/VIAL INJ
CEFTIZOXIME 1GM/VIAL INJ
CEFUROXIME SODIUM 1500MG/VIAL INJ
CEFUROXIME AXETIL 500MG TAB,ORAL
DINOPROSTONE 3MG TAB,VAG
CIPROFLOXACIN 0.3% SOLN,OPHT
CLOXACILLIN 500MG/VIAL INJ
DICLOFENAC SODIUM 100MG SUPP,RECTAL
DICLOFENAC SODIUM 12.5MG SUPP,RECTAL
DICLOFENAC SODIUM 3% GEL,TOP
DILTIAZEM HCL 25MG/VIAL INJ
ENTECAVIR 1MG TAB,ORAL
ETHANOLAMINE OLEATE 5% INJ 5ML
MULTIVITAMIN WITH MINERALS TAB,ORAL
FERROUS SULFATE 100MG TAB,ORAL
FOLIC ACID 5MG TAB,ORAL
GALANTAMINE HYDROBROMIDE 8MG TAB,ORAL
INTERFERON BETA 1A 44MCG/VIAL INJ
ISOTRETINOIN 20MG CAP,ORAL
METRONIDAZOLE 125MG/5ML SUSP,ORAL
MICONAZOLE NITRATE CREAM,TOP 15GM
MICONAZOLE NITRATE 2% GEL,ORAL
MYCOPHENOLIC ACID 360MG TAB,ORAL,EC
BACITRACIN/NEOMYCIN/POLYMIXIN OINT,TOP
BACITRACIN 250IU/NEOMYCIN 5MG OINT,TOP
NEOSTIGMINE 2.5MG/VIAL INJ
NIFEDIPINE 20MG TAB,ORAL
NITROGLYCERIN 1MG/1ML INJ
OMEPRAZOLE 40MG/VIAL INJ
OXYTOCIN 5 UNITS/ML INJ
PEGINTEFERON ALFA 2A 180MCG INJ
PHYTONADIONE 2MG/ML INJ
PRAVASTATIN SODIUM 40MG TAB,ORAL
SILVER SULFADIAZINE/CERIUM NITRATE CRM
SENNA GLYCOSIDES 12MG TAB,ORAL
RIBAVIRIN 200MG CAP,ORAL
SIMETHICONE 120MG TAB,CHEW
SIMVASTATIN 20MG TAB,ORAL
SODIUM BICARBONATE 500MG TAB,ORAL
SPIRONOLACTONE 50MG TAB,ORAL
TAMOXIFEN CITRATE 20MG TAB,ORAL
TERBINAFINE 1% CREAM,TOP
TERBINAFINE 1% SPRAY,TOP
TERBINAFINE 125MG TAB,OARL
TERBINAFINE 250MG TAB,ORAL
TIROFIBAN HCL 250MCG/ML INJ
GRAMCID/NEOMYCIN/NYSTATIN/TAC CREAM,TOP
ECONAZOLE 1%/TAC 0.1% CREAM,TOP 30GM
VITAMIN B COMPLEX SYRUP,ORAL
VITAMIN B COMPLEX TAB,ORAL
FENTANYL CITRATE 100MCG/2ML INJ
MORPHINE SULFATE 10MG TAB,ORAL
REMIFENTANIL HCL 2MG/VIAL INJ
CARBOPLATIN 50MG/VIAL INJ
CARBOPLATIN 450MG/VIAL INJ
CISPLATIN 50MG/VIAL INJ
ASPARAGENASE 10,000UNITS/VIAL INJ
CYTARABINE 500MG/VIAL INJ
EPIRUBICIN HCL 50MG/VIAL INJ
ETOPOSIDE 100MG/VIAL INJ
FLUOROURACIL 250MG/VIAL INJ
FLUOROURACIL 500MG/VIAL INJ
FLUOROURACIL 1000MG/VIAL INJ
IFOSFAMIDE 1GM/VIAL INJ
MESNA 400MG/4ML INJ
METHOTREXATE 50MG/VIAL INJ
MERCAPTOPUINE 50MG TAB,ORAL
IDARUBICIN HCL 10MG/VIAL INJ
FILGRASTIM 0.3MG/VIAL INJ
PACLITAXEL 300MG/VIAL INJ
PACLITAXEL 30MG/VIAL INJ
PACLITAXEL 50MG/VIAL INJ
GEMCITABINE 1GM/VIAL INJ
FLUDARABINE 50MG/VIAL INJ
ANASTROZOLE 1MG TAB,ORAL
LETROZOLE 2.5MG TAB,ORAL
IMATINIB 100MG CAP,ORAL
OXALIPLATIN 50MG/VIAL INJ
BICALUTAMIDE 50MG TAB,ORAL
EXEMESTANE 25MG TAB,ORAL
ZOLEDRONIC ACID 4MG/VIAL INJ
CAPECITAB ORALINE 500MG TAB,ORAL
RITUXIMAB 100MG/VIAL INJ
RITUXIMAB 500MG/VIAL INJ
TRASTUZUMAB 440MG/VIAL INJ
DOCETAXEL 20MG/VIAL INJ
ALPROSTADIL 20MCG/VIAL INJ
TRIPTORELIN PAMOATE 11.25MG/VIAL INJ
GOSERELIN ACETATE 10.8MG INJ,IMPLANT
IRINOTECAN HCL 40MG/VIAL INJ
IRINOTECAN HCL 100MG/VIAL INJ
VINORELBINE TARTRATE 10MG/VIAL INJ
TEMOZOLOMIDE 100MG CAP,ORAL
TEMOZOLOMIDE 250MG CAP,ORAL
LAMIVUDINE 150/ZIDOVUDINE 3OO TAB,ORAL
LOPINAVIR 80MG/RITONAVIR 20MG/ML SOLN
^C
sam@sam-desktop:~/pocn-moh$ mumps -dir

GTM>S DUZ=111 D ^XUP

Setting up programmer environment
This is a TEST account.

Terminal Type set to: C-VT102

You have 2 new messages.
Select OPTION NAME:
GTM>; How to launch a job in Taskman

GTM>; Variables

GTM>; ZTDESC -> Name of the Job

GTM>; ZTRTN -> What Entry Point to Execute

GTM>; ZTSAVE(var) -> Variable name to save

GTM>; ZTH -> Optional Start Time

GTM>; then run ^%ZTLOAD

GTM>ZP ^KBANJOBBED
KBANJOBBED ; jobbed process ; 4/3/11 1:30pm
 ;
 ; Goes through the drug file and prints stuff
 NEW I SET I=0
 FOR  SET I=$O(^PSDRUG(I)) QUIT:'I  HANG .1 WRITE $P(^(I,0),"^"),!
 QUIT

GTM>SET ZTDESC="Sam's Jobbed Process"

GTM>SET ZTRTN="^KBANJOBBED"

GTM>; ZTSAVE is empty

GTM>; ZTH is empty -> means start now

GTM>; Open a device for taskman to use

GTM>D ^%ZIS

DEVICE: HOME// HFS  Host File Server (GT.M)
HOST FILE NAME: /tmp/hfs.dat///tmp/taskman.txt  ADDRESS/PARAMETERS: newversion//


GTM>zwrite IO
IO="/tmp/taskman.txt"
IO(0)="/dev/pts/0"
IO(1,"/dev/pts/0")=""
IO(1,"/tmp/taskman.txt")=""
IO("ERROR")=""
IO("HOME")="50^/dev/pts/0"
IO("IP")="172.16.16.56"
IO("ZIO")="/dev/pts/0"

GTM>D ^%ZTLOAD

Requested Start Time: NOW//  (APR 06, 2011@10:17:41)
GTM>ZWRITE
%L=41
DILOCKTM=3
DISYS=19
DT=3110406
DTIME=3600
DUZ=111
DUZ(0)="#"
DUZ(1)=""
DUZ(2)=68
DUZ("AG")="E"
DUZ("BUF")=1
DUZ("LANG")=""
IO="/tmp/taskman.txt"
IO(0)="/dev/pts/0"
IO(1,"/dev/pts/0")=""
IO(1,"/tmp/taskman.txt")=""
IO("ERROR")=""
IO("HOME")="50^/dev/pts/0"
IO("IP")="172.16.16.56"
IO("ZIO")="/dev/pts/0"
IOBS="$C(8)"
IOF="#"
IOHG=""
IOM=132
ION="HFS"
IOPAR="(newversion)"
IOS=48
IOSL=64
IOST="P-OTHER"
IOST(0)=16
IOT="HFS"
IOUPAR=""
IOXY=""
POP=0
U="^"
X="21;DIC(4.2,"
XPARSYS="21;DIC(4.2,"
XQXFLG="^^XUP"
ZTSK=6722
ZTSK("D")="62187,37061"

GTM>H
sam@sam-desktop:~/pocn-moh$ cd /tmp
sam@sam-desktop:/tmp$ ls
acroread_1000_1000   gtm_mutex00004701  orbit-sam
bmx_0230.k           gtm_mutex00004722  pulse-IIjN7fmb39j4
bmx_0400.k           gtm_mutex0000484A  samerr.txt
bmx_0400.zip         gtm_mutex0000486B  samjobbed.txt
bmx_040u.pdf         gtm_mutex000048DE  ssh-Wjdesr1141
bsdx0150.v3.k        gtm_mutex00004A59  taskman.txt
fis-gtm              gtm_mutex00004ABD  vistaprint_1467048521.txt
gedit.sam.214023122  haze-y01geQ        vistaprint_1735024255.txt
gtm_mutex00001A91    hfs.dat            vistaprint_2263877717.txt
gtm_mutex00001AAA    keyring-lKbb7L     vistaprint_4057892024.txt
gtm_mutex00001AD7    md-sam-socket      vistaprint_981620509.txt
gtm_mutex000046B3    orbit-root
sam@sam-desktop:/tmp$ tail -f taskman.txt
^@^C
sam@sam-desktop:/tmp$ tail -f hfs.dat
PLASTER TENSO 7.5CM X 4.5M ROLL
POVIDINE IODINE 7.5% SURGICAL SCRUB,TOP
GLOVES DISPOSABLE POLYETHYLENE (MEDIUM)
GLOVES DISPOSABLE POLYETHYLENE (LARGE)
GLOVES LATEX NON-STERILE (MEDIUM)
GLOVES LATEX NON STERILE (LARGE)
OXYGEN MASK DISPOSABLE COMPLETE (INFANT)
OXYGEN MASK DISPOSABLE COMPLETE (CHILD)
OXYGEN MASK DISPOSABLE COMPLETE (ADULT)
OXYGEN MASK W/NEBULIZER JAR (INFANT)
OXYGEN MASK W/NEBULIZER  (CHILD)
OXYGEN MASK W/NEBULIZER  (ADULT)
SPINAL NEEDLE G20
SPINAL NEEDLE G22
DOSE REGULATOR IN PEEL BACK,STERILE
AIR WAY DISPOSABLE SIZE 00
AIR WAY DISPOSABLE SIZE 0
AIR WAY DISPOSABLE SIZE 1
AIR WAY DISPOSABLE SIZE 2
AIR WAY DISPOSABLE SIZE 3
COVER CANNULA
NASAL CANNULA - CHILD
NASAL CANNULA - ADULT
MASK VENTURE DISPOSABLE
EPIDURAL W/TOUY NEEDLE DISPOSABLE G16
EPIDURAL W/TOUY NEEDLE DISPOSABLE G18
PATIENT CIRCUIT AYRES T PIECE
PATIENT CIRCUIT MAGILL CIRCUITS
PATIENT CIRCUIT BAIN CIRCUITS
LARYNGEAL MASK
NASO-PHARYNGEAL AIR WAY
BREATHING SYSTEM FILTER
CANNULA INFUSION REUSABLE 4MM
CANNULA INFUSION REUSABLE 6MM
FLUORESCEIN PAPER SINGLES
EYE PAD
VACUUM TREPHINE RECEPIENT 7.5
VACUUM TREPHINE DONOR 7.75
EYE SHIELD CLEAR,UNIVERSAL
CANNULA LACRIMAL
ADAPTER TITANIUM
SYRINGE W/NEEDLE 29Gx1/2IN 1ML INSULIN
SYRINGE W/NEEDLE 23Gx1IN 2ML
SYRINGE W/NEEDLE 22Gx1.5IN 5ML
SYRINGE W/NEEDLE 21Gx1.5IN 10ML
SYRINGE W/NEEDLE 21Gx1.5IN 10ML
SYRINGE W/NEEDLE 19Gx1.5IN 20ML
SYRINGE W/NEEDLE 50ML
SYRINGE IRRIGATION 50-60ML
SUCTION TUBE SIZE 8
SUCTION TUBE SIZE 10
SUCTION TUBE SIZE 12
SUCTION TUBE SIZE 14
FOLEY CATHETER 2WAY SIZE 6
FOLEY CATHETER 2WAY SIZE 8
FOLEY CATHETER 2WAY SIZE 10
FOLEY CATHETER 2WAY SIZE 12
FOLEY CATHETER 2WAY SIZE 14
FOLEY CATHETER 2WAY SIZE 16
FOLEY CATHETER 2WAY SIZE 20
FOLEY CATHETER 2WAY SIZE 18
FOLEY CATHETER 2WAY SIZE 22
SURGICAL GLOVE SIZE 7
SURGICAL GLOVE SIZE 7.5
SURGICAL GLOVE SIZE 8
SUCTION TUBE SIZE 16
SUCTION TUBE SIZE 18
STOPCOCK 3-WAY
THERMOMETER ORAL
THERMOMETER RECTAL
IDENTIFICATION BAND ADULT
ID BAND CHILD
NEBULIZER KIT
DRAW SHEET
DIAPERS ADULT LARGE
DEXTROSE 10% INJ 1000ML
SYRINGE 60ML
SYRINGE 20ML
SYRINGE 10ML
SYRINGE 5ML
SYRINGE 2ML
SYRINGE 1ML
SURGICAL GLOVE SIZE 6.5
SURGICAL GLOVE SIZE 8.5
LATEX GLOVE, SMALL
LATEX GLOVE, MEDIUM
LATEX GLOVE LARGE
CANNULA SIZE 18
CANNULA SIZE 20
CANNULA SIZE 22
CANNULA SIZE 24
MICRO-DROPPER 150ML
SHAVING SET
E.C.G. ELECTRODE ADULT
DISPOSABLE CONDOM EXTRA LARGE
HOLLOW FIBER DIALIZER 650
DISPOSABLE CONDOM LARGE
OPERATING GOWN PATIENT
OPERATING HEAD CAP
URINE BAG ADULT
CATHETER FOLEY 3WAY SIZE 20
CATHETER FOLEY 3WAY SIZE 22
FOLEY CATHETER 3WAY SIZE 24
E.C.G. ROLL 10
EXTERNAL DRAIN SET
EPIDURAL CATHETER
ENDOTRACHEAL TUBE 8.5
ENDOTRACHEAL TUBE DOUBLE LUMEN
SYRINGE 50ML
BODY LOTION,TOP (SARNOL)
NEBULIZER KIT CHILD
SUCTION TUBE SIZE 6
HOLLOW FIBER DIALIZER 1.6
C.V.P. LINE 18
COLOSTOMY BASE 50
COLOSTOMY BASE 80
SYRINGE 50ML TIP
COTTON SWAB
DOUBLE-J CATHETER
DYNA CAST BANDAGE
DOSE FLOW
FACE MASK SURGICAL
COVER FOR SHOES
SURGICAL BLADE SIZE 18
CONNECTION T TUBE
CALCIUM ALGINATE SACHET
CENTRAL LINE
GROMMET T TUBE ADULT
SHARP BOX
SUCTION MACHINE
VASCULAR GRAFT POLYESTER D-14x7MM,L-40CM
VASCULAR GRAFT POLYESTER D-12x7MM,L-40CM
VASCULAR GRAFT POLYESTER D-6MM,L-60CM,ST
VASCULAR GRAFT POLYSTER D-14MM,L-60CM,ST
VASCULAR GRAFT POLYESTER D-8MM,L-60CM,ST
VASCULAR GRAFT POLYSTER D-8MM,L-100CM,ST
RUBBER REBREATHING BAG 0.5 LITER
RUBBER REBREATHING BAG 1.0 LITER
RUBBER REBREATHING BAG 1.5 LITER
RUBBER REBREATHING BAG 2.0 LITER
SUCTION TUBE BLACK W/YEL LINE 6.35x12.75
SUCTION TUBE TRANSPARENT 7MM x 9MM
ENDOTRACHEAL TUBE 3.0
ENDOTRACHEAL TUBE 3.5
ENDOTRACHEAL TUBE 4.0
ENDOTRACHEAL TUBE 4.5
ENDOTRACHEAL TUBE 2.0
ENDOTRACHEAL TUBE 2.5
ENDOTRACHEAL TUBE 6.0
ENDOTRACHEAL TUBE 5.0
ENDOTRACHEAL TUBE 5.5
ENDOTRACHEAL TUBE UNKINKABLE 6.5
ENDOTRACHEAL TUBE 6.5
ENDOTRACHEAL TUBE 7.0
ENDOTRACHEAL TUBE 7.5
ENDOTRACHEAL TUBE 8.0
ENDOBRONCHIAL TUBE DBL LUMEN 37 LEFT
ENDOBRONCHIAL TUBE DBL LUMEN 37 RIGHT
ENDOBRONCHIAL TUBE DBL LUMEN 39 LEFT
ENDOBRONCHIAL TUBE DBL LUMEN 39 RIGHT
POSTERIOR CHAMBER INTRAOCULAR LENS
CYSTOTOME IRRIGATING ANGLED 40x12.5
CYCTOTOME N0N-IRRIGATING
KNIFE,CRESCENT ANGLED BEVEL UP 2.25MM
KNIFE,IOL ANGLED 5.5MM
KNIFE,MVR ANGLED G20
KNIFE,MVR STRAIGHT G20
EYE SPONGE MICROSURGICAL 5/PACK
MANIPULATING HOOK IOL ANGLED REUSABLE
CANNULA MICRO J SHAPED
CATHETER,DBL LUMEN HEMODIALYSIS 9-11CM
CATHETER,DBL LUMEN HEMODIALYSIS 13-14CM
CATHETER,DBL LUMEN HEMODIALYSIS 15-16CM
SCISSORS,CLAMP PLASTIC
CATHETER STYLET PERITONEAL NEONATE
CATHETER STYLET PERITONEAL PEDIATRIC
CATHETER STYLET PERITONEAL ADULT
CATHETER TENKOFF PEDIATRIC
CATHETER TENKOFF ADULT
MINICAP COVER
CATHETER ADAPTER (BAXTER
ABDUCTION SPLINT WITH SS BAR SMALL
ABDUCTION SPLINT WITH SS BAR MEDIUM
ABDUCTION SPLINT WITH SS BAR LARGE
CATHETER SUCTION CH-6
CATHETER SUCTION CH-8
CATHETER SUCTION CH-10
CATHETER SUCTION CH-14
CATHETER SUCTION CH-12
CATHETER SUCTION CH-16
CATHETER SUCTION CH-18
ECG CHEST ELECTRODE ADULT
URINE COLLECTOR MALE/FEMALE 100/PKT
URINE BAG CHILD
IDENTIFICATION BAND CHILD
IDENTIFICATION BAND MOTHER/CHILD
RECTAL TUBE SIZE 25-35
DORMIA BASKET
CHEMICAL INDICATOR STEAM STERILIZER
CHEMICAL INDICATOR ETHYLENE O2 STERLIZER
SURGICAL BLADE SIZE 10
SURGICAL BLADE SIZE 11
SURGICAL BLADE SIZE 12
SURGICAL BLADE SIZE 15
SURGICAL BLADE SIZE 20
SURGICAL BLADE SIZE 22
SURGICAL BLADE SIZE 24
FEEDING TUBE CH-4
FEEDING TUBE CH-5
FEEDING TUBE CH-6
^C
sam@sam-desktop:/tmp$ cd -
/home/sam/pocn-moh
sam@sam-desktop:~/pocn-moh$ mumps -dir

GTM>; Transaction commands

GTM>; - Used to save values simultaneous to the DB

GTM>; - Do not do locking for you!!!

GTM>; (except if you include the SERIAL keyword)

GTM>; Syntax

GTM>; TSTART () - To start a transaction

GTM>; TCOMMIT - To end a transaction

GTM>K ^ZSAM

GTM>TSTART ()

GTM>WRITE $TLEVEL
1
GTM>S ^ZSAM=1

GTM>S ^XSAM=1

GTM>TCOMMIT

GTM>; In order to enforce some kind of synchronization between

GTM>; different processes...

GTM>; TSTART ():SERIAL

GTM>; What this does is that only 1 process can do a transaction at a time

GTM>; If this is not good enough (e.g. when making appointments for the same
 slot, where it is really necessary for only one person to touch the slot at
 a time)

GTM>; Implement locking

GTM>; LOCK ^SC(4,3101123.1) -> At 10 am, nobody can make appointments

GTM>; except this process

GTM>; which is tied to a user

GTM>; TSTART ()

GTM>; ETC ETC ETC

GTM>; TCOMMIT

GTM>; LOCK -^SC(4,3101123.1)

GTM>LOCK +SAM

GTM>LOCK +BLAHBLAHBLAH

GTM>S DPT=1

GTM>S DFN=33

GTM>L +^DPT(DFN)

GTM>ZSHOW "L"
MLG:3,MLT:0
LOCK ^DPT(33) LEVEL=1
LOCK BLAHBLAHBLAH LEVEL=1
LOCK SAM LEVEL=1

GTM>L

GTM>; $TLEVEL is useful to know if a transaction is taking place

GTM>WRITE $TLEVEL
0
GTM>; TROLLBACK - Rollback the transaction

GTM>; TRESTART - Restart the transaction

GTM>; TSTART takes several parameters

GTM>; TSTART just by itself starts a non-restartable transaction

GTM>; never USE THAT in GT.M

GTM>; b/c GT.M always restarts transactions if somebody else is editing the
globals

GTM>; If you intend to use TSTART, use TSTART ()

GTM>; paren make the transaction restartable

GTM>zed "UJOPTREG"

GTM>; What do these parens mean????

GTM>; () - Don't restore any variables when restarting

GTM>; (*) - Restore all variables when restarting

GTM>; (X,Y) - Restore just X, and Y, not Z.

GTM>; TSTART ():SERIAL:TRANSACTIONID="UJOPTREG"

GTM>; Be careful between Transactions and the Error Trap

GTM>; %ZTER rolls back the transaction AFTER it records the data

GTM>; - which means ^XTER shows absolutely nothing!!!

GTM>zed "KBANTRAN"

GTM>zl

GTM>k ^ZSAM

GTM>ZP ^KBANTRAN
KBANTRAN ; Transactions Test ; 4/6/11 10:57am
 ;;
 ;N $ETRAP S $ETRAP="GOTO ERR"
 N $ESTACK,$ETRAP S $ETRAP="D ERR^ZU Q:$QUIT -9 Q"
 ;;test error
 ;W 1/0
 ;;end test
 TSTART ():SERIAL
 ;;test error in transaction
 ;W 1/0 ; --> NOT LOGGED. VISTA Error Trap doesn't behave well with Transact
ions
 ;This causes big big problems. Can't know what error happened.
 ;;end test
 SET ^ZSAM=1 ; Only in this process ^ZSAM is 1
 SET ^ZSAM(1)=1 ; Still only in this process
 READ "In the middle of the transaction.",X,!
 TCOMMIT  ; Save Data
 QUIT
ERR
 BREAK

GTM>D ^KBANTRAN
In the middle of the transaction.

GTM>ZED

GTM>zl

GTM>D ^KBANTRAN
sam@sam-desktop:~/pocn-moh$ mumps -dir

GTM>D ^XTER


In response to the DATE prompt you can enter:
     'S' to specify text to be matched in error or routine name


4 errors logged on 4/6/2011
  4)  <(DIVZERO)>KBANTRAN+5^KBANTRAN  10:58:44  EHR,EHR    19150  /dev/pts/0
  3)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:59:26  EHR,EHR    18862  0
  2)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:26:17  EHR,EHR    18581  0
  1)  <(UNDEF)>DO+2^%XUCI             01:30:01  EHR,EHR    17277  0

No screened error

     Enter '^' to quit listing, <RETURN> to continue...: 4

Process ID:  19150  (19150)             APR 06, 2011 10:58:44

UCI/VOL: [EHR,EHR]

$ZA:   0                                $ZB: \013

Current $IO: /dev/pts/0                 Current $ZIO: ^0^4^/dev/pts/0

$ZE= KBANTRAN+5^KBANTRAN, Attempt to divide by zero,150373210,-%GTM-E-DIVZERO

 W 1/0

Last Global Ref: ^ZSAM(1)

Which symbol? > ^L


$DEVICE=
$ECODE=,M9,Z150373210,
$ESTACK=3
$ETRAP=D UNWIND^ZU
$QUIT=0
$STACK=4
$STACK(000)=-dir
$STACK(000,"ECODE")=
$STACK(000,"PLACE")=+1^GTM$DMOD
$STACK(000,"MCODE")=
$STACK(001)=DO
$STACK(001,"ECODE")=,M9,Z150373210,
$STACK(001,"PLACE")=KBANTRAN+5^KBANTRAN
$STACK(001,"MCODE")= W 1/0
$STACK(002)=DO
$STACK(002,"ECODE")=
$STACK(002,"PLACE")=ERR2+6^ZU
$STACK(002,"MCODE")= D ^%ZTER K %ZT ; Capture symbol table first!
$X $Y=0 4
     Enter '^' to quit listing, <RETURN> to continue...:

$ZV=GT.M V5.4-001 Linux x86
%ZT("^XUTL(""XQ"",$J)")=
%ZTER11I=EHR,EHR
%ZTER11N=4
%ZTER11S=
%ZTER11Z=0
%ZTER12A=0
%ZTER12B=\\013
%ZTERCNT=28
%ZTERH1=62187
%ZTERROR=
%ZTERRT=^%ZTER(1,62187,1,4)
%ZTERSUB=%ZTER11S)
%ZTERVAP=%ZT(
%ZTERVAR=%ZTERVAR
%ZTERZE=KBANTRAN+5^KBANTRAN, Attempt to divide by zero,150373210,-%GTM-E-DIVZERO
DFN=33
DPT=1
X=

$ZE= KBANTRAN+5^KBANTRAN, Attempt to divide by zero,150373210,-%GTM-E-DIVZERO

 W 1/0

Last Global Ref: ^ZSAM(1)

Which symbol? >

Which error? >

Which date? >
GTM>ZED
%GTM-E-ZEDFILSPEC, Illegal ZEDIT file specification:

GTM>ZED "KBANTRAN"

GTM>zl

GTM>ZP ^KBANTRAN
KBANTRAN ; Transactions Test ; 4/6/11 10:59am
 ;;
 ;N $ETRAP S $ETRAP="GOTO ERR"
 N $ESTACK,$ETRAP S $ETRAP="D ERR^ZU Q:$QUIT -9 Q"
 ;;test error
 ;W 1/0
 ;;end test
 TSTART ():SERIAL
 ;;test error in transaction
 W 1/0 ; --> NOT LOGGED. VISTA Error Trap doesn't behave well with Transactions
 ;This causes big big problems. Can't know what error happened.
 ;;end test
 SET ^ZSAM=1 ; Only in this process ^ZSAM is 1
 SET ^ZSAM(1)=1 ; Still only in this process
 READ "In the middle of the transaction.",X,!
 TCOMMIT  ; Save Data
 QUIT
ERR
 BREAK

GTM>D ^KBANTRAN


RECORDING THAT AN ERROR OCCURRED ---

               Sorry 'bout that

          $STACK=3  $ECODE=
          $ZSTATUS=150373210,KBANTRAN+9^KBANTRAN,%GTM-E-DIVZERO, Attempt to divi
de by zerosam@sam-desktop:~/pocn-moh$ mumps -dir

GTM>D ^XTER


In response to the DATE prompt you can enter:
     'S' to specify text to be matched in error or routine name


4 errors logged on 4/6/2011
  4)  <(DIVZERO)>KBANTRAN+5^KBANTRAN  10:58:44  EHR,EHR    19150  /dev/pts/0
  3)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:59:26  EHR,EHR    18862  0
  2)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:26:17  EHR,EHR    18581  0
  1)  <(UNDEF)>DO+2^%XUCI             01:30:01  EHR,EHR    17277  0

No screened error

     Enter '^' to quit listing, <RETURN> to continue...:

Which error? >

Which date? >
GTM>ZED
%GTM-E-ZEDFILSPEC, Illegal ZEDIT file specification:

GTM>ZED "KBANTRAN"

GTM>zl

GTM>zp ^KBANTRAN
KBANTRAN ; Transactions Test ; 4/6/11 11:01am
 ;;
 ;N $ETRAP S $ETRAP="GOTO ERR"
 N $ESTACK,$ETRAP S $ETRAP="GOTO ERR^KBANTRAN"
 ;;test error
 ;W 1/0
 ;;end test
 TSTART ():SERIAL
 ;;test error in transaction
 W 1/0 ; --> NOT LOGGED. VISTA Error Trap doesn't behave well with Transactions
 ;This causes big big problems. Can't know what error happened.
 ;;end test
 SET ^ZSAM=1 ; Only in this process ^ZSAM is 1
 SET ^ZSAM(1)=1 ; Still only in this process
 READ "In the middle of the transaction.",X,!
 TCOMMIT  ; Save Data
 QUIT
ERR
 D ^%ZTER
 BREAK
 HALT

GTM>D ^KBANTRAN
%GTM-I-BREAK, Break instruction encountered
                At M source location ERR+2^KBANTRAN

GTM>D ^XTER


In response to the DATE prompt you can enter:
     'S' to specify text to be matched in error or routine name


5 errors logged on 4/6/2011
  5)  <(DIVZERO)>KBANTRAN+9^KBANTRAN  11:01:55  EHR,EHR    19297  /dev/pts/0
  4)  <(DIVZERO)>KBANTRAN+5^KBANTRAN  10:58:44  EHR,EHR    19150  /dev/pts/0
  3)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:59:26  EHR,EHR    18862  0
  2)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:26:17  EHR,EHR    18581  0
  1)  <(UNDEF)>DO+2^%XUCI             01:30:01  EHR,EHR    17277  0

No screened error

     Enter '^' to quit listing, <RETURN> to continue...: ^

Which error? >

Which date? >
GTM>ZC
sam@sam-desktop:~/pocn-moh$ mumps -dir

GTM>D ^XTER


In response to the DATE prompt you can enter:
     'S' to specify text to be matched in error or routine name


4 errors logged on 4/6/2011
  4)  <(DIVZERO)>KBANTRAN+5^KBANTRAN  10:58:44  EHR,EHR    19150  /dev/pts/0
  3)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:59:26  EHR,EHR    18862  0
  2)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:26:17  EHR,EHR    18581  0
  1)  <(UNDEF)>DO+2^%XUCI             01:30:01  EHR,EHR    17277  0

No screened error

     Enter '^' to quit listing, <RETURN> to continue...:

Which error? >

Which date? >
GTM>ZED
%GTM-E-ZEDFILSPEC, Illegal ZEDIT file specification:

GTM>ZED "KBANTRAN"

GTM>zl

GTM>zp ^KBANTRAN
KBANTRAN ; Transactions Test ; 4/6/11 11:03am
 ;;
 ;N $ETRAP S $ETRAP="GOTO ERR"
 N $ESTACK,$ETRAP S $ETRAP="GOTO ERR^KBANTRAN"
 ;;test error
 ;W 1/0
 ;;end test
 TSTART ():SERIAL
 ;;test error in transaction
 W 1/0 ; --> NOT LOGGED. VISTA Error Trap doesn't behave well with Transactions
 ;This causes big big problems. Can't know what error happened.
 ;;end test
 SET ^ZSAM=1 ; Only in this process ^ZSAM is 1
 SET ^ZSAM(1)=1 ; Still only in this process
 READ "In the middle of the transaction.",X,!
 TCOMMIT  ; Save Data
 QUIT
ERR
 TROLLBACK
 D ^%ZTER
 BREAK
 HALT

GTM>D ^KBANTRAN
%GTM-I-BREAK, Break instruction encountered
                At M source location ERR+3^KBANTRAN

GTM>D ^XTER


In response to the DATE prompt you can enter:
     'S' to specify text to be matched in error or routine name


5 errors logged on 4/6/2011
  5)  <(DIVZERO)>KBANTRAN+9^KBANTRAN  11:03:37  EHR,EHR    19305  /dev/pts/0
  4)  <(DIVZERO)>KBANTRAN+5^KBANTRAN  10:58:44  EHR,EHR    19150  /dev/pts/0
  3)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:59:26  EHR,EHR    18862  0
  2)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:26:17  EHR,EHR    18581  0
  1)  <(UNDEF)>DO+2^%XUCI             01:30:01  EHR,EHR    17277  0

No screened error

     Enter '^' to quit listing, <RETURN> to continue...:

Which error? >

Which date? >
GTM>ZC
sam@sam-desktop:~/pocn-moh$ mumps -dir

GTM>D ^XTER


In response to the DATE prompt you can enter:
     'S' to specify text to be matched in error or routine name


5 errors logged on 4/6/2011
  5)  <(DIVZERO)>KBANTRAN+9^KBANTRAN  11:03:37  EHR,EHR    19305  /dev/pts/0
  4)  <(DIVZERO)>KBANTRAN+5^KBANTRAN  10:58:44  EHR,EHR    19150  /dev/pts/0
  3)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:59:26  EHR,EHR    18862  0
  2)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:26:17  EHR,EHR    18581  0
  1)  <(UNDEF)>DO+2^%XUCI             01:30:01  EHR,EHR    17277  0

No screened error

     Enter '^' to quit listing, <RETURN> to continue...:

Which error? >

Which date? >
GTM>ZED
%GTM-E-ZEDFILSPEC, Illegal ZEDIT file specification:

GTM>ZED "KBANTRAN"

GTM>zl

GTM>zp ^KBANTRAN
KBANTRAN ; Transactions Test ; 4/6/11 11:04am
 ;;
 ;N $ETRAP S $ETRAP="GOTO ERR"
 N $ESTACK,$ETRAP S $ETRAP="GOTO ERR^KBANTRAN"
 ;;test error
 W 1/0
 ;;end test
 TSTART ():SERIAL
 ;;test error in transaction
 W 1/0 ; --> NOT LOGGED. VISTA Error Trap doesn't behave well with Transactions
 ;This causes big big problems. Can't know what error happened.
 ;;end test
 SET ^ZSAM=1 ; Only in this process ^ZSAM is 1
 SET ^ZSAM(1)=1 ; Still only in this process
 READ "In the middle of the transaction.",X,!
 TCOMMIT  ; Save Data
 QUIT
ERR
 TROLLBACK
 D ^%ZTER
 BREAK
 HALT

GTM>D ^KBANTRAN
%GTM-E-TLVLZERO, Transaction is not in progress

GTM>ZED

GTM>zl

GTM>zp ^KBANTRAN
KBANTRAN ; Transactions Test ; 4/6/11 11:06am
 ;;
 ;N $ETRAP S $ETRAP="GOTO ERR"
 N $ESTACK,$ETRAP S $ETRAP="GOTO ERR^KBANTRAN"
 ;;test error
 W 1/0
 ;;end test
 TSTART ():SERIAL
 ;;test error in transaction
 W 1/0 ; --> NOT LOGGED. VISTA Error Trap doesn't behave well with Transactions
 ;This causes big big problems. Can't know what error happened.
 ;;end test
 SET ^ZSAM=1 ; Only in this process ^ZSAM is 1
 SET ^ZSAM(1)=1 ; Still only in this process
 READ "In the middle of the transaction.",X,!
 TCOMMIT  ; Save Data
 QUIT
ERR
 IF $TLEVEL>0 TROLLBACK  ; if there's a transaction in progress
 D ^%ZTER
 BREAK
 HALT

GTM>D ^KBANTRAN
%GTM-I-BREAK, Break instruction encountered
                At M source location ERR+3^KBANTRAN

GTM>D ^XTER


In response to the DATE prompt you can enter:
     'S' to specify text to be matched in error or routine name


6 errors logged on 4/6/2011
  6)  <(DIVZERO)>KBANTRAN+5^KBANTRAN  11:06:54  EHR,EHR    19313  /dev/pts/0
  5)  <(DIVZERO)>KBANTRAN+9^KBANTRAN  11:03:37  EHR,EHR    19305  /dev/pts/0
  4)  <(DIVZERO)>KBANTRAN+5^KBANTRAN  10:58:44  EHR,EHR    19150  /dev/pts/0
  3)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:59:26  EHR,EHR    18862  0
  2)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:26:17  EHR,EHR    18581  0
  1)  <(UNDEF)>DO+2^%XUCI             01:30:01  EHR,EHR    17277  0

No screened error

     Enter '^' to quit listing, <RETURN> to continue...: ^

Which error? >

Which date? >
GTM>ZC
sam@sam-desktop:~/pocn-moh$ mumps -dir

GTM>D ^XTER


In response to the DATE prompt you can enter:
     'S' to specify text to be matched in error or routine name


6 errors logged on 4/6/2011
  6)  <(DIVZERO)>KBANTRAN+5^KBANTRAN  11:06:54  EHR,EHR    19313  /dev/pts/0
  5)  <(DIVZERO)>KBANTRAN+9^KBANTRAN  11:03:37  EHR,EHR    19305  /dev/pts/0
  4)  <(DIVZERO)>KBANTRAN+5^KBANTRAN  10:58:44  EHR,EHR    19150  /dev/pts/0
  3)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:59:26  EHR,EHR    18862  0
  2)  <(SOCKWRITE)>SNDERR+4^BMXMON    09:26:17  EHR,EHR    18581  0
  1)  <(UNDEF)>DO+2^%XUCI             01:30:01  EHR,EHR    17277  0

No screened error

     Enter '^' to quit listing, <RETURN> to continue...:

Which error? >

Which date? >
GTM>ZED
%GTM-E-ZEDFILSPEC, Illegal ZEDIT file specification:

GTM>ZED "KBANTRAN"

GTM>zl

GTM>zp ^KBANTRAN
KBANTRAN ; Transactions Test ; 4/6/11 11:08am
 ;;
 ;N $ETRAP S $ETRAP="GOTO ERR"
 N $ESTACK,$ETRAP S $ETRAP="GOTO ERR^KBANTRAN"
 ;;test error
 W 1/0
 ;;end test
 TSTART ():SERIAL
 ;;test error in transaction
 W 1/0 ; --> NOT LOGGED. VISTA Error Trap doesn't behave well with Transactions
 ;This causes big big problems. Can't know what error happened.
 ;;end test
 SET ^ZSAM=1 ; Only in this process ^ZSAM is 1
 SET ^ZSAM(1)=1 ; Still only in this process
 READ "In the middle of the transaction.",X,!
 TCOMMIT  ; Save Data
 QUIT
ERR
 TROLLBACK  ; if there's a transaction in progress
 D ^%ZTER
 W "ERROR"


GTM>D ^KBANTRAN
%GTM-E-TLVLZERO, Transaction is not in progress

GTM>ZED

GTM>zl

GTM>