ORTOULT4 ;EPIP/RTW-UNIFIED ACTION PROFILE RPCS. ;Mar 05, 2019@08:07:49
Source file <ORTOULT4.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SETUAPF(ORTOK,ORTUAPF) | ;
|
|
SETRVW(ORTOK,ORTRVW,ORTORIEN) | ;
|
|
GETRVW(ORTRVW,ORTORIEN) | ;
|
|
REF | ; REFORMAT ORDER LIST IN ALPHABETICAL ORDER
; FROM AGET^ORWORR |
|
UAPIV(ORCITEM,ORTIFN) | ;this puts an IV in correct number order by first additive if it has one.
|
|
UAPALPHA(ORTOADD,ORTA,ORTIFN) | ; called by ORQ12 resorts the order text field so that the first additive is on the top to match the sorted by orderable item name.
|
|
UAPRTW | ; part of the UAPALPHA above this part takes the original IV list and places it in the new order
|
|
DCREF | ||
UAPOFF(ORUAPOFF) | ;ON/OFF SWITCH
|
|
DGROUP(ORDGNAME,ORX) | ;RPC ORTO DGROUP to get the DGroup name
|
|
UAPLASTX(ORTIFN,ORTITEM) | ;
|
RPC Name | Call Tags |
---|---|
ORTO GETRVW | GETRVW |
ORTO SETRVW | SETRVW |
ORTO SET UAP FLAG | SETUAPF |
ORTO UAPOFF | UAPOFF |
ORTO DGROUP | DGROUP |
FileNo | Call Tags |
---|---|
^OR(100 - [#100] | Classic Fileman Calls, GET1^DIQ |
100.008 | GET1^DIQ |
^ORD(100.98 - [#100.98] | GET1^DIQ |
^ORD(101.43 - [#101.43] | GET1^DIQ |