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

Package: Asists

Routine: OOPSPC40


Information

OOPSPC40 ;HIRMFO/YH-CA-2 PAGE 1 ;2/20/98

Source Information

Source file <OOPSPC40.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Asists 1 ^OOPSPC41  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Asists 1 OOPSPCA  

Entry Points

Name Comments DBIA/ICR reference
EN1 ;RESET PRINTRA, SET PAGE SIZE (PORTRAIT) AND PCL PICTURE FRAME 8 1/2"*11"

External References

Name Field # of Occurrence
^OOPSPC41 EN1+68

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$CHAR(27),"E",$CHAR(27),"&l1E",$CHAR(27),"*c5952x7920Y",$CHAR(27),"%0B",$CHAR(27),"&s1#C"
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: !,"IN;SP1;IP;PW.3;SC0,22,0,29,1;"
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: !,"DT@,1;"
  • Line Location: EN1+3
Function Call: WRITE
  • Prompt: !,"SD1,277,2,1,4,12,5,0,6,0,7,16901;PU.4,28.7;LBNotice of Occupational Disease@;"
  • Line Location: EN1+4
Function Call: WRITE
  • Prompt: !,"PU.4,28.2;LBand Claim for Compensation@;"
  • Line Location: EN1+5
Function Call: WRITE
  • Prompt: !,"SD1,277,2,1,4,12,5,0,6,1,7,23;PU10.5,28.7;LBU.S. Department of Labor@;"
  • Line Location: EN1+6
Function Call: WRITE
  • Prompt: !,"SD1,277,2,1,4,10,5,0,6,0,7,16901;PU10.5,28.2;LBEmployment Standards Administration@;"
  • Line Location: EN1+7
Function Call: WRITE
  • Prompt: !,"PU10.5,27.9;LBOffice of Workers' Compensation Programs@;"
  • Line Location: EN1+8
Function Call: WRITE
  • Prompt: !,"PU.4,27.7;PD21,27.7;"
  • Line Location: EN1+9
Function Call: WRITE
  • Prompt: !,"SD1,277,2,1,4,9,5,0,6,1,7,23;PU.4,27.3;LBEmployee: Please complete all boxes 1 - 18 below. Do not complete shaded areas.@;"
  • Line Location: EN1+10
Function Call: WRITE
  • Prompt: !,"PU.4,26.9;LBEmploying Agency (Supervisor or Compensation Specialist): Complete shaded boxes a, b, and c.@;"
  • Line Location: EN1+11
Function Call: WRITE
  • Prompt: !,"PU.4,26.7;PD21,26.7;PU.4,26.3;FT10,10;RA21,26.7;PU.4,26.4;LBEmployee Data@;PU.4,26.3;PD21,26.3;"
  • Line Location: EN1+12
Function Call: WRITE
  • Prompt: !,"SD1,277,2,1,4,9,5,0,6,0,7,16901;PU.4,26;LB1. Name of employee (Last, First, Middle)@;"
  • Line Location: EN1+13
Function Call: WRITE
  • Prompt: !,"PU15.7,26.3;PD15.7,25.4;PU15.8,26;LB2. Social Security Number@;PU.4,25.4;PD21,25.4;"
  • Line Location: EN1+14
Function Call: WRITE
  • Prompt: !,"PU.4,25.1;LB3. Date of birth@;PU3,25.1;LBMo.@;PU3.9,25.1;LBDay@;PU4.9,25.1;LBYr.@;"
  • Line Location: EN1+15
Function Call: WRITE
  • Prompt: !,"PU6.3,24.6;PD6.3,25.4;PU6.4,25.1;LB4. Sex@;PU8,25.4;PD8,24.6;PU8.1,25.1;LB5. Home telephone@;"
  • Line Location: EN1+16
Function Call: WRITE
  • Prompt: !,"PU12.4,25.4;PD12.4,24.6;PU12.5,25.1;LB6. Grade as of date@;"
  • Line Location: EN1+17
Function Call: WRITE
  • Prompt: !,"PU2.9,24.7;PD5.4,24.7;PU2.9,24.7;PD2.9,24.9;PU3.7,24.7;PD3.7,24.9;PU4.7,24.7;PD4.7,24.9;PU5.4,24.7;PD5.4,24.9;"
  • Line Location: EN1+18
Function Call: WRITE
  • Prompt: !,"PU13,24.7;LBof last exposure@;PU15.6,24.7;LBLevel@;PU17.9,24.7;LBStep@;"
  • Line Location: EN1+19
Function Call: WRITE
  • Prompt: !,"PU.4,24.6;PD21,24.6;PU.4,24.3;LB7. Employee's home mailing address (Include city, state, and zip code)@;"
  • Line Location: EN1+20
Function Call: WRITE
  • Prompt: !,"PU15.9,24.3;LB8. Dependents@;PU16.2,23.8;EA16.4,24;PU16.6,23.8;LBWife, Husband@;"
  • Line Location: EN1+21
