ITEM |
-
- TextInstruction
- SEQUENCE: 5
- ITEM TYPE: FIXED STRING
- GET ACTION: S VALUE=$$VALUE^ORX8(ORIFN,"INSTR",IEN)
-
- Frequency
- SEQUENCE: 6
- ITEM TYPE: ENTITY
- FILE NUMBER: 100
- ENTITY: VPR CODE ONLY
- GET ACTION: S VALUE=$P($G(VPRSCH),U)
-
- DoseQuantity
- SEQUENCE: 7
- ITEM TYPE: FIXED STRING
- GET ACTION: S VALUE=$P($$VALUE^ORX8(ORIFN,"DOSE",IEN),"&")
-
- DoseUoM
- SEQUENCE: 8
- ITEM TYPE: ENTITY
- FILE NUMBER: 100
- ENTITY: VPR CODE ONLY
- GET ACTION: S VALUE=$P($$VALUE^ORX8(ORIFN,"DOSE",IEN),"&",2)
-
- Duration
- SEQUENCE: 9
- ITEM TYPE: ENTITY
- FILE NUMBER: 100
- ENTITY: VPR TEXT ONLY
- GET ACTION: S VALUE=$$VALUE^ORX8(ORIFN,"DAYS",IEN) S:VALUE<1 DDEOUT=1
-
- Extension
- SEQUENCE: 4
- ITEM TYPE: ENTITY
- FILE NUMBER: 100
- ENTITY: VPR DOSE EXTENSION
- GET ACTION: S VALUE=DIEN,VPRSCH=$$SCHEDULE^VPRSDAP
|