Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ASUAPDUP

Package: Supply

Routine: ASUAPDUP


Information

ASUAPDUP ;DSD/DFM - DIRECT ISSUE DUPLICATION; [ 04/15/98 2:37 PM ]

Source Information

Source file <ASUAPDUP.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Supply 10 ^ASUAPCAN  ^ASUAPNLI  ^ASUAPSST  ^ASUAUACC  AREA^ASUAUAST  ^ASUAUDOJ  ^ASUAUSRC  ^ASUAUSSA  
^ASUAUUSR  ^ASUAUVAL  

Entry Points

Name Comments DBIA/ICR reference
ACCT ;
DUPFLDS ;
EXIT ;RETURN TO CALLING ROUTINE
OPTSRC ;

External References

Name Field # of Occurrence
^ASUAPCAN ACCT+10
^ASUAPNLI ACCT+12
^ASUAPSST ACCT+6
^ASUAUACC ACCT+2
AREA^ASUAUAST DUPFLDS+3
^ASUAUDOJ ACCT+4
^ASUAUSRC OPTSRC+2
^ASUAUSSA ACCT+11
^ASUAUUSR ACCT+9
^ASUAUVAL ACCT+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"1. ENTER TRANSACTION CODE: ",ASUTRNS("TRANSACTION CODE")
  • Line Location: DUPFLDS+2
Function Call: WRITE
  • Prompt: !,"3. ENTER STATION CODE: ",ASUTRNS(ASUTRNS,"STATION")
  • Line Location: DUPFLDS+4
Function Call: WRITE
  • Prompt: !,"4. ENTER PURCHASE ORDER NUMBER: ",ASUTRNS(ASUTRNS,"PURCHASE ORDER #")
  • Line Location: DUPFLDS+5
Function Call: WRITE
  • Prompt: !,"5. ENTER SOURCE CODE: ",ASUTRNS(ASUTRNS,"SOURCE CODE")
  • Line Location: DUPFLDS+8
Function Call: WRITE
  • Prompt: !,"14. ENTER VOUCHER NUMBER: ",ASUTRNS(ASUTRNS,"VOUCHER #")
  • Line Location: ACCT+14

Label References

Name Line Occurrences
ACCT DUPFLDS+8
OPTSRC DUPFLDS+6, DUPFLDS+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ASUSW("OPTIONAL" ACCT+5*, ACCT+7!
>> ASUTRNS DUPFLDS+4, DUPFLDS+5, DUPFLDS+8, OPTSRC+1, ACCT+1, ACCT+3, ACCT+8, ACCT+14
>> ASUTRNS( DUPFLDS+4, DUPFLDS+5, DUPFLDS+8, OPTSRC+1, ACCT+1, ACCT+3, ACCT+8, ACCT+14
>> ASUTRNS("TRAN SACTION CODE" , DUPFLDS+2, DUPFLDS+6, DUPFLDS+7
>> ASUV("ITEM #" , OPTSRC+2*, ACCT+2*, ACCT+4*, ACCT+6*, ACCT+9*, ACCT+10*, ACCT+11*, ACCT+13*, EXIT+1!
>> ASUV("LOWEST" ACCT+13*
>> DIR("B" DUPFLDS+1!, OPTSRC+1*, ACCT+1*, ACCT+3*, ACCT+8*
>> DIROUT OPTSRC+2, ACCT+2, ACCT+4, ACCT+6, ACCT+9, ACCT+10, ACCT+11, ACCT+12
>> DTOUT OPTSRC+2, ACCT+2, ACCT+4, ACCT+6, ACCT+9, ACCT+10, ACCT+11, ACCT+12
>> DUOUT OPTSRC+2, ACCT+2, ACCT+4, ACCT+6, ACCT+9, ACCT+10, ACCT+11, ACCT+12
X EXIT+1!
Y EXIT+1!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All