Function Call: WRITE
  • Prompt: !,"PU16.2,23.4,EA16.4,23.6;PU16.6,23.4;LBChildren under 18 years@;"
  • Line Location: EN1+22
Function Call: WRITE
  • Prompt: !,"PU16.2,23;EA16.4,23.2;PU16.6,23;LBOther@;"
  • Line Location: EN1+23
Function Call: WRITE
  • Prompt: !,"SD1,277,2,1,4,9,5,0,6,1,7,23;PU15.8,21.7;LBa. Occupation code@;SD1,277,2,1,4,9,5,0,6,0,7,16901;"
  • Line Location: EN1+24
Function Call: WRITE
  • Prompt: !,"PU.4,22.5;PD21,22.5;PU15.8,24.6;PD15.8,22.5;"
  • Line Location: EN1+25
Function Call: WRITE
  • Prompt: !,"PU.4,22;PD21,22;PU.4,22.1;SD1,277,2,1,4,9,5,0,6,1,7,23;LBClaim Information@;SD1,277,2,1,4,9,5,0,6,0,7,16901;"
  • Line Location: EN1+26
Function Call: WRITE
  • Prompt: !,"PU.4,22;RA21,22.5;PU.4,21.7;LB9. Employee's occupation@;PU.4,20.7;PD21,20.7;"
  • Line Location: EN1+27
Function Call: WRITE
  • Prompt: !,"PU.4,20.4;LB10. Location (address) where you worked when disease or illness occurred (Include city, state, and zip code)@;"
  • Line Location: EN1+28
Function Call: WRITE
  • Prompt: !,"PU15.8,20.4;LB11. Date you first became@;PU16.3,20.1;LBaware of disease@;"
  • Line Location: EN1+29
Function Call: WRITE
  • Prompt: !,"PU16.3,19.7;LBor illness@;PU16.3,19.3;LBMo.@;PU17.3,19.3;LBDay@;PU18.3,19.3;LBYr.@;"
  • Line Location: EN1+30
Function Call: WRITE
  • Prompt: !,"PU16.3,18.7;PD18.7,18.7;PU16.3,18.7;PD16.3,18.9;PU17.1,18.7;PD17.1,18.9;PU18,18.7;PD18,18.9;PU18.7,18.7;PD18.7,18.9;"
  • Line Location: EN1+31
Function Call: WRITE
  • Prompt: !,"PU.4,18.6;PD15.7,18.6;EA21,22;PU15.7,20.7;RA21,22;"
  • Line Location: EN1+32
Function Call: WRITE
  • Prompt: !,"PU.4,18.3;LB12. Date you first realized@;PU.9,18;LBthe disease or illness@;PU4.8,18;LBMo.@;PU5.7,18;LBDay@;"
  • Line Location: EN1+33
Function Call: WRITE
  • Prompt: !,"PU6.7,18;LBYr.@;PU.9,17.7;LBwas caused or aggravated@;PU.9,17.4;LBby your employment@;"
  • Line Location: EN1+34
Function Call: WRITE
  • Prompt: !,"PU4.7,17.4;PD7.3,17.4;PU4.7,17.4;PD4.7,17.6;PU5.6,17.4;PD5.6,17.6;PU6.4,17.4;PD6.4,17.6;PU7.3,17.4;PD7.3,17.6;"
  • Line Location: EN1+35
Function Call: WRITE
  • Prompt: !,"PU7.4,18.6;PD7.4,17.3;PD.5,17.3;PU7.5,18.3;LB13. Explain the relationship@;"
  • Line Location: EN1+36
Function Call: WRITE
  • Prompt: !,"LB to your employment, and why you came to this realization@;"
  • Line Location: EN1+37
Function Call: WRITE
  • Prompt: !,"PU.4,14.5;PD15.7,14.5;PU15.7,13.8;EA21,14.5;PU15.7,12.8;EA17.9,13.8;RA21,14.5;PU17.9,12.8;EA21,13.8;"
  • Line Location: EN1+38
Function Call: WRITE
  • Prompt: !,"PU.4,14.2;LB14. Nature of disease or illness@;PU15.8,14.2;SD1,277,2,1,4,9,5,0,6,1,7,23;LBOWCP Use - NOI Code@;"
  • Line Location: EN1+39
Function Call: WRITE
  • Prompt: !,"PU15.8,13.5;LBb. Type code@;PU18,13.5;LBc. Source code@;PU.4,12.8;PD15.7,12.8;SD1,277,2,1,4,9,5,0,6,0,7,16901;"
  • Line Location: EN1+40
Function Call: WRITE
  • Prompt: !,"PU.4,12.5;LB15. If this notice and claim was not filed with the employing agency within 30 days after date shown@;"
  • Line Location: EN1+41
