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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ABSPOSP

Package: Pharmacy Point of Sale

Routine: ABSPOSP


Information

ABSPOSP ; IHS/FCS/DRS - Pharm POS pay/adj batches ; [ 09/12/2002 10:17 AM ]

Source Information

Source file <ABSPOSP.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Pharmacy Point of Sale 4 ZWRITE^ABSPOS  LOG^ABSPOSL2  PRESSANY^ABSPOSU5  ($$IMPOSS,IMPOSS)^ABSPOSUE  
VA Fileman 2 (FILE,UPDATE)^DIE  $$GET1^DIQ  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Pharmacy Point of Sale 4 ABSPOSBX  ABSPOSP1  ABSPOSP2  ABSPOSPW  

Entry Points

Name Comments DBIA/ICR reference
GETADJ(BATCH)
GETPMT(BATCH)
SETAMT(BATCH,AMT,FIELD) ;EP - store the adjustment total ; either $$ or not
GETAMT(BATCH,FIELD)
SETAMT1 ;
NEWBATCH(ECHO) ;EP - create a new batch
ADDADJ(BATCH,AMT)
PRESSANY
ADJUST(PCNDFN,BATCH,AMOUNT,REASON) ;EP - store an adjustment
ADDPMT(BATCH,AMT)
TEST ;
ADDAMT(BATCH,AMT,FIELD)
PAYMENT(PCNDFN,BATCH,AMOUNT,INSDFN,DEPDATE,RECEIPT,CHECKNUM) ;EP - store a pmt

External References

Name Field # of Occurrence
ZWRITE^ABSPOS NEWBATCH+15, GETAMT+3, SETAMT1+4
LOG^ABSPOSL2 NEWBATCH+12, SETAMT1+2
PRESSANY^ABSPOSU5 PRESSANY
$$IMPOSS^ABSPOSUE SETAMT1+5
IMPOSS^ABSPOSUE GETAMT+3
FILE^DIE SETAMT1+1
UPDATE^DIE NEWBATCH+11
$$GET1^DIQ GETAMT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "Test NEWBATCH: "
  • Line Location: TEST+1
Function Call: WRITE
  • Prompt: "Test GETPMT: ",$$GETPMT(BATCH),!
  • Line Location: TEST+4
Function Call: WRITE
  • Prompt: "Test ADDPMT: ",$$ADDPMT(BATCH,100),!
  • Line Location: TEST+5
Function Call: WRITE
  • Prompt: "Test ADDPMT: ",$$ADDPMT(BATCH,25.41),!
  • Line Location: TEST+6
Function Call: WRITE
  • Prompt: "Test GETPMT: ",$$GETPMT(BATCH),!
  • Line Location: TEST+7
Function Call: WRITE
  • Prompt: "Failed to create the batch!",!
  • Line Location: NEWBATCH+14
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWBATCH+16
Routine Call
  • DIE
  • Line Location:
    • NEWBATCH+11
Routine Call
  • DIE
  • Line Location:
    • SETAMT1+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABSBPMNT(0 NEWBATCH+4
^ABSTMP( PAYMENT+4, PAYMENT+7*, PAYMENT+8*, PAYMENT+9*, ADJUST+2, ADJUST+4*, ADJUST+5*
^AUTNINS - [#9999999.18] PAYMENT+5

Label References

Name Line Occurrences
$$ADDAMT ADDPMT+1, ADDADJ+1
$$ADDPMT TEST+5, TEST+6
$$GETAMT ADJUST+3, GETPMT, GETADJ, ADDAMT+1
$$GETPMT TEST+4, TEST+7
$$NEWBATCH TEST+2
$$SETAMT ADDAMT+2
ADDADJ ADJUST+1
ADDPMT PAYMENT+1
PRESSANY NEWBATCH+17
SETAMT1 SETAMT+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AMOUNT PAYMENT~, PAYMENT+1, PAYMENT+5, PAYMENT+8, PAYMENT+9, ADJUST~, ADJUST+1, ADJUST+3, ADJUST+5
AMT ADDPMT~, ADDPMT+1, ADDADJ~, ADDADJ+1, ADDAMT~, ADDAMT+2, SETAMT~, SETAMT+2, SETAMT+4
BATCH TEST+2*, TEST+3, TEST+4, TEST+5, TEST+6, TEST+7, PAYMENT~, PAYMENT+1, PAYMENT+4, PAYMENT+6
, PAYMENT+7, PAYMENT+8, PAYMENT+9, ADJUST~, ADJUST+1, ADJUST+2, ADJUST+3, ADJUST+4, ADJUST+5, GETPMT~
, ADDPMT~, ADDPMT+1, GETADJ~, ADDADJ~, ADDADJ+1, GETAMT~, GETAMT+2, ADDAMT~, ADDAMT+1, ADDAMT+2
, SETAMT~, SETAMT+2
CHECKNUM PAYMENT~, PAYMENT+3*, PAYMENT+6
DEPDATE PAYMENT~, PAYMENT+5
DT NEWBATCH+5, NEWBATCH+10
DUZ NEWBATCH+6
ECHO NEWBATCH~, NEWBATCH+1*, NEWBATCH+13
FDA NEWBATCH+2~, GETAMT+1~, SETAMT+1~
FDA( NEWBATCH+4*, NEWBATCH+5*, NEWBATCH+6*, NEWBATCH+7*, NEWBATCH+8*, NEWBATCH+9*, NEWBATCH+10*, SETAMT+2*
FIELD GETAMT~, GETAMT+2, ADDAMT~, ADDAMT+1, ADDAMT+2, SETAMT~, SETAMT+2
FN NEWBATCH+2~*, NEWBATCH+4, NEWBATCH+5, NEWBATCH+6, NEWBATCH+7, NEWBATCH+8, NEWBATCH+9, NEWBATCH+10, GETAMT+1~*, GETAMT+2
, SETAMT+1~*, SETAMT+2
IEN NEWBATCH+2~, GETAMT+1~, SETAMT+1~
IEN(1 NEWBATCH+18
INSDFN PAYMENT~, PAYMENT+5
MSG NEWBATCH+2~, NEWBATCH+12, NEWBATCH+13, GETAMT+1~, GETAMT+3, SETAMT+1~, SETAMT1+2, SETAMT1+3
N PAYMENT+4~*, PAYMENT+7, ADJUST+2~*, ADJUST+4
PCNDFN PAYMENT~, PAYMENT+4, PAYMENT+7, PAYMENT+8, ADJUST~, ADJUST+2, ADJUST+4, ADJUST+5
REASON ADJUST~, ADJUST+3
RECEIPT PAYMENT~, PAYMENT+2*, PAYMENT+6
U NEWBATCH+4, PAYMENT+5, PAYMENT+6, ADJUST+3
X NEWBATCH+3~*, NEWBATCH+4, NEWBATCH+5, NEWBATCH+6, NEWBATCH+7, NEWBATCH+8, NEWBATCH+9, NEWBATCH+10, PAYMENT+5~*, PAYMENT+6*
, PAYMENT+7, ADJUST+3~*, ADJUST+4, ADDPMT+1*, ADDPMT+2, ADDADJ+1~*, ADDADJ+2, GETAMT+2*, GETAMT+4, ADDAMT+1~*
, ADDAMT+2*, ADDAMT+3

Marked Items

Name Field # of Occurrence
$T( GETAMT+3, SETAMT1+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All