Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping
Routine: ORY133

ORY133.m

Go to the documentation of this file.

ORY133 ;SLC/MKB - Postinit for patch OR*3*133 ;1/18/02  12:20

 ;;3.0;ORDER ENTRY/RESULTS REPORTING;**133**;Dec 17, 1997

POST ; -- postinit

 S ^ORD(101.42,99,0)="DONE^ZD",^ORD(101.42,"C","ZD",99)="" ;+abbreviation

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HORY133   225     printed  Apr 09, 2024@21:24:18                                                                                                                                                                                                       Page 2

ORY133    ;SLC/MKB - Postinit for patch OR*3*133 ;1/18/02  12:20

 +1       ;;3.0;ORDER ENTRY/RESULTS REPORTING;**133**;Dec 17, 1997

 +2       ;

POST      ; -- postinit

 +1       ;+abbreviation

           SET ^ORD(101.42,99,0)="DONE^ZD"

           SET ^ORD(101.42,"C","ZD",99)=""

 +2        QUIT