ORMPS2 ;SLC/MKB - Process Pharmacy ORM msgs cont ;04/01/2008
Source file <ORMPS2.m>
| Package | Total | Call Graph | 
|---|---|---|
| Order Entry Results Reporting | 10 | ($$ACTION,RESPONSE)^ORCSAVE  ORDTEXT^ORCSAVE1  (DATES,RELEASE,SIGN,SIGSTS,STATUS)^ORCSAVE2  SETALL^ORDD100  $$UNESC^ORHLESC  $$FIND^ORM  $$HL7IVLMT^ORMBLDP1  ($$RXC,$$RXO,$$RXR)^ORMPS ($$NTE,$$NTXT,$$NUMADDS,$$VALTXT,$$ZSC)^ORMPS3 PRINTS^ORWD1 | 
| VA Fileman | 1 | ^DIE | 
| Package | Total | Caller Graph | 
|---|---|---|
| Order Entry Results Reporting | 4 | ORMPS ORMPS1 ORMPS3 ORY94A | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| UNESC(STRING) | ; | |
| RO | ; -- Replacement order (finished) | |
| CHANGED() | ; -- Compare ORMSG to order ORIFN, return 1 if different | |
| VALUE(ID) | ; -- Return value of ID in ^OR(100,+ORIFN,4.5,"ID") | |
| CHQ | ||
| FINISHED() | ; -- new order [SN^ORMPS] due to finishing? | |
| IVX() | ; -- Compare ORMSG to Inpt order ORIFN if IV, return 0 if 'diff or 'IV | |
| IVLIM(IVDUR) | ; | |
| IV1 | ||
| WQ | ||
| PCOMM | ; -- Get Provider Comments from previous order, when changed | |
| UNESCARR(ARR) | ; | |
| RO1 | ; -Update sts of order to active, last action to dc/edit: | |
| RO2 | ; -Update responses, get/save new order text: | |
| WPX() | ; -- Compare comments in @ORMSG@(NTE) with order ORIFN ; Returns 1 if different, or 0 if same | |
| PTR(X) | ; -- Return ptr to prompt OR GTX X | 
| Name | Field # of Occurrence | 
|---|---|
| ^DIE | RO2+7 | 
| $$ACTION^ORCSAVE | RO+12 | 
| RESPONSE^ORCSAVE | RO2+1 | 
| ORDTEXT^ORCSAVE1 | RO2+1 | 
| DATES^ORCSAVE2 | RO1+5 | 
| RELEASE^ORCSAVE2 | RO1+6 | 
| SIGN^ORCSAVE2 | RO1+9 | 
| SIGSTS^ORCSAVE2 | RO1+9 | 
| STATUS^ORCSAVE2 | RO1+4 | 
| SETALL^ORDD100 | RO1+4 | 
| $$UNESC^ORHLESC | UNESC+1 | 
| $$FIND^ORM | IV1 | 
| $$HL7IVLMT^ORMBLDP1 | CHANGED+6 | 
| $$RXC^ORMPS | IVX+2, RO+6 | 
| $$RXO^ORMPS | CHANGED+7, RO+6 | 
| $$RXR^ORMPS | IV1+5 | 
| $$NTE^ORMPS3 | WPX+3, CHANGED+15, CHANGED+17 | 
| $$NTXT^ORMPS3 | WPX+3, CHANGED+21 | 
| $$NUMADDS^ORMPS3 | IVX+6 | 
| $$VALTXT^ORMPS3 | WPX+4, CHANGED+20 | 
| $$ZSC^ORMPS3 | RO2+11 | 
| PRINTS^ORWD1 | RO2+10 | 
| FileNo | Call Tags | 
|---|---|
| ^OR(100 - [#100] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^OR(100 - [#100] | FINISHED+2, IVX+3, IV1+12, IV1+13, IV1+14, IV1+15, IV1+16, CHANGED+15, CHANGED+16, CHANGED+17 , VALUE+2, VALUE+3, RO1+1, RO1+2*, RO1+3*, RO1+8, RO2+1!, RO2+2*, RO2+5, RO2+8* , RO2+11*, PCOMM+3, PCOMM+4, PCOMM+5 | 
| ^ORD(100.98 - [#100.98] | IVX+3, RO2+5 | 
| ^ORD(101.41 - [#101.41] | PTR+1 | 
| ^ORD(101.43 - [#101.43] | IVX+7, IV1+17 | 
| ^TMP("ORWORD" | RO+3!, PCOMM+5* | 
| ^VA(200 - [#200] | RO+4 | 
| Name | Line Occurrences | 
|---|---|
| $$IVX | CHANGED+9 | 
| $$PTR | IV1+7, RO+11 | 
| $$UNESC | UNESCARR+5 | 
| $$VALUE | IVX+7, IVX+10, IV1+1, IV1+4, IV1+6, CHANGED+4, CHANGED+11, CHANGED+12, RO+11 | 
| $$WPX | CHANGED+3 | 
| @( | RO+8 | 
| CHQ | CHANGED+2, CHANGED+11, CHANGED+12, CHANGED+16, CHANGED+19 | 
| UNESCARR | UNESCARR+4 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | RO1+1 | 
| ^(0 | RO1+1, RO2+2* | 
| ^(1 | IV1+16 | 
| ^(3 | RO1+3 | 
| ^(6 | RO1+3! | 
| ^(8 | RO2+8* | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ADMIN | RO+2~ | 
| ARR | UNESCARR~, UNESCARR+1, UNESCARR+2, UNESCARR+3, UNESCARR+5 | 
| DA | RO2+6~, RO2+7* | 
| DG | IVX+1~, IVX+3*, IVX+4 | 
| DIE | RO2+6~, RO2+7* | 
| DR | RO2+6~, RO2+7* | 
| DURU | IVLIM+2~*, IVLIM+3*, IVLIM+5, IVLIM+6, IVLIM+7, IVLIM+8 | 
| DURV | IVLIM+2~*, IVLIM+3*, IVLIM+4*, IVLIM+5, IVLIM+6, IVLIM+7, IVLIM+8 | 
| I | IVX+1~, IV1+7*, IV1+8*, IV1+11*, IV1+12, IV1+14, IV1+15*, IV1+16, CHANGED+1~, VALUE+1~ , VALUE+2*, VALUE+3, UNESCARR+1~*, UNESCARR+2, UNESCARR+3, UNESCARR+5, PCOMM+1~, PCOMM+3*, PCOMM+4, PCOMM+5 | 
| ID | VALUE~, VALUE+1, VALUE+2 | 
| IND | UNESCARR+2~*, UNESCARR+4 | 
| INST | IVX+1~, IV1+13*, IV1+14, IV1+19*, IV1+20, IV1+21, IV1+24*, IV1+25 | 
| IVDUR | IVLIM~, IVLIM+1, IVLIM+3, IVLIM+4*, IVLIM+5*, IVLIM+6*, IVLIM+7*, IVLIM+8*, IVLIM+9 | 
| IVTYPE | RO+2~ | 
| J | IVX+1~, IV1+12*, IV1+13, IV1+14 | 
| NEWSTS | RO+1~, RO1+3*, RO1+4 | 
| NTE | WPX+2~, WPX+3*, CHANGED+1~, CHANGED+15*, CHANGED+16, CHANGED+17*, CHANGED+18, CHANGED+19, CHANGED+21*, CHANGED+22 | 
| OI | IVX+1~, IVX+7*, IV1+16*, IV1+17 | 
| OI0 | IVX+1~, IV1+16*, IV1+18, IV1+19, IV1+23, IV1+24 | 
| OLD | PCOMM+1~, PCOMM+2*, PCOMM+3, PCOMM+4, PCOMM+5 | 
| ORA | IVX+1~, IV1+7*, IV1+18 | 
| ORB | IVX+1~, IV1+7*, IV1+23 | 
| >> ORCAT | CHANGED+2, RO+8, RO2+11 | 
| ORDA | RO+1~, RO+12*, RO+13, RO1+1, RO1+3, RO1+6, RO1+9, RO2+1, RO2+8, RO2+9 | 
| >> ORDCNTRL | RO2+9* | 
| ORDG | RO+1~, RO2+5, RO2+7 | 
| ORDIALOG | RO+1~, RO2+2 | 
| ORDIALOG( | RO+11*, PCOMM+6*, PCOMM+7* | 
| >> ORERR | RO+4*, RO+5*, RO+7*, RO+8, RO+13* | 
| >> ORIFN | FINISHED+3*, WPX+4, IVX+3, IV1+12, IV1+13, IV1+14, IV1+15, IV1+16, CHANGED+15, CHANGED+16 , CHANGED+17, CHANGED+20, VALUE+2, VALUE+3, RO+6*, RO+7, RO+12, RO1+1, RO1+2, RO1+3 , RO1+4, RO1+5, RO1+6, RO1+8, RO1+9, RO2+1, RO2+2, RO2+5, RO2+7, RO2+8 , RO2+9*, RO2+10, RO2+11, PCOMM+2 | 
| ORIG | FINISHED+1~, FINISHED+2*, FINISHED+3 | 
| ORIG4 | FINISHED+1~, FINISHED+2*, FINISHED+3 | 
| >> ORL | RO2+10 | 
| >> ORMSG | IVX+8, IV1+8, CHANGED+16 | 
| >> ORNATR | RO1+6 | 
| >> ORNOW | RO+12, RO1+6 | 
| >> ORNP | RO+4, RO+12 | 
| ORP | RO+1~, RO2+10 | 
| ORP(1 | RO2+10* | 
| ORPKG | RO+1~, RO2+2 | 
| ORSIG | RO+1~, RO1+8*, RO1+9 | 
| >> ORSTOP | RO1+5 | 
| >> ORSTRT | RO1+5 | 
| >> ORSTS | RO1+3, RO1+4 | 
| >> ORWHO | RO+12, RO1+6 | 
| ORX | IVX+1~, RO+1~, RO1+1*, RO1+2, RO1+8, RO1+9 | 
| ORX( | IV1+9*, IV1+14* | 
| ORX("A" | IV1+18, IV1+19, IV1+22!, IV1+28 | 
| ORX("B" | IV1+23, IV1+24, IV1+26!, IV1+28 | 
| ORX("STRENGTH" | IV1+20 | 
| ORX("UNITS" | IV1+21 | 
| ORX("VOLUME" | IV1+25 | 
| >> PC | PCOMM+5, PCOMM+6, PCOMM+7 | 
| PI | CHANGED+1~, CHANGED+17*, CHANGED+18, CHANGED+19, CHANGED+20*, CHANGED+22 | 
| >> PKGIFN | RO2+8 | 
| PSOI | IVX+1~, IVX+7*, IVX+8, IV1+17*, IV1+18, IV1+19, IV1+22, IV1+23, IV1+24, IV1+26 | 
| RATE | IVX+1~, IV1*, IV1+1*, IV1+2*, IV1+3 | 
| RXC | IVX+1~, IVX+2*, IVX+8, IV1+7, RO+1~, RO+6*, RO+8, RO+11 | 
| >> RXE | IV1, CHANGED+11, CHANGED+12, RO+5 | 
| RXO | RO+1~, RO+6* | 
| RXR | IVX+1~, IV1+5*, IV1+6 | 
| SIG | CHANGED+1~, CHANGED+15*, CHANGED+16 | 
| SPINST | WPX+2~, WPX+3*, WPX+5 | 
| STR | IVX+1~, IV1+19*, IV1+20 | 
| STRING | UNESC~, UNESC+1 | 
| TRXO | CHANGED+1~, CHANGED+7* | 
| TYPE | FINISHED+1~, FINISHED+2*, FINISHED+3, UNESCARR+3~*, UNESCARR+4, UNESCARR+5 | 
| U | IVX+3, IVX+7, IVX+8, IVX+9, IV1, IV1+6, IV1+9, IV1+13, IV1+17, IV1+18 , IV1+19, IV1+23, IV1+24, CHANGED+7, RO1+1, RO1+2, RO1+3, RO1+8, RO2+2, RO2+5 , RO2+8 | 
| UNT | IVX+1~, IV1*, IV1+1, IV1+19*, IV1+21 | 
| VOL | IVX+1~, IV1+24*, IV1+25 | 
| X | WPX+2~, WPX+4*, WPX+5, IVX+1~, IV1+1*, IV1+2*, IV1+3, CHANGED+1~, CHANGED+4*, CHANGED+5 , CHANGED+6*, PTR~, PTR+1 | 
| X1 | IVX+9~*, IVX+10, CHANGED+1~, CHANGED+5, CHANGED+7* | 
| X2 | IVX+9~*, IVX+10 | 
| X3 | IVX+9~, IVX+10* | 
| XC | IVX+1~, IVX+8*, IVX+9, IV1+8*, IV1+9 | 
| Y | FINISHED+1~*, FINISHED+3*, FINISHED+4, WPX+2~*, WPX+5*, WQ, IVX+1~, IVX+2*, IVX+4, IVX+5* , IVX+6*, IVX+8*, IVX+10*, IV1+1, IV1+3*, IV1+4*, IV1+6*, IV1+15, IV1+20*, IV1+21* , IV1+25*, IV1+27*, IV1+28*, IV1+29, CHANGED+1~*, CHANGED+3*, CHANGED+5*, CHANGED+9*, CHANGED+11*, CHANGED+12* , CHANGED+16*, CHANGED+22*, CHQ, VALUE+1~, VALUE+3*, VALUE+4 | 
| >> ZRX | FINISHED+2, IVX+5, IV1+4, PCOMM+2 | 
| ZSC | RO+1~, RO2+11* |