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: IBJPS7

Package: Integrated Billing

Routine: IBJPS7


Information

IBJPS7 ;ALB/VD - IB Site Parameters, Pay-To Provider Rate Types ;02-Feb-2018

Source Information

Source file <IBJPS7.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
List Manager 4 EN^VALM  ($$SETSTR,CLEAR,FULL,PAUSE)^VALM1  (CLEAN,SET)^VALM10  EN^VALM2  
VA FileMan 4 ^DIC  UPDATE^DIE  ^DIK  GETS^DIQ  
Kernel 1 DISP^XQORM1  

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: 4

Package Total Caller Graph
Integrated Billing 3 IBJP IB NON-MCCF RATE TYPE ADD  IBJP IB NON-MCCF RATE TYPE DEL  IBJP IB NON-MCCF RATE TYPES  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN(IBTCFLAG) ; -- main entry point for IBJP IB PAY-TO RATE TYPES
; select pay-to provider
HDR ; -- header code
INIT(IBTCFLAG) ; -- init variables and list array
HELP ; -- help code
EXIT ; -- exit code
RTADD(IBTCFLAG) ; -- Add a new Rate Type
RTDEL(IBTCFLAG) ; -- Delete a Rate Type
SET(IBLN,IBSTR) ; -- Add a line to display list
; returns line number added
ENTSEL(IENS) ; Selects an entry to be added to the specified Site Parameter Node
; Output: IENS - Array of selected IEN(s), "" if not selected
; Returns: 1 - At least one IEN selected, 0 otherwise
LOCK() ;EP
; Attempt to lock the Non-MCCF Pay-To Providers Rate Types for Site Parameters.
; Returns: 1 - Successfully locked
; 0 - Not successfully locked and an error message is
; displayed
UNLOCK ;EP
; Unlocks the Non-MCCF Pay-To Providers Rate Types for IB Site Parameters.

External References

Name Field # of Occurrence
^DIC ENTSEL+13
UPDATE^DIE ENTSEL+20
^DIK RTDEL+10
GETS^DIQ INIT+9
EN^VALM EN+3
$$SETSTR^VALM1 INIT+13, INIT+14, INIT+15, INIT+20
CLEAR^VALM1 EXIT+1
FULL^VALM1 RTADD+5, RTDEL+2
PAUSE^VALM1 LOCK+9
CLEAN^VALM10 EXIT+1
SET^VALM10 SET+2
EN^VALM2 RTDEL+3
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: @IOF,"Someone else is editing the Non-MCCF Pay-To Providers Rate Types"
  • Line Location: LOCK+7
Function Call: WRITE
  • Prompt: !,"Please Try again later"
  • Line Location: LOCK+8
Routine Call
  • DIC
  • Line Location:
    • ENTSEL+13
Routine Call
  • DIE
  • Line Location:
    • ENTSEL+20
Routine Call
  • VALM
  • Line Location:
    • EN+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(350.9 - [#350.9] Classic Fileman Calls
^DGCR(399.3 - [#399.3] GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBE(350.9 - [#350.9] INIT+5, INIT+6, RTDEL+9, LOCK+5, UNLOCK+2

Label References

Name Line Occurrences
$$ENTSEL RTADD+7
$$LOCK RTADD+4
$$SET INIT+16, INIT+20
INIT RTADD+11, RTDEL+12
UNLOCK RTADD+9, RTADD+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA RTADD+1~, RTDEL+6~, RTDEL+10*, ENTSEL+3~
DA(1 RTDEL+10*
DIC ENTSEL+3~, ENTSEL+6*
DIC("A" ENTSEL+8*
DIC("S" ENTSEL+11*
DIC(0 ENTSEL+7*
DIK RTADD+1~, RTDEL+6~, RTDEL+10*
DIR RTADD+1~, ENTSEL+3~
DIROUT RTADD+1~, ENTSEL+3~
DIRUT RTADD+1~, ENTSEL+3~
DTOUT RTADD+1~, ENTSEL+3~
DUOUT RTADD+1~, ENTSEL+3~
ERROR INIT+1~
FDA RTADD+1~, ENTSEL+3~, ENTSEL+17!
FDA("350.928" ENTSEL+18*, ENTSEL+19*
IBCNT INIT+1~, INIT+4*, INIT+12*, INIT+13, INIT+17
IBLN INIT+1~, INIT+4*, INIT+16*, INIT+20*, INIT+22, SET~, SET+2*, SET+3
IBSTR INIT+1~, INIT+13*, INIT+14*, INIT+15*, INIT+16, SET~, SET+2
IBTCFLAG EN~, EN+2, INIT~, INIT+2, RTADD~, RTADD+11, RTDEL~, RTDEL+12
IEN RTADD+1~, RTDEL+6~, RTDEL+7*, RTDEL+8, RTDEL+9
IENS RTADD+1~, RTADD+7, ENTSEL~, ENTSEL+4!, ENTSEL+23
IENS( ENTSEL+15*
IOF LOCK+7
RIEN RTDEL+6~, RTDEL+9*, RTDEL+10
RIENS INIT+1~, INIT+8*, INIT+9, INIT+11, INIT+14, INIT+15, INIT+17
RTYDATA INIT+1~
RTYDATA( INIT+11, INIT+14, INIT+15, INIT+17
RTYPE INIT+1~, INIT+6*, INIT+8
STOP ENTSEL+3~, ENTSEL+5*, ENTSEL+12, ENTSEL+14*
>> VALMAR INIT+17, RTDEL+7, RTDEL+11
>> VALMBCK EN+4*, RTADD+3*, RTDEL+13*
>> VALMBG INIT+22*
>> VALMCNT INIT+4*, INIT+22*
>> VALMSG HDR+1*, RTADD+8*, RTADD+12*
VALMY RTDEL+1~
VALMY( RTDEL+5
X HELP+1*, RTADD+1~, ENTSEL+3~
>> XQORNOD(0 RTDEL+3
Y RTADD+1~, ENTSEL+3~, ENTSEL+14, ENTSEL+15, ENTSEL+18
Z RTADD+1~, RTDEL+1~, RTDEL+4*, RTDEL+5*, RTDEL+7, ENTSEL+3~
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