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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRCASET

Package: Accounts Receivable

Routine: PRCASET


Information

PRCASET ;SF-ISC/YJK-SETUP A NEW ACCOUNTS RECEIVABLE ;4/1/96 2:24 PM

Source Information

Source file <PRCASET.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Accounts Receivable 5 DELETE^PRCABIL4  EDT^PRCAEIN  CKSITE^PRCAUDT  PREPAY^RCBEPAYP  $$BNUM^RCMSNUM  
VA FileMan 1 ^DIC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Accounts Receivable 2 PRCA FMS-CONV SETUP BILL  PRCAA SETUP BILL  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
SETBIL
LOOK
ENT
DELETE
END

External References

Name Field # of Occurrence
^DIC ENT
DELETE^PRCABIL4 DELETE
EDT^PRCAEIN ENT+3
CKSITE^PRCAUDT SETBIL
PREPAY^RCBEPAYP END
$$BNUM^RCMSNUM LOOK+3

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !!
  • Prompt: "ACCOUNTS RECEIVABLE BILL NO. : "
  • Variable: X
  • Timeout: DTIME
  • Line Location: LOOK+1
Function Call: WRITE
  • Prompt: *7,!!,$P(X,"^",2),!
  • Line Location: LOOK+2
Function Call: WRITE
  • Prompt: *7,!!,"Please enter 7 character bill number.",!,"It must be in the following format: K400001, K481234 or '(N)ew' to get",!,"the next available number. (Enter ""^"" to exit)",!
  • Line Location: LOOK+6
Function Call: WRITE
  • Prompt: *7,!!,"Please enter a 6-7 character (only uppercase or numeric) bill number.",!,"It must be in the following format: K400001, K481234 or '(N)ew' to get",!,"the next available number. (Enter ""^"" to exit)",!
  • Line Location: LOOK+7
Function Call: WRITE
  • Prompt: *7,!!,"SORRY ! THIS NUMBER HAS BEEN ALREADY ASSIGNED TO A BILL. IT MUST BE NEW ENTRY",!
  • Line Location: LOOK+9
Function Call: WRITE
  • Prompt: " ",X
  • Line Location: ENT+0
Function Call: WRITE
  • Prompt: " ...Bill Number '",$P(^PRCA(430,PRCABN,0),"^"),"' assigned!"
  • Line Location: ENT+2
Function Call: WRITE
  • Prompt: !,*7,"DELETED",!
  • Line Location: DELETE+0
Routine Call
  • DIC
  • Line Location:
    • ENT

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCA(430 - [#430] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCA(430 - [#430] LOOK, LOOK+9, ENT+2, END, END+1
^PRCA(430.3 - [#430.3] END

Label References

Name Line Occurrences
END SETBIL
ENT SETBIL
LOOK SETBIL, LOOK+2, LOOK+7, LOOK+9
SETBIL SETBIL

Naked Globals

Name Field # of Occurrence
^(0 LOOK*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D0 ENT+1*
DIC ENT*!, END+1!
DIC("DR" ENT*
DIC(0 ENT*
DLAYGO ENT*!
DTIME LOOK+1
>> PRCA("CKSITE" SETBIL, END+1!
>> PRCA("MESS1" ENT+1*, END+1!
>> PRCA("MESS2" ENT+1*, END+1!
>> PRCA("SITE" LOOK+9, ENT
PRCABN ENT+1*, ENT+2, END, END+1!
PRCABT SETBIL!
PRCACOMM DELETE*!
PRCADEL ENT+3!, DELETE, END+1!
PRCADINO ENT+3!, END+1!
U END
>> X SETBIL, LOOK+1*, LOOK+2, LOOK+3*, LOOK+4*, LOOK+7, LOOK+9, ENT*, ENT+1*
>> Y ENT+1
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 |  Naked Globals |  Local Variables  | All