Routine: ACRFSHIP

Information

ACRFSHIP ;IHS/OIRM/DSD/THL,AEF - SHIPPING INSTRUCTIONS; [ 09/23/2005 9:44 AM ]

Source Information

Source file <ACRFSHIP.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Commitment Register	5	(DDS,DIC,DIE,DIK,DIR,FILE)^ACRFDIC (IARRAY,IDISP,ITEMS)^ACRFSHI1 $$NAME2^ACRFUTL1 PAUSE^ACRFWARN ^ACRPDA

Caller Graph

Caller Graph Total: 5

Package	Total	Caller Graph
Commitment Register	5	ACRFEA41 ACRFEA42 ACRFPO1 ACRFQ ACRFSHI1

Entry Points

Name	Comments	DBIA/ICR reference
DISP	;EP;TO DISPLAY SHIPPING LOCATION
HEAD	;EP;PRINT HEADER FOR LIST OF ALL SHIPPING LOCATION HEADER
EN	;EP;TO REVIEW AND EDIT SHIPPING INSTRUCTIONS
EI
DEPT	;SELECT DEPARTMENT TO SHIP TO
EDIT	;EDIT EXISTING SHIPPING INSTRUTIONS
ITEM	;CREATE LIST OF ITEMS TO BE SHIPPED TO SELECTED DEPARTMENT
EDIT1
EN1
ADD	;
EXIT
CHOOSE	;EP;TO CHOOSE SHIPPING INSTRUCTION FUNCTION
FILE
RECEIVER	;SELECT NAME OF RECEIVING OFFICIAL
PRINT	;EP;TO PRINT CALL FOR PRINT OF SHIPPING INSTRUCTIONS
D1
DISPLAY	;EP;TO DISPLAY CURRENT SHIPPING INSTRUCTIONS
SELECT	;SELECT SHIPPING INSTRUCTION TO EDIT
DELETE	;DELETE EXISTING SHIPPING INSTRUTIONS

External References

