Index: FLOWCHK.mac.rou
===================================================================
diff -u -r31306 -r43055
--- FLOWCHK.mac.rou	(.../FLOWCHK.mac.rou)	(revision 31306)
+++ FLOWCHK.mac.rou	(.../FLOWCHK.mac.rou)	(revision 43055)
@@ -269,7 +269,7 @@
  Quit IsOrgal
  ;
 ORGALFAK(FANr,BONNr,BLNr) 
- New R,KLNr,PRnr,IsOrgal
+ New R,KLNr,PRNr,IsOrgal
  Set BONNr=$G(BONNr),BLNr=$G(BLNr)
  Set IsOrgal=0
  If BLNr Do
@@ -293,7 +293,7 @@
  Quit IsOrgal
  ;
 ORGALFAP(FANr,BONNr,BLNr) 
- New R,KLNr,PRnr,IsOrgal
+ New R,KLNr,PRNr,IsOrgal
  Set BONNr=$G(BONNr),BLNr=$G(BLNr)
  Set IsOrgal=0
  If BLNr Do