Function Call: WRITE
  • Prompt: !,"LB above in item #12, explain the reason for the delay.@;PU.4,11;PD21,11;"
  • Line Location: EN1+42
Function Call: WRITE
  • Prompt: !,"PU.4,10.7;LB16. If the statement requested in item 1 of the attached instructions is not submitted@;"
  • Line Location: EN1+43
Function Call: WRITE
  • Prompt: !,"LB with this form, explain reason for delay.@;"
  • Line Location: EN1+44
Function Call: WRITE
  • Prompt: !,"PU.4,9.3;PD21,9.3;PU.4,9;LB17. If the medical reports requested in the item 2 of attached instructions@;"
  • Line Location: EN1+45
Function Call: WRITE
  • Prompt: !,"LB are not submitted with this form, explain reason for delay.@;"
  • Line Location: EN1+46
Function Call: WRITE
  • Prompt: !,"PU.4,7.6;PD21,7.6;PU.4,7.1;PD21,7.1;"
  • Line Location: EN1+47
Function Call: WRITE
  • Prompt: !,"PU.4,7.1;RA21,7.6;SD1,277,2,1,4,9,5,0,6,1,7,23;PU.4,7.2;LBEmployee Signature@;SD1,277,2,1,4,9,5,0,6,0,7,16901;"
  • Line Location: EN1+48
Function Call: WRITE
  • Prompt: !,"PU.4,6.7;LB18. I certify, under penalty of law, that the disease or illness described above@;"
  • Line Location: EN1+49
Function Call: WRITE
  • Prompt: !,"LB was the result of my employment with the United States@;"
  • Line Location: EN1+50
Function Call: WRITE
  • Prompt: !,"PU.9,6.4;LBGovernment, and that it was not caused by my willful misconduct, intent to injure@;"
  • Line Location: EN1+51
Function Call: WRITE
  • Prompt: !,"LB myself or another person, nor by my intoxication.@;"
  • Line Location: EN1+52
Function Call: WRITE
  • Prompt: !,"PU.9,6.1;LBI hereby claim medical treatment, if needed, and other benefits provided@;"
  • Line Location: EN1+53
Function Call: WRITE
  • Prompt: !,"LB by the Federal Employees' Compensation Act.@;"
  • Line Location: EN1+54
Function Call: WRITE
  • Prompt: !,"PU.9,5.5;LBI hereby authorize any physician or hospital (or any other person, institution, corporation, or government agency) to furnish any@;"
  • Line Location: EN1+55
Function Call: WRITE
  • Prompt: !,"PU.9,5.2;LBdesired information to the U.S. Department of Labor, Office of Workers' Compensation Programs (or to its official representative).@;"
  • Line Location: EN1+56
Function Call: WRITE
  • Prompt: !,"PU.9,4.9;LBThis authorization also permits any official representative of the Office to examine and to copy any records concerning me.@;"
  • Line Location: EN1+57
Function Call: WRITE
  • Prompt: !,"SD1,277,2,1,4,9,5,0,6,1,7,23;PU.4,4.4;LBSignature of employee or person acting on his/her behalf@;PU8.8,4.4;PD21,4.4;"
  • Line Location: EN1+58
Function Call: WRITE
  • Prompt: !,"SD1,277,2,1,4,9,5,0,6,0,7,16901;PU16.3,4.5;LBDate@;"
  • Line Location: EN1+59
Function Call: WRITE
  • Prompt: !,"PU.4,3.9;LBHave your supervisor complete the receipt attached to this form and return it to you for your records.@;"
  • Line Location: EN1+60
Function Call: WRITE
  • Prompt: !,"PU.4,3.4;LBAny person who knowingly makes any false statement, misrepresentation,@;"
  • Line Location: EN1+61
Function Call: WRITE
  • Prompt: !,"LB concealment of fact, or any other act of fraud to obtain compensation@;"
  • Line Location: EN1+62
Function Call: WRITE
  • Prompt: !,"PU.4,3.1;LBas provided by the FECA or who knowingly accepts compensation to which@;"
  • Line Location: EN1+63
Function Call: WRITE
  • Prompt: !,"LB that person is not entitled, is subject to civil or administrative remedies@;"
  • Line Location: EN1+64
Function Call: WRITE
  • Prompt: !,"PU.4,2.8;LBas well as felony criminal prosecution and may, under appropriate provisions, be punished by a fine or imprisonment, or both.@;"
  • Line Location: EN1+65
Function Call: WRITE
  • Prompt: !,"PU.4,2.6;PD21,2.6;"
  • Line Location: EN1+66
Function Call: WRITE
  • Prompt: !,"PU18.5,2.2;LBForm CA-2@;PU18.5,1.8;LBRev. Jan. 1997@;"
  • Line Location: EN1+67
Function Call: WRITE
  • Prompt: !,$CHAR(27),"&r0F",$CHAR(27),"%0A"
  • Line Location: EN1+69

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> IEN EN1+68
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Local Variables |  All