Name	Field # of Occurrence
DDS^ACRFDIC	EI+3
DIC^ACRFDIC	DEPT+5, RECEIVER+6
DIE^ACRFDIC	EI+4
DIK^ACRFDIC	D1+8
DIR^ACRFDIC	DISPLAY+12, CHOOSE+3, EDIT+5, DELETE+5, D1+6, ITEM+7, PRINT+7
FILE^ACRFDIC	FILE+4
IARRAY^ACRFSHI1	ITEM+2
IDISP^ACRFSHI1	DISPLAY+24
ITEMS^ACRFSHI1	EI+5
$$NAME2^ACRFUTL1	DISP+8
PAUSE^ACRFWARN	ADD+6
^ACRPDA	DISP+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: CHOOSE+2
Function Call: WRITE	Prompt: ! Line Location: EDIT+4
Function Call: WRITE	Prompt: ! Line Location: EI+0
Function Call: WRITE	Prompt: ! Line Location: DELETE+4
Function Call: WRITE	Prompt: ! Line Location: D1+5
Function Call: WRITE	Prompt: !!?5,$G(ACRDMAX) Line Location: DISP+4
Function Call: WRITE	Prompt: ! Line Location: DEPT+4
Function Call: WRITE	Prompt: ! Line Location: ITEM+6
Function Call: WRITE	Prompt: ! Line Location: RECEIVER+5
Function Call: WRITE	Prompt: !?5,"***************************************************************" Line Location: HEAD+2
Function Call: WRITE	Prompt: !?5,"SHIPPING INSTRUCTIONS FOR ORDER NO:" Line Location: HEAD+3
Function Call: WRITE	Prompt: !?5,$P(^ACRDOC(ACRDOCDA,0),U,2) Line Location: HEAD+4
Function Call: WRITE	Prompt: ?$X+2,"(",$P(^ACRDOC(ACRDOCDA,0),U),")" Line Location: HEAD+5
Function Call: WRITE	Prompt: !?5,"***************************************************************" Line Location: HEAD+6
Function Call: WRITE	Prompt: ! Line Location: PRINT+6

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls
^ACRSI - [#9003010]	Classic Fileman Calls
^AUTTPRG - [#9999999.62]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACRDOC - [#9002196]	DISPLAY+2, HEAD+4, HEAD+5
^ACRSI - [#9003010]	DISPLAY+17, DISPLAY+18, ADD+12*
^ACRSI("AB"	DISPLAY+3
^ACRSI("AC"	ADD+3
^ACRSI("B"	DISPLAY+16, CHOOSE+1, PRINT+1
^ACRSS("J"	ITEM+1

Label References

Name	Line Occurrences
ADD	CHOOSE+5
CHOOSE	EN1
D1	DELETE+1
DELETE	CHOOSE+7
DEPT	ADD+1
DISP	DISPLAY+7, DISPLAY+23, DEPT+9
DISPLAY	EN1
EDIT	CHOOSE+6
EDIT1	EDIT+1
EI	EDIT1+1
EN1	EN+1
FILE	DISPLAY+14, ADD+7
HEAD	DISPLAY+1
ITEM	ADD+8
RECEIVER	ADD+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACRDMAX	EXIT!, DISPLAY+4, DISPLAY+15, DISPLAY+21*, DISPLAY+22, EDIT+1, EDIT+2, DELETE+1, DELETE+2, DISP+4
>> ACRDOCDA	DISPLAY+2, DISPLAY+3, DISPLAY+16, CHOOSE+1, ADD+3, FILE, ITEM+1, HEAD+4, HEAD+5, PRINT+1
ACRDPTDA	EXIT!, DISPLAY+4, ADD+3, FILE+3, DEPT+8
ACRIMAX	EXIT!
ACRITEMS	EXIT!, ITEM+3, ITEM+9
>> ACRJ	ITEM+3, ITEM+4
>> ACROUT	EN+1, DISPLAY+3, CHOOSE+4, ADD+2, ADD+9, ADD+11, DEPT+7
ACRQUAN	EXIT!
ACRQUIT	EN+1, EXIT!, DISPLAY+3, CHOOSE+4, ADD+2, ADD+9, EDIT+6, DELETE+6, DEPT+6, ITEM+1 , ITEM+8, RECEIVER+7
ACRRA	EXIT!, DISPLAY+18, FILE+3, DISP+6, DISP+8, RECEIVER+8
ACRSCREN	EI+4!
ACRSHIP	PRINT+2!, PRINT+8*
ACRSI	EXIT!
ACRSI(	DISPLAY+22*, EDIT+6, EDIT1, DELETE+6, D1
ACRSIDA	EXIT!, DISPLAY+15, DISPLAY+16, DISPLAY+17, DISPLAY+18, DISPLAY+22, DISPLAY+24, ADD+12, FILE+5, EDIT1 , DEPT+8*
ACRSS	EXIT!, ADD+13, ADD+14
ACRSS(	ADD+14
ACRSSDA	EXIT!
ACRSSI	EXIT!
ACRST	EXIT!, DISPLAY+2, DISPLAY+3, DISPLAY+4, DISPLAY+17, DISPLAY+19, DISPLAY+20
ACRY	EXIT!
>> D0	DISPLAY+4, DISPLAY+20, DEPT+8*
>> DA	EDIT1, D1
>> DIC	FILE+1, DEPT+1, RECEIVER+1*
>> DIC("A"	DEPT+3, RECEIVER+3
>> DIC("DR"	FILE+3*
>> DIC("S"	RECEIVER+4*
>> DIC(0	FILE+2, DEPT+2, RECEIVER+2*
>> DIE	EI+1*
>> DIK	D1+1*
DIP	DISP+3~
>> DIR("A"	DISPLAY+9, EDIT+3, DELETE+3, D1+3, ITEM+5, PRINT+4
>> DIR("B"	DISPLAY+10, D1+4, PRINT+5*
>> DIR(0	DISPLAY+8, CHOOSE+1, EDIT+2, DELETE+2, D1+2, ITEM+4, PRINT+3*
>> DR	EI+2*
DXS	DISP+3~
IOF	HEAD+1
IOST	DISPLAY+3, HEAD+1
U	DISPLAY+17, DISPLAY+18, HEAD+4, HEAD+5
>> X	FILE, DISP+8, DISP+9*, DISP+10
>> Y	DISPLAY+13, CHOOSE+4, CHOOSE+5, CHOOSE+6, CHOOSE+7, FILE+5, EDIT+1, EDIT+6, EDIT1, DELETE+1 , DELETE+6, D1, D1+3, D1+7, DEPT+6, DEPT+8, ITEM+8, ITEM+9, RECEIVER+7, RECEIVER+8 , PRINT+8

Customize PDF page

Package: Commitment Register

Routine: ACRFSHIP

Call Graph Total: 5

Caller Graph Total: 5