Routine: ASUJTRAN

Package	Total	Call Graph
Supply	12	^ASU1DUPD ^ASU2RUPD BKORDCAN^ASU3BKOR (,RVIS,TXFIS)^ASU3IUPD ^ASU4XUPD ^ASU5SUPD ^ASU6JUPD ^ASU7DUPD (SETAREA,STA,TRN)^ASULARST DAYTIM^ASUUDATE PAZ^ASUURHDR ^ASUVAR
VA Fileman	3	^DDS ^DIK ^DIR
IHS VA Utilities	1	^XBKVAR

Package	Total	Caller Graph
Supply	33	ASU002DISS - 02 ASU004DISS - 04 ASU005DISS - 05 ASU006DISS - 06 ASU00KDISS - 0K ASU00MDISS - 0M ASU00NDISS - 0N ASU00ODISS - 0O ASU012SDUE - 12 ASU014TDUE - 14 ASU015TDUE - 15 ASU016TDUE - 16 ASU01KSDUE - 1K ASU01MTDUE - 1M ASU01NTDUE - 1N ASU01OTDUE - 1O ASU022SRCT - 22 ASU024TRCT - 24 ASU025TRCT - 25 ASU026TRCT - 26 ASU02KSRCT - 2K ASU02MTRCT - 2M ASU02NTRCT - 2N ASU02OTRCT - 2O ASU032SISS - 32 ASU033SISS - 33 ASU034TISS - 34 ASU036TISS - 36 ASU03JCPBO - 3J ASU03KTRIS - 3K ASU03LTRIS - 3L ASU03MTRIS - 3M ASU03OTRIS - 3O

Name	Comments	DBIA/ICR reference
ENTR	;EP - Call Screenman for transaction entry
UPDT	;EP ;Update masters
NEWTRAN	;
SELECTED	;EP ;
1	;DUEIN
DUP	;EP ;Duplicate data from transaction
3	;ISSUE
2	;RECEIPT
5	;STATION
4	;INDEX
7	;DIRECT ISSUE
6	;ADJUSTMENT
9	;BACKORDER CANCEL
8	;TRANSFER ISSUE
SELECT	;SELECT TRANSATION CODE

Name	Field # of Occurrence
^ASU1DUPD	UPDT+2
^ASU2RUPD	UPDT+3
BKORDCAN^ASU3BKOR	UPDT+5
^ASU3IUPD	UPDT+7, UPDT+8
RVIS^ASU3IUPD	UPDT+11
TXFIS^ASU3IUPD	UPDT+9
^ASU4XUPD	UPDT+12
^ASU5SUPD	UPDT+13
^ASU6JUPD	UPDT+14
^ASU7DUPD	UPDT+15
SETAREA^ASULARST	NEWTRAN+1
STA^ASULARST	ASUJTRAN+10
TRN^ASULARST	ENTR+10
DAYTIM^ASUUDATE	DUP+1
PAZ^ASUURHDR	ENTR+26
^ASUVAR	ASUJTRAN+4
^DDS	ENTR+17
^DIK	ENTR+22
^DIR	ASUJTRAN+8, ASUJTRAN+11, SELECT+1
^XBKVAR	ASUJTRAN+4, NEWTRAN+2

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ASUJTRAN+11
Function Call: WRITE	Prompt: !,"Error - invalid transaction type entered" Line Location: ASUJTRAN+15
Function Call: WRITE	Prompt: ! Line Location: SELECT+1
Function Call: WRITE	Prompt: !,"RECORD NOT SAVED!" Line Location: ENTR+23
Function Call: WRITE	Prompt: !,$FN(ASUC("TRN"),",")," Records Entered during this session." Line Location: ENTR+25
Routine Call	DDS Line Location: ENTR+17
Routine Call	DIR Line Location: ASUJTRAN+8 ASUJTRAN+11 SELECT+1

