Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBCNSP3

Package: Integrated Billing

Routine: IBCNSP3


Information

IBCNSP3 ;ALB/AAS - INSURANCE MANAGEMENT EDIT ;27-APR-2015

Source Information

Source file <IBCNSP3.m>

Entry Points

Name Comments DBIA/ICR reference
SAVEPT(DFN,DA) ; -- Save the global before editing
COMPPT(DFN,DA) ; -- Compare before editing with globals
COMPPTQ
UPDATPT(DFN,DA) ; -- enter date and user if editing has taken place
EM ; -- Employer for claims update
EMQ
GC ;EP
; IB*2.0*549 Added Method
; Protocol action to add/edit a Group Plan Comment
; Input: DFN - IEN of the currently selected patient
; IBCPOL - IEN of the currently selected group plan
; Output: Group Plan Comment is added/edited (Potentially)
BLS(X,Y) ; -- blank a section of lines
VARS ; -- set vars for call to die for .312 node
SAVE(IBCPOL) ; -- Save the global before editing
COMP(IBCPOL) ; -- Compare before editing with globals
UPDATE(IBCPOL) ; -- Update last edited by
RIDERS ; -- add/edit personal riders
R1
RIDERQ
RD ; -- Add riders/ for multiple policies
DISPR ; -- Display riders
DISPRQ
EMPSET(DFN,IBCPOL) ; insert patient or spouses current employer as ESGHP address if that employer sponsors this plan

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: EM+1
Function Call: WRITE
  • Prompt: !!,"You may now enter comments about this Group Plan that pertains to all"
  • Line Location: GC+9
Function Call: WRITE
  • Prompt: " Patients",!!
  • Line Location: GC+10
Function Call: WRITE
  • Prompt: !
  • Line Location: RIDERS+5
Function Call: WRITE
  • Prompt: !
  • Line Location: RIDERS+5
Function Call: WRITE
  • Prompt: !
  • Line Location: R1+11
Function Call: WRITE
  • Prompt: !,"Current Personal Riders: "
  • Line Location: DISPR+4
Function Call: WRITE
  • Prompt: !?5,"None Indicated"
  • Line Location: DISPR+8
Function Call: WRITE
  • Prompt: "...."
  • Line Location: EMPSET+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(355.3 - [#355.3] Classic Fileman Calls
^IBA(355.7 - [#355.7] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call