Routine: ACHSYPQ

Information

ACHSYPQ ; IHS/ITSC/PMF - SET DOCUMENTS INTO PRINT QUE ; [ 03/07/2002 10:45 AM ]

Package	Total	Call Graph
VA Fileman	2	DT^DICRW ^DIR
Kernel	1	HOME^%ZIS

Name	Comments	DBIA/ICR reference
DOC	;ENTER STARTING DOCUMENT NUMBER
BEIN	;FIND BEG EIN
EDOC	;ENTER ENDING DOCUMENT NUMBER
EEIN	;FIND END EIN
START	;
EXT	;
FY	;ENTER FY FOR START OF DOCUMENT RESET
GO	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR 0." Line Location: ACHSYPQ+22
Function Call: WRITE	Prompt: !,"DUZ(2) UNDEFINED OR 0." Line Location: ACHSYPQ+23
Function Call: WRITE	Prompt: @IOF Line Location: ACHSYPQ+25
Function Call: WRITE	Prompt: !,"This option will reset PO's to be printed. You will need to enter the FY " Line Location: ACHSYPQ+26
Function Call: WRITE	Prompt: !,"and starting and ending PO number. Use the print document option to print PO's.",! Line Location: ACHSYPQ+27
Function Call: WRITE	Prompt: ! Line Location: EDOC+9
Function Call: WRITE	Prompt: ! Line Location: EEIN+7
Routine Call	%ZIS Line Location: ACHSYPQ+24
Routine Call	DIR Line Location: FY+4 DOC+2 EDOC+2

Name	Line Occurrences (* Changed, ! Killed)
^ACHS(9 - [#9002069]	DOC+1, EDOC+1
^ACHSF - [#9002080]	BEIN+3, EEIN+3, EEIN+5, EEIN+6, GO+1, GO+3, GO+4, GO+9, GO+11
^ACHSF("PQ"	GO+15*

Name	Line Occurrences
EXT	FY+5, DOC+3, EDOC+3
START	FY+6, DOC+4, EDOC+4

Name	Field # of Occurrence
>> ACHSCFY	FY+1, FY+2, FY+3
>> ACHSDOC	BEIN+2, BEIN+3, EEIN+2, EEIN+3
ACHSDOCE	EDOC+5*, EEIN+2, EXT+1!
ACHSDOCS	DOC+5*, EDOC+1, BEIN+2, EXT+1!
ACHSEFY	FY+7*, DOC+1, EDOC+1, BEIN+2, EEIN+2, GO+3, EXT+1!
>> ACHSSFY	FY+1*, FY+2
C	EDOC+10~, EEIN+8*
D	EDOC+10~
DIR	FY+4!, DOC+2!, EDOC+2!
DIR("A"	FY+2, DOC+1, EDOC+1*
DIR("B"	FY+3*
DIR(0	FY+2, DOC+1, EDOC+1*
>> DIRUT	FY+5, DOC+3, EDOC+3
DOCUMENT	BEIN+1, BEIN+3, BEIN+4, GO+1, GO+3, GO+4, GO+9, GO+11, GO+15, EXT+1!
DUZ	ACHSYPQ+22
DUZ(2	ACHSYPQ+23, DOC+1, EDOC+1, BEIN+3, EEIN+3, EEIN+5, EEIN+6, GO+1, GO+3, GO+4 , GO+9, GO+11, GO+15
>> DX	EEIN+8*
>> DY	EEIN+8*
IOF	ACHSYPQ+25
LASTEIN	EEIN+1, EEIN+3, GO+1, EXT+1!
N	EDOC+10~
O	EDOC+10~
O(6	EEIN+5*, GO+13
O(7	EEIN+6*, GO+14
P	EDOC+10~
S	EDOC+10~
T	EDOC+10~
TRANSNUM	GO+9*, GO+11, GO+15, EXT+1!
>> TRANTYPE	GO+11*, GO+12, GO+13, GO+14
TYPESERV	GO+4*, GO+5, GO+15, EXT+1!
U	ACHSYPQ+21*, DOC+1, EDOC+1, EEIN+5, EEIN+6, GO+3, GO+4, GO+11
>> Y	FY+6, FY+7, DOC+4, DOC+5, EDOC+4, EDOC+5