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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ASUJOLIB

Package: Supply

Routine: ASUJOLIB


Information

ASUJOLIB ; IHS/ITSC/LMH -SCREENMAN FOR ONLINE ISSUE ENTRY ;

Source Information

Source file <ASUJOLIB.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Supply 7 HLP^ASUJHELP  (ARE,STA)^ASULARST  (REQ,SSA)^ASULDIRR  READ^ASUMKBIO  ^ASUMSTRD  READ^ASUMXDIO  (DATE,DAYTIM)^ASUUDATE  
VA Fileman 5 ^DDS  ($$GET,PUT)^DDSVALF  IX^DIC  (,IX)^DIK  ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Supply 2 ^ASUT(8  ASUCOMOR  

Entry Points

Name Comments DBIA/ICR reference
UCST ;EP ;CALCULATE UNIT COST FOR FORM
VAL ;EP ;CALCULATE ORDER VALUE FOR FORM
LOOPALL ;
FILE ;EP ;PLACE ORDER INTO ASUTRN ISSUE FILE
RVAL ;EP ;CALCULATE RECOMMED VALUE FOR FORM
REQS ;
VOU ;EP ;CALCULATE VOUCHER NUMBER FOR FORM
EXIT ;
ANOTHER ;
CRMSTR ;EP ; -CREATE ISSUE BOOK TRANS
CALCVOU ;
TRANS ;EP ;SCREENMAN FOR ONLINE ISSUE TRANSACTION ENTRY

External References

Name Field # of Occurrence
HLP^ASUJHELP UCST+8
ARE^ASULARST ASUJOLIB+5
STA^ASULARST REQS+2
REQ^ASULDIRR REQS+8
SSA^ASULDIRR REQS+23
READ^ASUMKBIO REQS+13
^ASUMSTRD REQS+13, REQS+18
READ^ASUMXDIO REQS+14
DATE^ASUUDATE ASUJOLIB+4, CRMSTR+1
DAYTIM^ASUUDATE FILE+1
^DDS ANOTHER+4, LOOPALL+5
$$GET^DDSVALF VAL+2
PUT^DDSVALF VAL+4
IX^DIC ANOTHER+2
^DIK REQS+6, REQS+61
IX^DIK FILE+8, REQS+66
^DIR ASUJOLIB+8, ASUJOLIB+13, ANOTHER+6, LOOPALL+7, CRMSTR+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No entries in Issue Book for this Requsitioner"
  • Line Location: LOOPALL+1
Function Call: WRITE
  • Prompt: "Sorry, no Voucher Numbers available for Online Issues"
  • Line Location: CALCVOU+2
Function Call: WRITE
  • Prompt: *7
  • Line Location: UCST+8
Function Call: WRITE
  • Prompt: !!,"CREATE ONLINE ISSUE BOOK TRANS MASTER PROGRAM",!!
  • Line Location: CRMSTR+2
Function Call: WRITE
  • Prompt: !?15,"NO ENTRY IN INDEX MASTER"
  • Line Location: REQS+15
Function Call: WRITE
  • Prompt: !?20,"NO INDEX ON STATION MASTER"
  • Line Location: REQS+19
Function Call: WRITE
  • Prompt: !?30,"NO PRIMAR CAN AVAILABLE"
  • Line Location: REQS+21
Function Call: WRITE
  • Prompt: !!,"NOT CURRENTLY AVAILABLE"
  • Line Location: TRANS+1
Routine Call
  • DDS
  • Line Location:
    • ANOTHER+4
    • LOOPALL+5
Routine Call
  • DIR
  • Line Location:
    • ASUJOLIB+8
    • ASUJOLIB+13
    • ANOTHER+6
    • LOOPALL+7
    • CRMSTR+8
Routine Call
  • DIC
  • Line Location:
    • ANOTHER+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ASUT(3 - [#9002036.3] Classic Fileman Calls
^ASUT(8 - [#9002036.8] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ASUL(20 - [#9002039.2] REQS+20
^ASUMK - [#9002033] CRMSTR+5, REQS+4, REQS+11
^ASUMS - [#9002031] UCST+1, UCST+2, UCST+9
^ASUSITE(1 ASUJOLIB+5, CALCVOU+1, CALCVOU+3*
^ASUT(3 - [#9002036.3] FILE+2, FILE+3*, FILE+4*, FILE+5*, REQS+60
^ASUT(8 - [#9002036.8] ANOTHER+3, LOOPALL+1, LOOPALL+2, RVAL+2, VOU+3*, FILE+3, FILE+6*, FILE+7*, REQS+6, REQS+62*
, REQS+63*, REQS+64*, REQS+65*

Label References

Name Line Occurrences
ANOTHER ANOTHER+7
CALCVOU ASUJOLIB+11, VOU+1
EXIT ANOTHER+6, LOOPALL+2
LOOPALL ASUJOLIB+15
REQS CRMSTR+5, CRMSTR+12
UCST VAL+1, RVAL+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ASUC CRMSTR+13!
>> ASUF("STA" CRMSTR+3
>> ASUHDA FILE+2*, FILE+3, FILE+4, FILE+5, FILE+6, FILE+7, FILE+8, REQS+5*, REQS+6, REQS+24*
, REQS+25, REQS+27, REQS+60, REQS+61, REQS+62, REQS+63, REQS+64, REQS+65, REQS+66
ASUJ ASUJOLIB+10*, LOOPALL+1, LOOPALL+2, EXIT+1!
ASUJ("ANS" LOOPALL+2, LOOPALL+8*, LOOPALL+9*
ASUJ("E#" ASUJOLIB+6*, ANOTHER+3*, LOOPALL+3*, UCST+1, UCST+2, UCST+9, RVAL+2, VOU+3, FILE+3
ASUJ("OH" UCST+1*, UCST+2*, UCST+3, UCST+4
ASUJ("QTY" VAL+2*, VAL+3
ASUJ("RQTY" RVAL+2*, RVAL+3
ASUJ("RVAL" RVAL+3*
ASUJ("UCST" UCST+4*, UCST+9*, VAL+1, VAL+3, RVAL+1, RVAL+3
ASUJ("VAL" VAL+3*, VAL+4
ASUJ("VOU" CALCVOU+1*, CALCVOU+2, CALCVOU+3, CALCVOU+4*, VOU+1, VOU+2, VOU+3
>> ASUJMSG UCST+8
>> ASUJMSG(1 UCST+6*
>> ASUJMSG(2 UCST+7*
>> ASUJMSG(3 UCST+8*
>> ASUK("DT" ASUJOLIB+4, CRMSTR+1
>> ASUL( REQS+7!
>> ASUL(1 ASUJOLIB+5, ASUJOLIB+6, LOOPALL+3, REQS+28, REQS+40
>> ASUL(17 REQS+23*, REQS+34, REQS+48
>> ASUL(18 REQS+35, REQS+49
>> ASUL(19 REQS+36, REQS+50
>> ASUL(2 REQS+1*, REQS+2, REQS+29, REQS+41
>> ASUL(20 REQS+9, REQS+20, REQS+22*, REQS+24, REQS+37, REQS+51
ASUMK CRMSTR+13!
ASUMK("E#" CRMSTR+4*, CRMSTR+5*, CRMSTR+11*, REQS+1, REQS+3*, REQS+4*, REQS+5, REQS+8, REQS+10*, REQS+11*
, REQS+12, REQS+14, REQS+67!
ASUMK("ULQTY" REQS+59
ASUMS CRMSTR+13!
ASUMS("E#" REQS+1*, REQS+12*, REQS+17*
ASUMS("EOQ" REQS+38, REQS+52
ASUMX CRMSTR+13!
ASUMX("ACC" REQS+30, REQS+42
ASUMX("E#" REQS+14*, REQS+17, REQS+31
ASUMX("IDX" REQS+16, REQS+24, REQS+43
>> ASUP("LSMO" CALCVOU+3*, CALCVOU+4
ASUT FILE+1*, FILE+4, CRMSTR+13!, REQS+26*
ASUT( FILE+4
ASUT(0 REQS+26*, REQS+27*, REQS+28*, REQS+29*, REQS+30*, REQS+31*, REQS+32*, REQS+33*, REQS+34*, REQS+35*
, REQS+36*, REQS+37*, REQS+38*, REQS+62
ASUT(1 REQS+26*, REQS+39*, REQS+40*, REQS+41*, REQS+42*, REQS+43*, REQS+44*, REQS+45*, REQS+46*, REQS+47*
, REQS+48*, REQS+49*, REQS+50*, REQS+51*, REQS+52*, REQS+53*, REQS+63
ASUT(3 REQS+26*, REQS+54*, REQS+55*, REQS+56*, REQS+57*, REQS+58*, REQS+59*, REQS+64
ASUT20 REQS+20*, REQS+21, REQS+22, REQS+23, REQS+68!
ASUV CRMSTR+13!
>> D ANOTHER+1*
DA ANOTHER+3*, LOOPALL+1*, LOOPALL+2*, LOOPALL+3, EXIT+1!, FILE+8*, REQS+5*, REQS+6*, REQS+61*, REQS+66*
DDSFILE ANOTHER+4*, LOOPALL+4*, EXIT+1!
DDSPARM ANOTHER+4*, LOOPALL+4*, EXIT+1!
DIC ANOTHER+1!*, EXIT+1!
DIC("A" ANOTHER+1*
DIC("S" ANOTHER+1*
DIC(0 ANOTHER+1*
>> DIK FILE+8*, REQS+5*, REQS+61*, REQS+66*
DIR ASUJOLIB+7!, ASUJOLIB+12!, ANOTHER+5!, LOOPALL+6!, EXIT+1!, CRMSTR+7!
DIR("A" ASUJOLIB+7*, ASUJOLIB+12*, ANOTHER+5*, LOOPALL+6*, CRMSTR+8*
DIR("B" ASUJOLIB+12*, ANOTHER+5*, LOOPALL+6*
DIR(0 ASUJOLIB+7*, ASUJOLIB+12*, ANOTHER+5*, LOOPALL+6*, CRMSTR+8*
>> DIROUT ASUJOLIB+8, ASUJOLIB+13, ANOTHER+2
>> DIRUT ANOTHER+6, LOOPALL+8
DR ANOTHER+4*, LOOPALL+4*, EXIT+1!
>> DTOUT ASUJOLIB+8, ASUJOLIB+13, ANOTHER+2
>> DUOUT ASUJOLIB+8, ASUJOLIB+13, ANOTHER+2
DUZ(2 REQS+32
U ASUJOLIB+5, ANOTHER+3, CALCVOU+1, CALCVOU+3, UCST+1, UCST+2, UCST+9, RVAL+2, VOU+3, FILE+4
, FILE+5, FILE+6, FILE+7, REQS+22, REQS+23, REQS+27, REQS+28, REQS+29, REQS+30, REQS+31
, REQS+32, REQS+33, REQS+34, REQS+35, REQS+36, REQS+37, REQS+38, REQS+39, REQS+40, REQS+41
, REQS+42, REQS+43, REQS+44, REQS+45, REQS+46, REQS+47, REQS+48, REQS+49, REQS+50, REQS+51
, REQS+52, REQS+53, REQS+54, REQS+55, REQS+56, REQS+57, REQS+58, REQS+59, REQS+65
>> X ANOTHER+6, LOOPALL+1*, LOOPALL+9, REQS+7*
>> Y ASUJOLIB+9, ASUJOLIB+10, ASUJOLIB+14, ASUJOLIB+15, ANOTHER+2, ANOTHER+3, UCST+4*, UCST+9*, RVAL+3*, VOU+2*
, CRMSTR+9, CRMSTR+10, CRMSTR+11, REQS+15, REQS+19
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All