Routine: ORY110

Information

ORY110 ;SLC/DAN--Clean up orderable items file ;1/4/02 13:57

Source file <ORY110.m>

Name	Comments	DBIA/ICR reference
MAIL	;Send email when finished
GETIEN(STDT)	;Find first IEN associated with given start date
DQ	;Entry point for background job to clean up ORDER file

FileNo	Call Tags
^OR(100 - [#100]	Classic Fileman Calls
^ORD(101.43 - [#101.43]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^OR(100 - [#100]	DQ+4, DQ+5, DQ+8!, DQ+9*, DQ+14, GETIEN+3, GETIEN+4
^ORD(101.41 - [#101.41]	ORY110+14, ORY110+15*
^ORD(101.43 - [#101.43]	ORY110+3!, ORY110+5, ORY110+6!, ORY110+7!

Name	Line Occurrences
$$GETIEN	DQ+2
MAIL	DQ+3, DQ+17

Name	Field # of Occurrence
^(	ORY110+14, ORY110+15, DQ+6, DQ+15, GETIEN+4
^(1	DQ+15*

Name	Field # of Occurrence
COUNT	ORY110+2~, ORY110+15, ORY110+16, DQ+1~, DQ+15, MAIL+6
DA	ORY110+9!, DQ+7~, DQ+11*
DA(1	ORY110+7, DQ+11
DIK	ORY110+2~, ORY110+7, ORY110+9!, ORY110+11, DQ+7~, DQ+10*
DIK(1	ORY110+7, ORY110+11, DQ+10*
DONE	GETIEN+1~, GETIEN+2, GETIEN+3, GETIEN+4
DUZ	MAIL+3
IEN	ORY110+2~, ORY110+5, ORY110+6, ORY110+7, ORY110+14, ORY110+15, DQ+1~, DQ+2, DQ+3, DQ+4 , DQ+5, DQ+8, DQ+9, DQ+11, DQ+14, GETIEN+1~, GETIEN+2, GETIEN+4, GETIEN+5
IEN6	ORY110+2~, ORY110+15*
ORTXT	MAIL+1~
ORTXT(1	MAIL+4*
ORTXT(2	MAIL+5*
ORTXT(3	MAIL+6*
STDT	GETIEN~, GETIEN+3*, GETIEN+4
SUB	DQ+1~, DQ+5, DQ+6, DQ+8, DQ+9, DQ+11, DQ+14, DQ+15
XMDUZ	MAIL+1~, MAIL+2*
XMSUB	MAIL+1~, MAIL+8*
XMTEXT	MAIL+1~, MAIL+7*
XMY	MAIL+1~
XMY(	MAIL+3*
>> ZTDESC	ORY110+18*
>> ZTDTH	ORY110+18*
>> ZTIO	ORY110+18*
>> ZTRTN	ORY110+18*
>> ZTSAVE("DUZ"	ORY110+18*
>> ZTSK	ORY110+19