diff --git a/k/BMX_0220_WV.k b/k/BMX_0220_WV.k index 8538c6f..f6b454c 100644 --- a/k/BMX_0220_WV.k +++ b/k/BMX_0220_WV.k @@ -1,5 +1,5 @@ -KIDS Distribution saved on Sep 07, 2010@09:37:36 -BMX .net utilities v 2.2 +KIDS Distribution saved on Sep 07, 2010@11:25:01 +BMX.net Utilties for WV v2.2 **KIDS**:BMX 2.2^ **INSTALL NAME** @@ -75,7 +75,7 @@ y^y^f^^n^^y^a^n "BLD",7651,4,"B",90093.99,90093.99) "BLD",7651,6.3) -8 +9 "BLD",7651,"ABPKG") n "BLD",7651,"INIT") @@ -2605,11 +2605,11 @@ BMX MONITOR EDIT^3040928.1231^@^90093.5^^@^3061103 "KRN",19,10982,-1) 0^5 "KRN",19,10982,0) -BMXRPC^BMX Procedure Calls^^B^^^^^^^^ +BMXRPC^BMX Procedure Calls^^B^^^^^^^^BMXNET RPMS .NET UTILITIES "KRN",19,10982,99.1) 59512,54859 "KRN",19,10982,"RPC",0) -^19.05P^81^81 +^19.05P^82^82 "KRN",19,10982,"RPC",1,0) BMX SQL "KRN",19,10982,"RPC",2,0) @@ -2698,6 +2698,8 @@ BMX TIMER TEST BMX ASYNC GET "KRN",19,10982,"RPC",81,0) BMX ASYNC QUEUE +"KRN",19,10982,"RPC",82,0) +BMX UTF-8 "KRN",19,10982,"U") BMX PROCEDURE CALLS "KRN",19,10983,-1) @@ -3131,7 +3133,7 @@ D XPZ2^XPDIQ "RTN","BMXADE1",1,0) BMXADE1 ; IHS/OIT/HMW - BMXNet ADO.NET PROVIDER ; "RTN","BMXADE1",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADE1",3,0) ; "RTN","BMXADE1",4,0) @@ -3299,7 +3301,7 @@ CALCMIN(BMXIEN,BMXSVC,BMXMIN,BMXFEE) ; "RTN","BMXADE2",1,0) BMXADE2 ; IHS/OIT/HMW - BMXNet ADO.NET PROVIDER ; "RTN","BMXADE2",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADE2",3,0) ; "RTN","BMXADE2",4,0) @@ -3481,7 +3483,7 @@ CODLVL(BMXCODP,BMXCOD,BMXLVL) ; "RTN","BMXADO",1,0) BMXADO ; IHS/CIHA/GIS - RPC CALL: GENERATE AN ADO SCHEMA STRING AND DATA SET ; "RTN","BMXADO",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADO",3,0) ; SS^BMXADO: RPC EP FROM WINDOWS/WEB APP TO GENERATE A SCHEMEA STRING (& OPTIONALLY, A DATA SET AS WELL) "RTN","BMXADO",4,0) @@ -3797,7 +3799,7 @@ ERR(ERR) ;EP - BMX ADO SCHEMA ERROR PROCESSOR "RTN","BMXADO2",1,0) BMXADO2 ; IHS/CIHA/GIS - BMX ADO RECORDSET UTILS ; "RTN","BMXADO2",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADO2",3,0) ; "RTN","BMXADO2",4,0) @@ -3959,7 +3961,7 @@ PTYPE(BMXDD) ; "RTN","BMXADOF",1,0) BMXADOF ; IHS/CIHA/GIS - RPC CALL FOR EXTENDED FUNCTIONALITY OF BMXNet UTILITIES ; "RTN","BMXADOF",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOF",3,0) ; THIS IS THE ADO RECORDSET FILER: ADO -> FILEMAN "RTN","BMXADOF",4,0) @@ -4417,7 +4419,7 @@ MERR ; MUMPS ERROR TRAP "RTN","BMXADOF1",1,0) BMXADOF1 ; IHS/CIHA/GIS - RPC CALL FOR EXTENDED FUNCTIONALITY OF BMXNet UTILITIES ; "RTN","BMXADOF1",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOF1",3,0) ; UPDATE FILEMAN WITH AN ADO RECORD SET FROM A WINDOWS/WEB APPLICATION "RTN","BMXADOF1",4,0) @@ -4569,7 +4571,7 @@ ERR(ERR) ; "RTN","BMXADOF2",1,0) BMXADOF2 ; IHS/CIHA/GIS - RPC CALL FOR EXTENDED FUNCTIONALITY OF BMXNet UTILITIES ; "RTN","BMXADOF2",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOF2",3,0) ; THIS ROUTINE CONTAINS SPECIAL ENTRY POINTS FOR UPDATING RPMS "RTN","BMXADOF2",4,0) @@ -4685,7 +4687,7 @@ XMATCH(NARR) ; IF THERE IS AN EXACT MATCH IN THE PROVIDER NARRATIVE FILE, RETURN "RTN","BMXADOFD",1,0) BMXADOFD ; IHS/CIHA/GIS - RPC CALL FOR EXTENDED FUNCTIONALITY OF BMXNet UTILITIES ; "RTN","BMXADOFD",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOFD",3,0) ; THIS IS THE ADO RECORDSET FILER: ADO -> FILEMAN "RTN","BMXADOFD",4,0) @@ -4855,7 +4857,7 @@ NEXTNOTE(PIEN,FIEN) ; RETRUN THE NEXT NOTE NUMBER FOR A PROBLEM AND FACILITY "RTN","BMXADOFS",1,0) BMXADOFS ; IHS/CIHA/GIS - RPC CALL FOR EXTENDED FUNCTIONALITY OF BMXNet UTILITIES ; "RTN","BMXADOFS",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOFS",3,0) ; THIS IS THE ADO RECORDSET FILER: ADO -> FILEMAN "RTN","BMXADOFS",4,0) @@ -5265,7 +5267,7 @@ PIENN(PIEN) ; GIVEN A PROBLEM IEN, RETURN PROBLEM NARRATIVE (ICD) "RTN","BMXADOI",1,0) BMXADOI ; IHS/CIHA/GIS - RPC CALL: GENERATE DATA FOR AN ADO DATASET ; "RTN","BMXADOI",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOI",3,0) ; CUSTOM IDENTIFIERS "RTN","BMXADOI",4,0) @@ -5431,7 +5433,7 @@ TD1 S %=$$UP^XLFSTR(%) "RTN","BMXADOS",1,0) BMXADOS ; IHS/CIHA/GIS - UPDATE THE BMX ADO SCHEMA FILE ; "RTN","BMXADOS",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOS",3,0) ; ENABLES NAVIGATION TO SUBFILES PRIOR TO UPDATING THE SCHEMA FILE ENTRY "RTN","BMXADOS",4,0) @@ -5961,7 +5963,7 @@ F2 S SS="" "RTN","BMXADOS1",1,0) BMXADOS1 ; IHS/CIHA/GIS - UPDATE THE BMX ADO SCHEMA FILE GUI VERSION ; "RTN","BMXADOS1",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOS1",3,0) ; RPC CALLS "RTN","BMXADOS1",4,0) @@ -6175,7 +6177,7 @@ SFT(FNAME) ; TRIGGER "YES" TO INDICATE THAT A SUBFILE IS PRESENT WITHIN A FILE "RTN","BMXADOV",1,0) BMXADOV ; CIHA/CIHA/GIS - RPC CALL: GENERATE DATA FOR AN ADO DATASET "RTN","BMXADOV",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOV",3,0) ; "RTN","BMXADOV",4,0) @@ -6421,7 +6423,7 @@ IXFLD(FIEN,IX) ;EP - GIVEN AN FILE NUMMER AND INDEX NAME, RETURIN THE FIELD NUMB "RTN","BMXADOV1",1,0) BMXADOV1 ; IHS/CIHA/GIS - RPC CALL: GENERATE DATA FOR AN ADO DATASET ; "RTN","BMXADOV1",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOV1",3,0) ; CONTINUATION FILE FOR BMXADOV "RTN","BMXADOV1",4,0) @@ -6881,7 +6883,7 @@ TESTID(DA) ; TEST IDENTIFIERS "RTN","BMXADOV2",1,0) BMXADOV2 ; IHS/CIHA/GIS - RPC CALL: GENERATE DATA FOR AN ADO DATASET ; "RTN","BMXADOV2",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOV2",3,0) ; CUSTOM ITERATORS FOR RPMS "RTN","BMXADOV2",4,0) @@ -7157,7 +7159,7 @@ APRV(PARAM,IENS,MAX,OUT,TOT) ; EP - RETURN A LIST OF ALL ACTIVE PROVIDERS "RTN","BMXADOVJ",1,0) BMXADOVJ ; IHS/CIHA/GIS - RPC CALL: GENERATE DATA FOR AN ADO DATASET ; "RTN","BMXADOVJ",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOVJ",3,0) ; THIS ROUTINE MANAGES THE JOINS "RTN","BMXADOVJ",4,0) @@ -7315,7 +7317,7 @@ JFLD ; EP-STUFF JOIN FIELD IDS INTO THE INTRO SEGMENT OF THE SCHEMA "RTN","BMXADOX",1,0) BMXADOX ; IHS/CIHA/GIS - RPC CALL: GENERATE AN ADO SCHEMA STRING AND DATA SET ; "RTN","BMXADOX",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOX",3,0) ; EXMAPLES OF RPMS SCHEMAE GENERATION "RTN","BMXADOX",4,0) @@ -8319,7 +8321,7 @@ DXGRID ; POPULATE THE DX GRID "RTN","BMXADOX1",1,0) BMXADOX1 ; IHS/CIHA/GIS - RPC CALL: GENERATE AN ADO SCHEMA STRING AND DATA SET ; "RTN","BMXADOX1",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOX1",3,0) ; EXMAPLES OF FILEMAN SCHEMA GENERATION "RTN","BMXADOX1",4,0) @@ -8971,7 +8973,7 @@ DELVAL ; DELETE A VALUE IN A FIELD "RTN","BMXADOX2",1,0) BMXADOX2 ; IHS/CIHA/GIS - RPC CALL: GENERATE AN ADO SCHEMA STRING AND DATA SET ; "RTN","BMXADOX2",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOX2",3,0) ; EXMAPLES OF FILEMAN SCHEMA GENERATION "RTN","BMXADOX2",4,0) @@ -9219,7 +9221,7 @@ IMAGE ; LIST SEGMENT IMAGE CONTROL PARAMETERS "RTN","BMXADOXX",1,0) BMXADOXX ; IHS/CIHA/GIS - RPC CALL: GENERATE AN ADO SCHEMA STRING AND DATA SET ; "RTN","BMXADOXX",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOXX",3,0) ; EXMAPLES OF RPMS SCHEMAE GENERATION "RTN","BMXADOXX",4,0) @@ -10099,7 +10101,7 @@ ADDREPRO ; UPDATE REPRODUCTIVE FACTORS "RTN","BMXADOXY",1,0) BMXADOXY ; IHS/CIHA/GIS - RPC CALL: GENERATE AN ADO SCHEMA STRING AND DATA SET ; "RTN","BMXADOXY",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXADOXY",3,0) ; EXMAPLES OF FILEMAN SCHEMA GENERATION "RTN","BMXADOXY",4,0) @@ -10693,7 +10695,7 @@ DELVAL ; DELETE A VALUE IN A FIELD "RTN","BMXE01",1,0) BMXE01 ; IHS/OIT/FJE - ENVIRONMENT CHECK FOR BMX 2.0 ; "RTN","BMXE01",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXE01",3,0) ; "RTN","BMXE01",4,0) @@ -10809,7 +10811,7 @@ SORRY ; "RTN","BMXFIND",1,0) BMXFIND ; IHS/OIT/HMW - BMX GENERIC FIND ; "RTN","BMXFIND",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXFIND",3,0) ; "RTN","BMXFIND",4,0) @@ -11331,7 +11333,7 @@ PASSERR(BMXGBL,BMXERR) ;EP "RTN","BMXG",1,0) BMXG ; IHS/OIT/HMW - UTIL: GET DATA ; "RTN","BMXG",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXG",3,0) ;;Stolen from:* MICHAEL REMILLARD, DDS * ALASKA NATIVE MEDICAL CENTER * "RTN","BMXG",4,0) @@ -11441,7 +11443,7 @@ GET(FILE,Y,PC) ;EP "RTN","BMXGETS",1,0) BMXGETS ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXGETS",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXGETS",3,0) ; "RTN","BMXGETS",4,0) @@ -11735,7 +11737,7 @@ PASSERR(BMXGBL,BMXERR) ;EP "RTN","BMXMBRK",1,0) BMXMBRK ; IHS/OIT/HMW - BMXNet MONITOR ; "RTN","BMXMBRK",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXMBRK",3,0) ; "RTN","BMXMBRK",4,0) @@ -12169,7 +12171,7 @@ CLRBUF ;p10 Empties Input buffer "RTN","BMXMBRK2",1,0) BMXMBRK2 ; IHS/OIT/HMW - BMXNet MONITOR ; "RTN","BMXMBRK2",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXMBRK2",3,0) ; "RTN","BMXMBRK2",4,0) @@ -12513,7 +12515,7 @@ TRANSPRT() ;Determine the Transport Method "RTN","BMXMEVN",1,0) BMXMEVN ; IHS/OIT/HMW - BMXNet MONITOR ; "RTN","BMXMEVN",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXMEVN",3,0) ; "RTN","BMXMEVN",4,0) @@ -13019,7 +13021,7 @@ ASYNCERR(BMXI,BMXERID) ;Error processing "RTN","BMXMON",1,0) BMXMON ; IHS/OIT/HMW - BMXNet MONITOR ; 7/20/2009 ; 9/7/10 7:47am "RTN","BMXMON",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXMON",3,0) ; "RTN","BMXMON",4,0) @@ -13741,7 +13743,7 @@ MENU ;EP - ENTRY ACTION FROM BMXMENU OPTION "RTN","BMXMSEC",1,0) BMXMSEC ; IHS/OIT/HMW - BMXNet MONITOR ; 7/20/2009 "RTN","BMXMSEC",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXMSEC",3,0) ; Edit History "RTN","BMXMSEC",4,0) @@ -13897,7 +13899,7 @@ KILL(%) ;Kill state variable "RTN","BMXNTEG",1,0) BMXNTEG ;INTEGRITY CHECKER;FEB 26, 2007 "RTN","BMXNTEG",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXNTEG",3,0) ; "RTN","BMXNTEG",4,0) @@ -14055,7 +14057,7 @@ LIST ; "RTN","BMXPO",1,0) BMXPO ; IHS/CMI/MAW - Populate appcontext with all namespaced RPC's ; "RTN","BMXPO",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXPO",3,0) ; "RTN","BMXPO",4,0) @@ -14199,7 +14201,7 @@ XIT ;-- clean vars "RTN","BMXPRS",1,0) BMXPRS ; IHS/OIT/HMW - BMX WINDOWS UTILS ; "RTN","BMXPRS",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXPRS",3,0) ; "RTN","BMXPRS",4,0) @@ -14409,7 +14411,7 @@ ERROR ;W !,"ERROR=",BMXERR,! Q "RTN","BMXRPC",1,0) BMXRPC ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; 9/7/10 5:04am "RTN","BMXRPC",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXRPC",3,0) ;;Stolen from:* MICHAEL REMILLARD, DDS * ALASKA NATIVE MEDICAL CENTER * "RTN","BMXRPC",4,0) @@ -14767,7 +14769,7 @@ UTF8(BMXRET) "RTN","BMXRPC1",1,0) BMXRPC1 ; IHS/OIT/HMW - UTIL: REMOTE PROCEDURE CALLS ; "RTN","BMXRPC1",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXRPC1",3,0) ;;* MICHAEL REMILLARD, DDS * ALASKA NATIVE MEDICAL CENTER * "RTN","BMXRPC1",4,0) @@ -15245,7 +15247,7 @@ FACE(BMXGBL,BMXDFN) ;EP "RTN","BMXRPC2",1,0) BMXRPC2 ; IHS/OIT/HMW - FIELD LIST ; "RTN","BMXRPC2",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXRPC2",3,0) ; "RTN","BMXRPC2",4,0) @@ -15471,7 +15473,7 @@ MLTLIST(BMXGBL,BMXFL,BMXONEOK) ;EP "RTN","BMXRPC3",1,0) BMXRPC3 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; ; 8/30/10 2:56pm "RTN","BMXRPC3",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXRPC3",3,0) ;Mods by WV/SMH "RTN","BMXRPC3",4,0) @@ -15945,7 +15947,7 @@ SIGCHK(BMXY,BMXSIG) ;EP "RTN","BMXRPC4",1,0) BMXRPC4 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXRPC4",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXRPC4",3,0) ; "RTN","BMXRPC4",4,0) @@ -16243,7 +16245,7 @@ ZZZ ; "RTN","BMXRPC5",1,0) BMXRPC5 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXRPC5",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXRPC5",3,0) ; "RTN","BMXRPC5",4,0) @@ -16493,7 +16495,7 @@ HS(BMXGBL,BMXDFN,BMXTYPE,BMXRDL,BMXFDL) ;EP "RTN","BMXRPC6",1,0) BMXRPC6 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXRPC6",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXRPC6",3,0) ; "RTN","BMXRPC6",4,0) @@ -16719,7 +16721,7 @@ PDERR ;Error trap for PDEMO "RTN","BMXRPC7",1,0) BMXRPC7 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXRPC7",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXRPC7",3,0) ; "RTN","BMXRPC7",4,0) @@ -16989,7 +16991,7 @@ ZZ ;;Halt;Error Messages "RTN","BMXRPC8",1,0) BMXRPC8 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXRPC8",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXRPC8",3,0) ; "RTN","BMXRPC8",4,0) @@ -17169,7 +17171,7 @@ IMHERE(BMXRES) ;EP "RTN","BMXRPC9",1,0) BMXRPC9 ; IHS/OIT/HMW - RPC CALL FOR EXTENDED BROKER FUNCTIONALITY ; "RTN","BMXRPC9",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXRPC9",3,0) ; UPDATE FILEMAN WITH AN ADO RECORD SET FROM A WINDOWS APPLICATION "RTN","BMXRPC9",4,0) @@ -17501,7 +17503,7 @@ EX D ^XBFMK ; CLEANUP "RTN","BMXSQL",1,0) BMXSQL ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXSQL",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXSQL",3,0) ; "RTN","BMXSQL",4,0) @@ -18315,7 +18317,7 @@ ERRTRAP ; "RTN","BMXSQL1",1,0) BMXSQL1 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXSQL1",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXSQL1",3,0) ; "RTN","BMXSQL1",4,0) @@ -18989,7 +18991,7 @@ EXP ;Extended pointer "RTN","BMXSQL2",1,0) BMXSQL2 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXSQL2",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXSQL2",3,0) ; "RTN","BMXSQL2",4,0) @@ -19185,7 +19187,7 @@ SETX(BMXX,BMXFG,BMXSCR) ;EP "RTN","BMXSQL3",1,0) BMXSQL3 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXSQL3",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXSQL3",3,0) ; "RTN","BMXSQL3",4,0) @@ -19847,7 +19849,7 @@ BLDIT2 ;Pointer "RTN","BMXSQL4",1,0) BMXSQL4 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXSQL4",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXSQL4",3,0) ; "RTN","BMXSQL4",4,0) @@ -19915,7 +19917,7 @@ JOIN ;EP - Join processing "RTN","BMXSQL5",1,0) BMXSQL5 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXSQL5",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXSQL5",3,0) ; "RTN","BMXSQL5",4,0) @@ -20279,7 +20281,7 @@ PTYPE(BMXGNOD1) ; "RTN","BMXSQL6",1,0) BMXSQL6 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; 7/20/2009 "RTN","BMXSQL6",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXSQL6",3,0) ; Line EOR+3 used a 2 argument form of $Q which is not "RTN","BMXSQL6",4,0) @@ -20967,7 +20969,7 @@ LAST(VAR) ; Get last entry in an array //SMH new code "RTN","BMXSQL7",1,0) BMXSQL7 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXSQL7",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXSQL7",3,0) ; "RTN","BMXSQL7",4,0) @@ -21433,7 +21435,7 @@ ERROR Q "RTN","BMXSQL91",1,0) BMXSQL91 ; IHS/OIT/HMW - BMX REMOTE PROCEDURE CALLS ; "RTN","BMXSQL91",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXSQL91",3,0) ; "RTN","BMXSQL91",4,0) @@ -21717,7 +21719,7 @@ ZZZ Q "RTN","BMXTABLE",1,0) BMXTABLE ; IHS/OIT/HMW - BMX RETURN ENTIRE TABLE ; "RTN","BMXTABLE",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXTABLE",3,0) ; "RTN","BMXTABLE",4,0) @@ -21733,7 +21735,7 @@ TABLE(BMXGBL,BMXFL,BMXMX) ;EP "RTN","BMXTRS",1,0) BMXTRS ; IHS/OIT/HMW - UPPERCASE-LOWERCASE ; "RTN","BMXTRS",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXTRS",3,0) ; "RTN","BMXTRS",4,0) @@ -21819,7 +21821,7 @@ CHAR ; "RTN","BMXUTL1",1,0) BMXUTL1 ; IHS/OIT/HMW - UTIL: PATIENT DEMOGRAPHICS ; "RTN","BMXUTL1",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXUTL1",3,0) ;;Stolen from:* MICHAEL REMILLARD, DDS * ALASKA NATIVE MEDICAL CENTER * "RTN","BMXUTL1",4,0) @@ -22481,7 +22483,7 @@ PERSON(X,ORDER) ;EP "RTN","BMXUTL2",1,0) BMXUTL2 ; IHS/OIT/HMW - UTIL: PATIENT INFO ; "RTN","BMXUTL2",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXUTL2",3,0) ;;Stolen from:* MICHAEL REMILLARD, DDS * ALASKA NATIVE MEDICAL CENTER * "RTN","BMXUTL2",4,0) @@ -22547,7 +22549,7 @@ NEXTAPPT(BMXDFN) ;EP "RTN","BMXUTL5",1,0) BMXUTL5 ; IHS/OIT/HMW - DATE FORMAT ; "RTN","BMXUTL5",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXUTL5",3,0) ;;Stolen from:* MICHAEL REMILLARD, DDS * ALASKA NATIVE MEDICAL CENTER * "RTN","BMXUTL5",4,0) @@ -22983,7 +22985,7 @@ STRIP(X) ;EP "RTN","BMXUTL6",1,0) BMXUTL6 ; IHS/OIT/HMW - BMXNET INSTALLATION CALLS ; "RTN","BMXUTL6",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXUTL6",3,0) ; "RTN","BMXUTL6",4,0) @@ -23057,7 +23059,7 @@ POST ;EP - Called from BMX Installation postinit "RTN","BMXUTL7",1,0) BMXUTL7 ; IHS/OIT/HMW - BMXNET INSTALLATION CALLS ; 9/7/10 9:34am "RTN","BMXUTL7",2,0) - ;;2.2;BMX;;Sep 07, 2010;Build 8 + ;;2.2;BMX;;Sep 07, 2010;Build 9 "RTN","BMXUTL7",3,0) ; "RTN","BMXUTL7",4,0)