Name	Line Occurrences
@(	ASUJTRAN+14
DUP	ENTR+15
ENTR	SELECTED+3
NEWTRAN	ENTR+11
SELECT	1+3, 2+4, 3+2, 4+3, 5+2, 6+3, 7+2, 8+3
SELECTED	9+2
UPDT	ENTR+20

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ASU("DA CNT"	ENTR+27!
>> ASU("STARTING	DA" , ENTR+27!
ASUC	ENTR+28!
ASUC("TRN"	ENTR+12, ENTR+13, ENTR+25
ASUDDS	ENTR+16, ENTR+18, ENTR+28!
>> ASUF("TRAN"	SELECTED+2, SELECTED+4!, ENTR+11, NEWTRAN+3
>> ASUHDA	ENTR+15*, ENTR+22
ASUJ	ASUJTRAN+13, ASUJTRAN+14, 8+1, 9+1*, SELECTED+2, ENTR+1, ENTR+3, ENTR+4, ENTR+5, ENTR+6 , ENTR+8, ENTR+28!, UPDT+2, UPDT+3, UPDT+4, UPDT+12, UPDT+13, UPDT+14, UPDT+15, DUP+3 , NEWTRAN+4
ASUJ("FILE"	ENTR+4*, ENTR+15
ASUJ("GLOB"	ENTR+5*, ENTR+22
ASUJ("NEXT"	ENTR+8*, DUP+4
ASUJ("RTN"	ASUJTRAN+13, 2+2, 4+1, 6+1, 9+1, SELECTED+1, SELECTED+2*
ASUJ("TMPL"	ENTR+6*, ENTR+15
ASUJ("WRIT"	ENTR+7*, DUP+6
ASUJT	ENTR+28!, DUP+2, NEWTRAN+52*
ASUJT("TRKY"	DUP+1*
>> ASUK	ASUJTRAN+4
>> ASUK("DT"	NEWTRAN+17, NEWTRAN+18
>> ASUL(	DUP+7!
>> ASUL(1	NEWTRAN+1, NEWTRAN+7, NEWTRAN+28, NEWTRAN+44
>> ASUL(10	ENTR+29!
>> ASUL(11	ENTR+10, ENTR+29!
>> ASUL(17	ENTR+30!
>> ASUL(18	ENTR+30!
>> ASUL(19	ENTR+30!
>> ASUL(2	ASUJTRAN+5, ASUJTRAN+6, ASUJTRAN+7
>> ASUL(20	ENTR+30!
>> ASUL(22	ENTR+30!
>> ASUL(3	ENTR+29!
>> ASUL(4	ENTR+30!
>> ASUL(5	ENTR+30!
>> ASUL(7	ENTR+29!
>> ASUL(8	ENTR+29!
>> ASUL(9	ENTR+29!
ASUMK	ENTR+28!
ASUMS	ENTR+28!
ASUMX	ENTR+28!
>> ASUPOP	ENTR+9, ENTR+13, ENTR+14, ENTR+19
ASUT	ASUJTRAN+13, 4+1, 9+1, SELECT+3, SELECT+4, SELECTED+1, ENTR+1, ENTR+3, ENTR+6, ENTR+10 , ENTR+28!, DUP+1, DUP+2, NEWTRAN+5*, NEWTRAN+6, NEWTRAN+7, NEWTRAN+8, NEWTRAN+9, NEWTRAN+10, NEWTRAN+11 , NEWTRAN+12, NEWTRAN+13, NEWTRAN+14, NEWTRAN+15, NEWTRAN+16, NEWTRAN+17, NEWTRAN+18, NEWTRAN+19, NEWTRAN+20, NEWTRAN+21 , NEWTRAN+22, NEWTRAN+23, NEWTRAN+24, NEWTRAN+25, NEWTRAN+26, NEWTRAN+27, NEWTRAN+28, NEWTRAN+29, NEWTRAN+30, NEWTRAN+31 , NEWTRAN+32, NEWTRAN+33, NEWTRAN+34, NEWTRAN+35, NEWTRAN+36, NEWTRAN+37, NEWTRAN+38, NEWTRAN+39, NEWTRAN+40, NEWTRAN+41 , NEWTRAN+42, NEWTRAN+43, NEWTRAN+44, NEWTRAN+45, NEWTRAN+46, NEWTRAN+47, NEWTRAN+48, NEWTRAN+49, NEWTRAN+50, NEWTRAN+51 , NEWTRAN+52
ASUT(	ENTR+10, DUP+1, DUP+2, NEWTRAN+6, NEWTRAN+7, NEWTRAN+8, NEWTRAN+9, NEWTRAN+10, NEWTRAN+11, NEWTRAN+12* , NEWTRAN+13, NEWTRAN+14, NEWTRAN+15, NEWTRAN+16, NEWTRAN+17, NEWTRAN+18, NEWTRAN+19, NEWTRAN+20, NEWTRAN+21, NEWTRAN+22 , NEWTRAN+23, NEWTRAN+24, NEWTRAN+25, NEWTRAN+26, NEWTRAN+27, NEWTRAN+28, NEWTRAN+29, NEWTRAN+30, NEWTRAN+31, NEWTRAN+32 , NEWTRAN+33, NEWTRAN+34, NEWTRAN+35, NEWTRAN+36, NEWTRAN+37, NEWTRAN+38, NEWTRAN+39, NEWTRAN+40, NEWTRAN+41, NEWTRAN+42 , NEWTRAN+43, NEWTRAN+44, NEWTRAN+45, NEWTRAN+46, NEWTRAN+47, NEWTRAN+48, NEWTRAN+49, NEWTRAN+50, NEWTRAN+51*, NEWTRAN+52
ASUT("TRCD"	9+1, SELECT+2, SELECT+3, SELECT+4, ENTR+1, ENTR+3, ENTR+10, ENTR+16, UPDT+5, UPDT+6 , UPDT+7, UPDT+8, DUP+1, NEWTRAN+5
ASUT("TYPE"	ENTR+3, DUP+3, NEWTRAN+4*
ASUV	ENTR+28!
ASUV("ASUT"	ENTR+3*, DUP+1, NEWTRAN+5
ASUV("TRCD"	ENTR+3*, DUP+1, NEWTRAN+5
>> DA	ENTR+15, ENTR+22*
>> DDSFILE	ENTR+15*
>> DDSPARM	ENTR+15*
>> DDSSAVE	ENTR+12, ENTR+19, ENTR+24, UPDT+1
>> DIK	ENTR+22*
DIR	ASUJTRAN+8!, ASUJTRAN+11!, 1+1~, 2+1~
DIR("A"	ASUJTRAN+8, ASUJTRAN+11, SELECT+1*
DIR(0	ASUJTRAN+8, ASUJTRAN+11, 1+2, 2+3, 3+1, 4+2, 5+1, 6+2, 7+1, 8+2
>> DIROUT	ASUJTRAN+4
>> DR	ENTR+15*
>> DTOUT	ASUJTRAN+4, ASUJTRAN+9, ASUJTRAN+12, SELECT+1
>> DUOUT	ASUJTRAN+4, ASUJTRAN+9, ASUJTRAN+12, SELECT+1
DUZ	NEWTRAN+2, NEWTRAN+24
U	ASUJTRAN+4
>> Y	ASUJTRAN+9, ASUJTRAN+10, ASUJTRAN+13, SELECT+2
>> Y(0	ASUJTRAN+13
Z	ENTR+10~, DUP+7

Customize PDF page

Package: Supply

Routine: ASUJTRAN

Information

Source Information

Call Graph

Call Graph Total: 16

Caller Graph

Caller Graph Total: 33

Entry Points

External References

Interaction Calls

Label References

Local Variables

Legend: